Diff for /loncom/xml/lonxml.pm between versions 1.84 and 1.85

version 1.84, 2001/06/02 03:59:59 version 1.85, 2001/06/02 19:55:46
Line 9 Line 9
 # 5/10 Scott Harrison  # 5/10 Scott Harrison
 # 5/26 Gerd Kortemeyer  # 5/26 Gerd Kortemeyer
 # 5/27 H. K. Ng  # 5/27 H. K. Ng
   # 6/2 Gerd Kortemeyer
   
 package Apache::lonxml;   package Apache::lonxml; 
 use vars   use vars 
Line 106  sub registerurl { Line 107  sub registerurl {
   menu=window.open("","LONCAPAmenu");    menu=window.open("","LONCAPAmenu");
   menu.currentURL=window.location.pathname;    menu.currentURL=window.location.pathname;
           menu.currentStale=0;            menu.currentStale=0;
             menu.clearbut(3,1);
             menu.switchbutton
          (8,1,'eval.gif','evaluate','this','gopost("/adm/evaluate",currentURL)');
             menu.switchbutton
       (8,2,'fdbk.gif','feedback','on this','gopost("/adm/feedback",currentURL)');
             menu.switchbutton
        (8,3,'prt.gif','prepare','printout','gopost("/adm/printout",currentURL)');
             menu.switchbutton
          (2,1,'back.gif','backward','','gopost("/adm/flip","back:"+currentURL)');
             menu.switchbutton
        (2,3,'forw.gif','forward','','gopost("/adm/flip","forward:"+currentURL)');
        }         }
     }      }
       
Line 113  sub registerurl { Line 125  sub registerurl {
        if (window.location.pathname!="/res/adm/pages/menu.html") {         if (window.location.pathname!="/res/adm/pages/menu.html") {
   menu=window.open("","LONCAPAmenu");    menu=window.open("","LONCAPAmenu");
           menu.currentStale=1;            menu.currentStale=1;
             menu.clearbut(2,1);
             menu.clearbut(2,3);
             menu.clearbut(8,1);
             menu.clearbut(8,2);
             menu.clearbut(8,3);
             menu.switchbutton
               (3,1,'reload.gif','return','location','go(currentURL)');
        }         }
     }      }
 // END LON-CAPA Internal  // END LON-CAPA Internal

Removed from v.1.84  
changed lines
  Added in v.1.85


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