version 1.37, 2001/02/13 18:42:06
|
version 1.38, 2001/02/19 14:53:54
|
Line 55 sub createmenu {
|
Line 55 sub createmenu {
|
my ($which,$request)=@_; |
my ($which,$request)=@_; |
if ($which eq 'grade') { |
if ($which eq 'grade') { |
$request->print('<script language="JavaScript"> |
$request->print('<script language="JavaScript"> |
hwkmenu=window.open("/res/adm/pages/homeworkmenu.html","LONCAPAhomeworkmenu", |
hwkmenu=window.open("/res/adm/pages/homeworkmenu.html","homeworkremote", |
"height=350,width=150,menubar=no"); |
"height=350,width=150,menubar=no"); |
</script>'); |
</script>'); |
} |
} |