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); |
|
|
} |
} |