loncom/interface/lonconfigsettings.pm - diff

Return to lonconfigsettings.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.4, 2009/05/12 21:20:42	version 1.5, 2009/05/17 00:54:38
Line 124 sub print_footer {	Line 124 sub print_footer {
$env{'form.width'}.'" />'.	$env{'form.width'}.'" />'.
'<input type="hidden" name="height" value="'.	'<input type="hidden" name="height" value="'.
$env{'form.height'}.'" />');	$env{'form.height'}.'" />');
	if (defined($env{'form.origin'})) {
	$r->print('<input type="hidden" name="origin" value="'.$env{'form.origin'}.'" />'."\n");
	}
if (($phase eq 'display') \|\| ($phase eq 'process')) {	if (($phase eq 'display') \|\| ($phase eq 'process')) {
if (ref($actions) eq 'ARRAY') {	if (ref($actions) eq 'ARRAY') {
foreach my $item (@{$actions}) {	foreach my $item (@{$actions}) {
Line 300 sub display_choices {	Line 303 sub display_choices {
}	}
my %helphash;	my %helphash;
&print_header($r,$phase,$context);	&print_header($r,$phase,$context);
$r->print('<h3>'.&mt('Functionality to display/modify').'</h3>');	$r->print('<h3>'.&mt('Settings to display/modify').'</h3>');
$r->print('<script type="text/javascript">'."\n".	$r->print('<script type="text/javascript">'."\n".
&Apache::loncommon::check_uncheck_jscript()."\n".	&Apache::loncommon::check_uncheck_jscript()."\n".
'</script>'."\n".'<p><input type="button" value="'.&mt('check all').'" '.	'</script>'."\n".'<p><input type="button" value="'.&mt('check all').'" '.