version 1.58.4.3, 2010/09/14 03:10:00
|
version 1.58.4.5, 2010/10/07 14:47:59
|
Line 89 sub handler {
|
Line 89 sub handler {
|
\%idx,\@jsarray,$subcats); |
\%idx,\@jsarray,$subcats); |
my ($numtitles,@codetitles); |
my ($numtitles,@codetitles); |
if ($env{'form.coursenum'} ne '' && &user_is_known()) { |
if ($env{'form.coursenum'} ne '' && &user_is_known()) { |
if ($env{'form.currcat_0'} eq 'instcode::0') { |
|
&course_details($r,$codedom,$formname,$domdesc,\@trails,\%allitems,\@codetitles); |
&course_details($r,$codedom,$formname,$domdesc,\@trails,\%allitems,\@codetitles); |
} else { |
} else { |
my ($catlinks,$has_subcats,$selitem) = &category_breadcrumbs($codedom,@cats); |
my ($catlinks,$has_subcats,$selitem) = &category_breadcrumbs($codedom,@cats); |
Line 402 sub category_breadcrumbs {
|
Line 401 sub category_breadcrumbs {
|
$catlinks .= '<option value="">'.&mt('De-select').'</option>'; |
$catlinks .= '<option value="">'.&mt('De-select').'</option>'; |
for (my $j=0; $j<@{$cats[$shallower]{$container}}; $j++) { |
for (my $j=0; $j<@{$cats[$shallower]{$container}}; $j++) { |
my $name = $cats[$shallower]{$container}[$j]; |
my $name = $cats[$shallower]{$container}[$j]; |
my $item = &escape($name).':'.$container.':'.$shallower; |
my $item = &escape($name).':'.&escape($container).':'.$shallower; |
my $selected = ''; |
my $selected = ''; |
if ($item eq $env{'form.currcat_'.$shallower}) { |
if ($item eq $env{'form.currcat_'.$shallower}) { |
$selected = ' selected="selected"'; |
$selected = ' selected="selected"'; |