version 1.3, 2003/08/29 14:10:40
|
version 1.4, 2003/08/29 14:50:13
|
Line 1
|
Line 1
|
# The LearningOnline Network |
# The LearningOnline Network |
# Login Screen |
# Login Screen NSDL version |
# |
# |
# $Id$ |
# $Id$ |
# |
# |
Line 101 sub handler {
|
Line 101 sub handler {
|
my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
my $otherserver='http://'.$ENV{'SERVER_NAME'}; |
my $firsturl= |
my $firsturl= |
($ENV{'request.firsturl'}?$ENV{'request.firsturl'}:$ENV{'form.firsturl'}); |
($ENV{'request.firsturl'}?$ENV{'request.firsturl'}:$ENV{'form.firsturl'}); |
|
my $escfirsturl=&Apache::lonnet::escape($firsturl); |
# ---------------------------------------- Are we access server and overloaded? |
# ---------------------------------------- Are we access server and overloaded? |
if (($role eq 'access') && |
if (($role eq 'access') && |
(($userloadpercent>100.0)||($loadpercent>100.0))) { |
(($userloadpercent>100.0)||($loadpercent>100.0))) { |
Line 273 ENDSERVERFORM
|
Line 274 ENDSERVERFORM
|
<tr> |
<tr> |
|
|
<!-- Row 1 Columns 2-4 --> |
<!-- Row 1 Columns 2-4 --> |
<td width="100%" colspan=4 bgcolor="$sidebg"><h1><font color="$pgbg">Welcome to the LON-CAPA NSDL Gateway</font></h1><a href="/cgi-bin/signon.pl"><h3><font color="$pgbg">Sign up for a Guest Login</font></h3></a></td> |
<td width="100%" colspan=4 bgcolor="$sidebg"><h1><font color="$pgbg">Welcome to the LON-CAPA NSDL Gateway</font></h1><a href="/cgi-bin/signon.pl?$escfirsturl"><h3><font color="$pgbg">Sign up for a Guest Login</font></h3></a></td> |
</tr> |
</tr> |
|
|
<!-- The gray bar that starts the two table frames --> |
<!-- The gray bar that starts the two table frames --> |