[LON-CAPA-cvs] cvs: loncom(version_1_3_2_nsdl) /auth lonlogin.pm

[albertel]

albertel		Mon Feb 21 13:29:25 2005 EDT

  Modified files:              (Branch: version_1_3_2_nsdl)
    /loncom/auth	lonlogin.pm 
  Log:
  - nsdl version
  
  
Index: loncom/auth/lonlogin.pm
diff -u loncom/auth/lonlogin.pm:1.62 loncom/auth/lonlogin.pm:1.62.2.1
--- loncom/auth/lonlogin.pm:1.62	Thu Dec 30 11:04:37 2004
+++ loncom/auth/lonlogin.pm	Mon Feb 21 13:29:25 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Login Screen
 #
-# $Id: lonlogin.pm,v 1.62 2004/12/30 16:04:37 raeburn Exp $
+# $Id: lonlogin.pm,v 1.62.2.1 2005/02/21 18:29:25 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -141,6 +141,7 @@
     my $otherserver='http://'.$ENV{'SERVER_NAME'};
     my $firsturl=
     ($ENV{'request.firsturl'}?$ENV{'request.firsturl'}:$ENV{'form.firsturl'});
+    my $escfirsturl=&Apache::lonnet::escape($firsturl);
 # ---------------------------------------- Are we access server and overloaded?
     if (($role eq 'access') &&
 	(($userloadpercent>100.0)||($loadpercent>100.0))) {
@@ -340,7 +341,7 @@
   <tr>
 
    <!-- Row 1 Columns 2-4 -->
-   <td width="100%" height=75 colspan=4 align="left" valign="top" bgcolor="$pgbg"><img src="$img" border=0 alt="The Learning Online Network with CAPA" /></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>
 
   <!-- The gray bar that starts the two table frames -->