loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.91, 2003/05/07 19:31:43	version 1.93, 2003/05/27 17:38:47
Line 687 sub assessparms {	Line 687 sub assessparms {
my $url=$ENV{'form.url'};	my $url=$ENV{'form.url'};
$url=~s-^http://($ENV{'SERVER_NAME'}\|$ENV{'HTTP_HOST'})--;	$url=~s-^http://($ENV{'SERVER_NAME'}\|$ENV{'HTTP_HOST'})--;
$pssymb=&Apache::lonnet::symbread($url);	$pssymb=&Apache::lonnet::symbread($url);
@pscat='all';	if (!@pscat) { @pscat=('all'); }
$pschp='';	$pschp='';
$parmlev = 'full';	$parmlev = 'full';
} elsif ($ENV{'form.symb'}) {	} elsif ($ENV{'form.symb'}) {
$pssymb=$ENV{'form.symb'};	$pssymb=$ENV{'form.symb'};
@pscat='all';	if (!@pscat) { @pscat=('all'); }
$pschp='';	$pschp='';
$parmlev = 'full';	$parmlev = 'full';
} else {	} else {
Line 1453 sub crsenv {	Line 1453 sub crsenv {
'hideemptyrows' => '<b>Hide Empty Rows in Spreadsheets</b><br />'.	'hideemptyrows' => '<b>Hide Empty Rows in Spreadsheets</b><br />'.
'("<tt>yes</tt>" for default hiding)',	'("<tt>yes</tt>" for default hiding)',
'pageseparators' => '<b>Visibly Separate Items on Pages</b><br />'.	'pageseparators' => '<b>Visibly Separate Items on Pages</b><br />'.
'("<tt>yes</tt>" for visible separation)',	'("<tt>yes</tt>" for visible separation, '.
	'changes will not show until next login)',
'pch.roles.denied'=> '<b>Disallow Resource Discussion for '.	'pch.roles.denied'=> '<b>Disallow Resource Discussion for '.
'Roles</b><br />"<tt>st</tt>": '.	'Roles</b><br />"<tt>st</tt>": '.
'student, "<tt>ta</tt>": '.	'student, "<tt>ta</tt>": '.