[BACK]Return to coursecatalog.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/coursecatalog.pm between versions 1.29 and 1.30

version 1.29, 2008/05/29 06:18:07 version 1.30, 2008/05/29 19:58:32
Line 154  sub instcode_course_selector { Line 154  sub instcode_course_selector {
     my $totcodes = 0;      my $totcodes = 0;
     my $jscript = '';      my $jscript = '';
     my ($numtitles,$lasttitle);      my ($numtitles,$lasttitle);
       my %add_entries = (topmargin    => "0",
                          marginheight => "0",);
       my $js;
     $totcodes = &Apache::courseclassifier::retrieve_instcodes(\%coursecodes,$codedom);      $totcodes = &Apache::courseclassifier::retrieve_instcodes(\%coursecodes,$codedom);
     if ($totcodes > 0) {      if ($totcodes > 0) {
         $format_reply = &Apache::lonnet::auto_instcode_format($caller,$codedom,\%coursecodes,\%codes,\@codetitles,\%cat_titles,\%cat_order);          $format_reply = &Apache::lonnet::auto_instcode_format($caller,$codedom,\%coursecodes,\%codes,\@codetitles,\%cat_titles,\%cat_order);
Line 221  function setCourseId(caller) { Line 224  function setCourseId(caller) {
 }\n|;  }\n|;
             }              }
         }          }
         my $js = '<script type"text/javascript">'."\n$jscript\n$catjs\n".          $js = '<script type"text/javascript">'."\n$jscript\n$catjs\n".
                  '</script>';                '</script>';
         my %add_entries = (topmargin    => "0",  
                            marginheight => "0",);  
         if (($env{'form.state'} eq 'listing') && ($numtitles > 0)) {          if (($env{'form.state'} eq 'listing') && ($numtitles > 0)) {
             $add_entries{'onLoad'} = 'setElements()';              $add_entries{'onLoad'} = 'setElements()';
         }          }
Line 298  function setCourseId(caller) { Line 299  function setCourseId(caller) {
             $r->print('<br />');              $r->print('<br />');
         }          }
     } else {      } else {
         $r->print('<br />'.&mt('No official courses to display for [_1].',$domdesc));          &cat_header($r,$codedom,$js,\%add_entries,$catlinks,$numtitles);
           my $cat_maxdepth = $env{'form.catalog_maxdepth'};
           $r->print('<form name="'.$formname.'" method="post" action="/adm/coursecatalog">'.
                     '<input type="hidden" name="catalog_maxdepth" value="'.$cat_maxdepth.'" />'.
                     '<input type="hidden" name="showdom" value="'.$env{'form.showdom'}.'" />'.
                     '<input type="hidden" name="currcat_0" value="instcode::0" />');
           $r->print('<br />'.&mt('No official courses to display for [_1].',$domdesc).'</form>');
     }      }
     return $numtitles;      return $numtitles;
 }  }
Removed from v.1.29  
changed lines
  Added in v.1.30

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>