Return to lonhomework.pm CVS log | Up to [LON-CAPA] / loncom / homework |
version 1.85, 2002/08/07 18:20:29 | version 1.86, 2002/08/16 21:30:08 |
---|---|
Line 422 sub get_template_list { | Line 422 sub get_template_list { |
push (@allnames, $name); | push (@allnames, $name); |
} | } |
} | } |
if (@allnames) { | if (@allnames && !$result) { |
$result="<option>Select a $extension type</option>\n<option>". | $result="<option>Select a $extension type</option>\n<option>". |
join('</option><option>',sort(@allnames)).'</option>'; | join('</option><option>',sort(@allnames)).'</option>'; |
} | } |