version 1.33, 2003/02/18 16:29:15
|
version 1.36, 2003/02/20 01:35:27
|
Line 170 ENDHEADER
|
Line 170 ENDHEADER
|
} |
} |
|
|
# ----------------------------------------------------------- Front page design |
# ----------------------------------------------------------- Front page design |
my $pgbg=&Apache::loncommon::designparm('login.pgbg'); |
my $pgbg= |
my $font=&Apache::loncommon::designparm('login.font'); |
($fullgraph?&Apache::loncommon::designparm('login.pgbg'):'#FFFFFF'); |
my $link=&Apache::loncommon::designparm('login.link'); |
my $font= |
my $vlink=&Apache::loncommon::designparm('login.vlink'); |
($fullgraph?&Apache::loncommon::designparm('login.font'):'#000000'); |
|
my $link= |
|
($fullgraph?&Apache::loncommon::designparm('login.link'):'#0000FF'); |
|
my $vlink= |
|
($fullgraph?&Apache::loncommon::designparm('login.vlink'):'#0000FF'); |
my $alink=&Apache::loncommon::designparm('login.alink'); |
my $alink=&Apache::loncommon::designparm('login.alink'); |
my $mainbg=&Apache::loncommon::designparm('login.mainbg'); |
my $mainbg= |
my $sidebg=&Apache::loncommon::designparm('login.sidebg'); |
($fullgraph?&Apache::loncommon::designparm('login.mainbg'):'#FFFFFF'); |
|
my $sidebg= |
|
($fullgraph?&Apache::loncommon::designparm('login.sidebg'):'#FFFFFF'); |
my $logo=&Apache::loncommon::designparm('login.logo'); |
my $logo=&Apache::loncommon::designparm('login.logo'); |
my $img=&Apache::loncommon::designparm('login.img'); |
my $img=&Apache::loncommon::designparm('login.img'); |
|
|
Line 197 ENDHEADER
|
Line 203 ENDHEADER
|
=this.document.client.elements.udom.value; |
=this.document.client.elements.udom.value; |
|
|
this.document.server.elements.imagesuppress.value |
this.document.server.elements.imagesuppress.value |
=this.document.client.elements.imagesuppress.value; |
=this.document.client.elements.imagesuppress.checked; |
|
|
this.document.server.elements.embedsuppress.value |
this.document.server.elements.embedsuppress.value |
=this.document.client.elements.embedsuppress.value; |
=this.document.client.elements.embedsuppress.checked; |
|
|
|
this.document.server.elements.appletsuppress.value |
|
=this.document.client.elements.appletsuppress.checked; |
|
|
this.document.server.elements.fontenhance.value |
this.document.server.elements.fontenhance.value |
=this.document.client.elements.fontenhance.value; |
=this.document.client.elements.fontenhance.checked; |
|
|
this.document.server.elements.blackwhite.value |
this.document.server.elements.blackwhite.value |
=this.document.client.elements.blackwhite.value; |
=this.document.client.elements.blackwhite.checked; |
|
|
|
this.document.server.elements.remember.value |
|
=this.document.client.elements.remember.checked; |
|
|
uextkey=this.document.client.elements.uextkey.value; |
uextkey=this.document.client.elements.uextkey.value; |
lextkey=this.document.client.elements.lextkey.value; |
lextkey=this.document.client.elements.lextkey.value; |
Line 235 ENDSCRIPT
|
Line 247 ENDSCRIPT
|
<input type="hidden" name="upass" value="" /> |
<input type="hidden" name="upass" value="" /> |
<input type="hidden" name="udom" value="" /> |
<input type="hidden" name="udom" value="" /> |
<input type="hidden" name="imagesuppress" value="" /> |
<input type="hidden" name="imagesuppress" value="" /> |
|
<input type="hidden" name="appletsuppress" value="" /> |
<input type="hidden" name="embedsuppress" value="" /> |
<input type="hidden" name="embedsuppress" value="" /> |
<input type="hidden" name="fontenhance" value="" /> |
<input type="hidden" name="fontenhance" value="" /> |
<input type="hidden" name="blackwhite" value="" /> |
<input type="hidden" name="blackwhite" value="" /> |
|
<input type="hidden" name="remember" value="" /> |
</form> |
</form> |
ENDSERVERFORM |
ENDSERVERFORM |
if ($fullgraph) { $r->print(<<ENDTOP); |
if ($fullgraph) { $r->print(<<ENDTOP); |
Line 295 ENDSERVERFORM
|
Line 309 ENDSERVERFORM
|
<td align="center" valign="middle" bgcolor="$sidebg"> |
<td align="center" valign="middle" bgcolor="$sidebg"> |
ENDTOP |
ENDTOP |
} else { |
} else { |
$r->print('<font color="#FFFFFF"><h1>The Learning<i>Online</i> Network with CAPA</h1><h1>Text-based Interface Login</h1></font>'); |
$r->print('<h1>The Learning<i>Online</i> Network with CAPA</h1><h2>Text-based Interface Login</h2>'); |
} |
} |
$r->print('<form name="client" onsubmit="return(send())">'); |
$r->print('<form name="client" onsubmit="return(send())">'); |
unless ($fullgraph) { |
unless ($fullgraph) { |
$r->print(<<ENDACCESSOPTIONS); |
$r->print(<<ENDACCESSOPTIONS); |
<table bgcolor="#AAAAAA" cellspacing="3" cellpadding="3"> |
<h3>Select Accessibility Options</h3> |
<tr><th>Select Accessibility Options</th></tr> |
|
<tr> |
|
<td bgcolor="#FFFFFF"> |
|
<input type="checkbox" name="imagesuppress" /> Suppress rendering of images<br /> |
<input type="checkbox" name="imagesuppress" /> Suppress rendering of images<br /> |
|
<input type="checkbox" name="appletsuppress" /> Suppress Java applets<br /> |
<input type="checkbox" name="embedsuppress" /> Suppress rendering of embedded multimedia<br /> |
<input type="checkbox" name="embedsuppress" /> Suppress rendering of embedded multimedia<br /> |
<input type="checkbox" name="fontenhance" /> Increase font size<br /> |
<input type="checkbox" name="fontenhance" /> Increase font size<br /> |
<input type="checkbox" name="blackwhite" /> Switch to black and white mode<br /></td></tr></table> |
<input type="checkbox" name="blackwhite" /> Switch to black and white mode<br /> |
|
<p>If you have accessibility needs that are not addressed by this interface, |
|
please |
|
contact the system administrator at <tt>$sysadm</tt>.</p><br /> |
|
<input type="checkbox" name="remember" /> Remember these settings for next login<hr /> |
ENDACCESSOPTIONS |
ENDACCESSOPTIONS |
} else { |
} else { |
$r->print(<<ENDNOOPT); |
$r->print(<<ENDNOOPT); |
<input type="hidden" name="imagesuppress" value="" /> |
<input type="hidden" name="imagesuppress" value="" /> |
<input type="hidden" name="embedsuppress" value="" /> |
<input type="hidden" name="embedsuppress" value="" /> |
|
<input type="hidden" name="appletsuppress" value="" /> |
<input type="hidden" name="fontenhance" value="" /> |
<input type="hidden" name="fontenhance" value="" /> |
<input type="hidden" name="blackwhite" value="" /> |
<input type="hidden" name="blackwhite" value="" /> |
|
<input type="hidden" name="remember" value="" /> |
ENDNOOPT |
ENDNOOPT |
} |
} |
$r->print(<<ENDLOGIN); |
$r->print(<<ENDLOGIN); |