[LON-CAPA-cvs] cvs: loncom /auth lonlogin.pm
raeburn
lon-capa-cvs-allow@mail.lon-capa.org
Fri, 06 Apr 2007 22:06:03 -0000
raeburn Fri Apr 6 18:06:03 2007 EDT
Modified files:
/loncom/auth lonlogin.pm
Log:
Default is to show coursecatalog link.
Index: loncom/auth/lonlogin.pm
diff -u loncom/auth/lonlogin.pm:1.90 loncom/auth/lonlogin.pm:1.91
--- loncom/auth/lonlogin.pm:1.90 Tue Apr 3 14:47:25 2007
+++ loncom/auth/lonlogin.pm Fri Apr 6 18:06:02 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Login Screen
#
-# $Id: lonlogin.pm,v 1.90 2007/04/03 18:47:25 raeburn Exp $
+# $Id: lonlogin.pm,v 1.91 2007/04/06 22:06:02 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -386,7 +386,7 @@
</form>
ENDSERVERFORM
my $coursecatalog;
- if (!($showcoursecat == 0)) {
+ if ($showcoursecat eq '' || $showcoursecat)) {
$coursecatalog = &coursecatalog_link($lt{'catalog'});
}
if ($fullgraph) { $r->print(<<ENDTOP);