--- loncom/interface/lonconfigsettings.pm 2010/03/22 17:29:11 1.12
+++ loncom/interface/lonconfigsettings.pm 2010/05/22 01:29:27 1.14
@@ -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.14 2010/05/22 01:29:27 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -320,13 +320,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 +336,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 +353,7 @@ sub display_choices {
if ((!$thirddiv) && ($count >= $secondthird)) {
$r->print('
'."\n".''."\n");
$thirddiv = 1;
- }
+ }
}
$r->print('
');
}