version 1.242, 2004/12/08 00:56:00
|
version 1.245, 2005/01/04 14:46:17
|
Line 691 sub help_open_menu {
|
Line 691 sub help_open_menu {
|
$template .= <<"ENDTEMPLATE"; |
$template .= <<"ENDTEMPLATE"; |
<script type="text/javascript"> |
<script type="text/javascript"> |
//<!-- BEGIN LON-CAPA Internal |
//<!-- BEGIN LON-CAPA Internal |
function helpMenu(caller) { |
function helpMenu(target) { |
if (caller == 'open') { |
var caller = this; |
newWindow = window.open("","helpmenu","HEIGHT=$height,WIDTH=$width,resize=yes,scrollbars=yes" ) |
if (target == 'open') { |
caller = newWindow.document |
var newWindow = null; |
} else { |
try { |
caller = this.document |
newWindow = window.open("","helpmenu","HEIGHT=$height,WIDTH=$width,resizable=yes,scrollbars=yes" ) |
} |
} |
caller.write("<html><head><title>LON-CAPA Help Menu</title><meta http-equiv='pragma' content='no-cache'></head>") |
catch(error) { |
caller.write("<frameset rows='105,*' border='0'><frame name='bannerframe' src='$banner_link'><frame name='bodyframe' src='$details_link'></frameset>") |
writeHelp(caller); |
caller.write("</html>") |
return; |
caller.close() |
} |
if (caller == newWindow.document) { |
if (newWindow) { |
caller.focus() |
caller = newWindow; |
|
} |
} |
} |
|
writeHelp(caller); |
|
return; |
|
} |
|
function writeHelp(caller) { |
|
caller.document.write("<html><head><title>LON-CAPA Help Menu</title><meta http-equiv='pragma' content='no-cache'></head>") |
|
caller.document.write("<frameset rows='105,*' border='0'><frame name='bannerframe' src='$banner_link'><frame name='bodyframe' src='$details_link'></frameset>") |
|
caller.document.write("</html>") |
|
caller.document.close() |
|
caller.focus() |
} |
} |
// END LON-CAPA Internal --> |
// END LON-CAPA Internal --> |
</script> |
</script> |
Line 2696 ENDROLE
|
Line 2706 ENDROLE
|
if ($customtitle) { |
if ($customtitle) { |
$titleinfo = $customtitle; |
$titleinfo = $customtitle; |
} |
} |
|
# |
|
# Extra info if you are the DC |
|
my $dc_info = ''; |
|
if ($ENV{'user.adv'} && exists($ENV{'user.role.dc./'. |
|
$ENV{'course.'.$ENV{'request.course.id'}. |
|
'.domain'}.'/'})) { |
|
my $cid = $ENV{'request.course.id'}; |
|
$dc_info.= $cid.' '.$ENV{'course.'.$cid.'.internal.coursecode'}; |
|
$dc_info = '('.$dc_info.')'; |
|
} |
|
# |
return(<<ENDBODY); |
return(<<ENDBODY); |
$bodytag |
$bodytag |
<table width="100%" cellspacing="0" border="0" cellpadding="0"> |
<table width="100%" cellspacing="0" border="0" cellpadding="0"> |
Line 2705 $upperleft</td>
|
Line 2726 $upperleft</td>
|
</tr> |
</tr> |
<tr> |
<tr> |
<td rowspan="3" bgcolor="$tabbg"> |
<td rowspan="3" bgcolor="$tabbg"> |
$titleinfo |
$titleinfo $dc_info |
<td bgcolor="$tabbg" align="right"> |
<td bgcolor="$tabbg" align="right"> |
<font size="2" face="Arial, Helvetica, sans-serif"> |
<font size="2" face="Arial, Helvetica, sans-serif"> |
$ENV{'environment.firstname'} |
$ENV{'environment.firstname'} |