[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);