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

Diff for /loncom/interface/coursecatalog.pm between versions 1.53.4.1 and 1.53.4.2

version 1.53.4.1, 2009/08/13 03:32:47 version 1.53.4.2, 2010/01/02 22:34:30
Line 174  sub course_details { Line 174  sub course_details {
     my $js = '<script type="text/javascript">'."\n".      my $js = '<script type="text/javascript">'."\n".
              &courselink_javascript().'</script>'."\n";               &courselink_javascript().'</script>'."\n";
     my $start_page =      my $start_page =
         &Apache::loncommon::start_page('Course Catalog',$js,          &Apache::loncommon::start_page('Course/Community Catalog',$js,
                                            {                                             {
                                              'add_entries' => \%add_entries,                                               'add_entries' => \%add_entries,
                                              'no_inline_link'   => 1,});                                               'no_inline_link'   => 1,});
Line 182  sub course_details { Line 182  sub course_details {
     if ($env{'form.numtitles'} > 0) {      if ($env{'form.numtitles'} > 0) {
         &Apache::lonhtmlcommon::add_breadcrumb          &Apache::lonhtmlcommon::add_breadcrumb
                 ({href=>"/adm/coursecatalog",                  ({href=>"/adm/coursecatalog",
                   text=>"Select courses"});                    text=>"Course/Community Catalog"});
     }      }
     &Apache::lonhtmlcommon::add_breadcrumb      &Apache::lonhtmlcommon::add_breadcrumb
              ({href=>"javascript:document.$formname.submit()",               ({href=>"javascript:document.$formname.submit()",
               text=>"Course listing"},                text=>"Course listing"},
              {text=>"Course details"});               {text=>"Course details"});
     $r->print(&Apache::lonhtmlcommon::breadcrumbs('Course Details'));      $r->print(&Apache::lonhtmlcommon::breadcrumbs('Course/Community Catalog'));
     $r->print('<br />'.&mt('Detailed course information:').'<br /><br />'.      $r->print('<br />'.&mt('Detailed course information:').'<br /><br />'.
               &print_course_listing($codedom,undef,$trails,$allitems).                &print_course_listing($codedom,undef,$trails,$allitems).
               '<br /><br />');                '<br /><br />');
Line 292  sub cat_header { Line 292  sub cat_header {
         if ($numtitles > 0) {          if ($numtitles > 0) {
             &Apache::lonhtmlcommon::add_breadcrumb              &Apache::lonhtmlcommon::add_breadcrumb
                 ({href=>"/adm/coursecatalog",                  ({href=>"/adm/coursecatalog",
                   text=>"Select courses"},                    text=>"Course/Community Catalog"},
                  {text=>"Course listing"});                   {text=>"Course listing"});
         } else {          } else {
             &Apache::lonhtmlcommon::add_breadcrumb              &Apache::lonhtmlcommon::add_breadcrumb
             ({text=>"Course listing"});              ({text=>"Course listing"});
         }          }
         $r->print(&Apache::lonhtmlcommon::breadcrumbs('Course Listing'));  
     } else {      } else {
         &Apache::lonhtmlcommon::add_breadcrumb          &Apache::lonhtmlcommon::add_breadcrumb
         ({href=>"/adm/coursecatalog",          ({href=>"/adm/coursecatalog",
           text=>"Select courses"});            text=>"Course/Community Catalog"});
         $r->print(&Apache::lonhtmlcommon::breadcrumbs('Select courses'));  
     }      }
       $r->print(&Apache::lonhtmlcommon::breadcrumbs('Course/Community Catalog'));
     my $onchange;      my $onchange;
     unless (($env{'browser.interface'} eq 'textual') || ($env{'form.interface'} eq 'textual')) {      unless (($env{'browser.interface'} eq 'textual') || ($env{'form.interface'} eq 'textual')) {
         $onchange = 'this.form.submit()';          $onchange = 'this.form.submit()';
Line 733  sub build_courseinfo_hash { Line 732  sub build_courseinfo_hash {
             }              }
         }          }
         foreach my $owner (@owners) {          foreach my $owner (@owners) {
             my ($ownername,$ownerdom) = @_;               my ($ownername,$ownerdom); 
             if ($owner =~ /:/) {              if ($owner =~ /:/) {
                 ($ownername,$ownerdom) = split(/:/,$owner);                  ($ownername,$ownerdom) = split(/:/,$owner);
             } else {              } else {
Removed from v.1.53.4.1  
changed lines
  Added in v.1.53.4.2

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