Diff for /loncom/xml/lonxml.pm between versions 1.87 and 1.89

version 1.87, 2001/06/08 17:52:03 version 1.89, 2001/06/09 12:32:42
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,6/3,6/8 Gerd Kortemeyer  # 6/2,6/3,6/8,6/9 Gerd Kortemeyer
   
 package Apache::lonxml;   package Apache::lonxml; 
 use vars   use vars 
Line 106  sub registerurl { Line 106  sub registerurl {
  $hwkadd.=(<<ENDSUBM);   $hwkadd.=(<<ENDSUBM);
                      menu.switchbutton                       menu.switchbutton
            (7,1,'subm.gif','view sub','missions',             (7,1,'subm.gif','view sub','missions',
                 'gopost("/adm/grades","submission")');                  'gocmd("/adm/grades","submission")');
 ENDSUBM  ENDSUBM
             }              }
     if (&Apache::lonnet::allowed('mgr',$ENV{'request.course.id'})) {      if (&Apache::lonnet::allowed('mgr',$ENV{'request.course.id'})) {
  $hwkadd.=(<<ENDGRDS);   $hwkadd.=(<<ENDGRDS);
                      menu.switchbutton                       menu.switchbutton
            (7,2,'pgrd.gif','problem','grades',             (7,2,'pgrd.gif','problem','grades',
                 'gopost("/adm/grades","")');                  'gocmd("/adm/grades","viewgrades")');
 ENDGRDS  ENDGRDS
             }              }
     if (&Apache::lonnet::allowed('opa',$ENV{'request.course.id'})) {      if (&Apache::lonnet::allowed('opa',$ENV{'request.course.id'})) {
  $hwkadd.=(<<ENDPARM);   $hwkadd.=(<<ENDPARM);
                      menu.switchbutton                       menu.switchbutton
            (7,3,'pparm.gif','problem','parms',             (7,3,'pparm.gif','problem','parms',
                 'gopost("/adm/parmset","set")');                  'gocmd("/adm/parmset","set")');
 ENDPARM  ENDPARM
             }              }
  }   }
Line 154  ENDPARM Line 154  ENDPARM
           menu.switchbutton            menu.switchbutton
             (3,1,'reload.gif','return','location','go(currentURL)');              (3,1,'reload.gif','return','location','go(currentURL)');
           menu.menucltim=menu.setTimeout(            menu.menucltim=menu.setTimeout(
  'clearbut(2,1);clearbut(2,3);clearbut(8,1);clearbut(8,2);clearbut(8,3);',   'clearbut(2,1);clearbut(2,3);clearbut(7,1);clearbut(7,2);clearbut(7,3);'.
    'clearbut(8,1);clearbut(8,2);clearbut(8,3);',
   2000);    2000);
   
       }        }

Removed from v.1.87  
changed lines
  Added in v.1.89


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