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

Diff for /loncom/xml/lonxml.pm between versions 1.68 and 1.69

version 1.68, 2001/05/04 15:29:32 version 1.69, 2001/05/04 16:10:17
Line 40  sub xmlend { Line 40  sub xmlend {
 sub registerurl {  sub registerurl {
   return (<<ENDSCRIPT);    return (<<ENDSCRIPT);
 <script language="JavaScript">  <script language="JavaScript">
     if (window.location.pathname!="/res/adm/pages/menu.html") {      function LONCAPAreg() {
  menu=window.open("","LONCAPAmenu");         if (window.location.pathname!="/res/adm/pages/menu.html") {
  menu.currentURL=window.location.pathname;    menu=window.open("","LONCAPAmenu");
         menu.currentStale=0;    menu.currentURL=window.location.pathname;
             menu.currentStale=0;
          }
       }
     
       function LONCAPAstale() {
          if (window.location.pathname!="/res/adm/pages/menu.html") {
     menu=window.open("","LONCAPAmenu");
             menu.currentStale=1;
          }
     }      }
 </script>  </script>
 ENDSCRIPT  ENDSCRIPT
 }  }
   
   sub loadevents() {
       return 'LONCAPAreg();';
   }
   
   sub unloadevents() {
       return 'LONCAPAstale();';
   }
   
 sub register {  sub register {
   my $space;    my $space;
   my @taglist;    my @taglist;
Removed from v.1.68  
changed lines
  Added in v.1.69

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