--- loncom/auth/lonlogin.pm 2003/02/20 01:35:27 1.36
+++ loncom/auth/lonlogin.pm 2003/03/10 14:29:37 1.38
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Login Screen
#
-# $Id: lonlogin.pm,v 1.36 2003/02/20 01:35:27 www Exp $
+# $Id: lonlogin.pm,v 1.38 2003/03/10 14:29:37 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -76,6 +76,7 @@ sub handler {
my $lonhost = $r->dir_config('lonHostID');
my $tabdir = $r->dir_config('lonTabDir');
my $include = $r->dir_config('lonIncludes');
+ my $expire = $r->dir_config('lonExpire');
# --------------------------------------------- Default values for login fields
@@ -156,10 +157,14 @@ ENDTROUBLE
# ----------------------------------------------- Apparently we are in business
my $domainlogo=&Apache::loncommon::domainlogo();
+ $servadm=~s/\,/\
/g;
+ $sysadm=~s/\,/\
/g;
+
# --------------------------------------------------- Print login screen header
$r->print(<
+
The LearningOnline Network with CAPA Login
ENDHEADER