version 1.286, 2007/11/20 17:53:22
|
version 1.287, 2007/12/24 06:35:18
|
Line 1082 sub get_template_list {
|
Line 1082 sub get_template_list {
|
'/templates/*.'.$glob_extension); |
'/templates/*.'.$glob_extension); |
@files = map {[$_,&mt(&Apache::lonnet::metadata($_, 'title'))]} (@files); |
@files = map {[$_,&mt(&Apache::lonnet::metadata($_, 'title'))]} (@files); |
@files = sort {$a->[1] cmp $b->[1]} (@files); |
@files = sort {$a->[1] cmp $b->[1]} (@files); |
|
my ($midpoint,$seconddiv,$numfiles); |
|
$numfiles = 0; |
|
foreach my $file (@files) { |
|
next if ($file->[1] !~ /\S/); |
|
$numfiles ++; |
|
} |
|
if ($numfiles > 0) { |
|
$result = '<div class="LC_left_float">'; |
|
$midpoint = int($numfiles/2); |
|
if ($numfiles%2) { |
|
$midpoint ++; |
|
} |
|
} |
|
my $count = 0; |
foreach my $file (@files) { |
foreach my $file (@files) { |
next if ($file->[1] !~ /\S/); |
next if ($file->[1] !~ /\S/); |
$result .= |
$result .= |
'<label><input type="radio" name="template" value="'.$file->[0].'" />'. |
'<label><input type="radio" name="template" value="'.$file->[0].'" />'. |
$file->[1].'</label><br />'; |
$file->[1].'</label><br />'."\n"; |
|
$count ++; |
|
if ((!$seconddiv) && ($count >= $midpoint)) { |
|
$result .= '</div>'."\n".'<div class="LC_left_float">'."\n"; |
|
$seconddiv = 1; |
|
} |
|
} |
|
if ($numfiles > 0) { |
|
$result .= '</div>'."\n".'<div class="LC_clear_float_footer"></div>'."\n"; |
} |
} |
return $result; |
return $result; |
} |
} |