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

Diff for /loncom/interface/coursecatalog.pm between versions 1.91 and 1.92

version 1.91, 2017/02/18 23:39:15 version 1.92, 2017/02/20 18:29:22
Line 125  sub handler { Line 125  sub handler {
         }          }
         my $js = '<script type="text/javascript">'."\n".          my $js = '<script type="text/javascript">'."\n".
                  '// <![CDATA['."\n".                   '// <![CDATA['."\n".
                  &courselink_javascript()."\n".                   &courselink_javascript($r)."\n".
                  '// ]]>'."\n".                   '// ]]>'."\n".
                  '</script>'."\n";                   '</script>'."\n";
         $r->print(&Apache::loncommon::start_page('Search for a Course/Community',$js));          $r->print(&Apache::loncommon::start_page('Search for a Course/Community',$js));
Line 254  function setCourseId(caller) { Line 254  function setCourseId(caller) {
 }  }
   
 ENDSCRIPT  ENDSCRIPT
         $catjs .= &courselink_javascript();          $catjs .= &courselink_javascript($r);
         if (&user_is_dc($codedom) || $canviewall) {          if (&user_is_dc($codedom) || $canviewall) {
             $catjs .= <<ENDTOGGJS              $catjs .= <<ENDTOGGJS
   
Line 352  sub course_details { Line 352  sub course_details {
     my %add_entries = (topmargin    => "0",      my %add_entries = (topmargin    => "0",
                        marginheight => "0",);                         marginheight => "0",);
     my $js = '<script type="text/javascript">'."\n".      my $js = '<script type="text/javascript">'."\n".
              &courselink_javascript().'</script>'."\n";               &courselink_javascript($r).'</script>'."\n";
     my $start_page =      my $start_page =
         &Apache::loncommon::start_page('Course/Community Catalog',$js,          &Apache::loncommon::start_page('Course/Community Catalog',$js,
                                        {'add_entries' => \%add_entries, });                                         {'add_entries' => \%add_entries, });
Line 416  END Line 416  END
 }  }
   
 sub courselink_javascript {  sub courselink_javascript {
       my ($r) = @_;
       my $hostname = $r->hostname();
     return <<"END";      return <<"END";
   
 function ToSyllabus(cdom,cnum,usehttp) {  function ToSyllabus(cdom,cnum,usehttp) {
Line 427  function ToSyllabus(cdom,cnum,usehttp) { Line 429  function ToSyllabus(cdom,cnum,usehttp) {
     }      }
     document.linklaunch.action = "/public/"+cdom+"/"+cnum+"/syllabus";      document.linklaunch.action = "/public/"+cdom+"/"+cnum+"/syllabus";
     if (usehttp == 1) {      if (usehttp == 1) {
           var hostname = '$hostname';
           if (hostname != '') {
               document.linklaunch.action = 'http://'+hostname+document.linklaunch.action;
           }
         document.linklaunch.action += '?usehttp=1';          document.linklaunch.action += '?usehttp=1';
     }      }
     document.linklaunch.submit();      document.linklaunch.submit();
Removed from v.1.91  
changed lines
  Added in v.1.92

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