|
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 --> |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonlogin.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / nsdl / nsdlloncapaorg