--- loncom/auth/lonlogin.pm 2009/05/16 01:19:29 1.121 +++ loncom/auth/lonlogin.pm 2009/05/22 17:01:28 1.122 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.121 2009/05/16 01:19:29 raeburn Exp $ +# $Id: lonlogin.pm,v 1.122 2009/05/22 17:01:28 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -264,6 +264,7 @@ my $now=time; my $js = (< +// ENDSCRIPT @@ -381,7 +383,7 @@ my $contactblock = &contactdisplay(\%lt, $version,$authdomain,\$helpdeskscript); my $loginform=(< +
:
@@ -477,8 +479,10 @@ $r->print(< $helpdeskscript @@ -505,6 +509,7 @@ sub contactdisplay { my $thisurl = &escape('/adm/login'); $$helpdeskscript = <<"ENDSCRIPT"; ENDSCRIPT }