--- loncom/interface/lonconfigsettings.pm 2010/03/22 17:29:11 1.12 +++ loncom/interface/lonconfigsettings.pm 2010/12/24 22:50:34 1.15.2.2 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: lonconfigsettings.pm,v 1.12 2010/03/22 17:29:11 raeburn Exp $ +# $Id: lonconfigsettings.pm,v 1.15.2.2 2010/12/24 22:50:34 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -141,7 +141,7 @@ sub print_footer { if (($phase eq 'display') || ($phase eq 'process')) { if (ref($actions) eq 'ARRAY') { foreach my $item (@{$actions}) { - $r->print('')."\n"; + $r->print(''."\n"); } } } @@ -251,6 +251,13 @@ sub display_settings { if (grep(/^\Q$item\E$/,@actions)) { push(@items,$item); if ($context eq 'domain') { + if ($item eq 'usersessions') { + $r->print(''."\n"); + } ($output{$item},$rowtotal{$item}) = &Apache::domainprefs::print_config_box($r,$dom,$confname, $phase,$item,$prefs->{$item},$values->{$item}); @@ -275,34 +282,6 @@ sub display_settings { } $r->print(''); } - if ($context eq 'course') { - $r->print(' - -'); - } $r->print(&Apache::loncommon::end_page()); return; } @@ -320,13 +299,13 @@ sub display_choices { '// ]]>'."\n". ''."\n"); $r->print('

'.&mt('Settings to display/modify').'

'. - ''.(' 'x2). ''. "\n". - '
'); + '
'); my ($numitems,$maxincol,$firstthird,$secondthird,$seconddiv,$thirddiv,$count); if (ref($prefs_order) eq 'ARRAY') { $numitems = @{$prefs_order}; @@ -336,8 +315,8 @@ sub display_choices { if ($numitems%$numcols) { $maxincol ++; } - my $firstthird = $maxincol; - my $secondthird = $firstthird + $maxincol; + $firstthird = $maxincol; + $secondthird = $firstthird + $maxincol; $count = 0; if ((ref($prefs_order) eq 'ARRAY') && (ref($prefs) eq 'HASH')) { foreach my $item (@{$prefs_order}) { @@ -353,7 +332,7 @@ sub display_choices { if ((!$thirddiv) && ($count >= $secondthird)) { $r->print('
'."\n".'
'."\n"); $thirddiv = 1; - } + } } $r->print('

'); }