--- loncom/interface/lonparmset.pm 2004/08/17 20:32:50 1.168.2.1
+++ loncom/interface/lonparmset.pm 2004/07/19 17:57:25 1.169
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.168.2.1 2004/08/17 20:32:50 albertel Exp $
+# $Id: lonparmset.pm,v 1.169 2004/07/19 17:57:25 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -585,8 +585,8 @@ sub extractResourceInformation {
my $resid=$2;
my $id=$mapid.'.'.$resid;
my $srcf=$$bighash{$_};
+# if ($srcf=~/\.(problem|exam|quiz|assess|survey|form)$/) {
if (1) {
- $srcf=~/\.(\w+)$/;
$$ids[$#$ids+1]=$id;
$$typep{$id}=$1;
$$keyp{$id}='';
@@ -595,10 +595,6 @@ sub extractResourceInformation {
my $key=$_;
my $allkey=$1;
$allkey=~s/\_/\./g;
- if (&Apache::lonnet::metadata($srcf,$key.'.hidden') eq
- 'parm') {
- next; #hide hidden things
- }
my $display= &Apache::lonnet::metadata($srcf,$key.'.display');
my $name=&Apache::lonnet::metadata($srcf,$key.'.name');
my $part= &Apache::lonnet::metadata($srcf,$key.'.part');
@@ -1557,6 +1553,7 @@ sub crsenv {
'pageseparators' => ''.&mt('Visibly Separate Items on Pages').'
'.
'('.&mt('"[_1]" for visible separation','yes').', '.
&mt('changes will not show until next login').')',
+ 'student_classlist_view' => ''.&mt('Allow students to view classlist.').''.&mt('("all":students can view all sections,"section":students can only view their own section.blank or "disabled" prevents student view.'),
'plc.roles.denied'=> ''.&mt('Disallow live chatroom use for Roles').
'
"st": '.
@@ -1633,6 +1630,7 @@ sub crsenv {
my @Display_Order = ('url','description','courseid','grading',
'default_xml_style','pageseparators',
'question.email','comment.email','policy.email',
+ 'student_classlist_view',
'plc.roles.denied','plc.users.denied',
'pch.roles.denied','pch.users.denied',
'allow_limited_html_in_feedback',