[LON-CAPA-cvs] cvs: loncom /auth checkauthen.pm lonacc.pm

[albertel]

albertel		Tue Sep 19 14:03:12 2006 EDT

  Modified files:              
    /loncom/auth	lonacc.pm checkauthen.pm 
  Log:
  - sigh
  
  
Index: loncom/auth/lonacc.pm
diff -u loncom/auth/lonacc.pm:1.99 loncom/auth/lonacc.pm:1.100
--- loncom/auth/lonacc.pm:1.99	Tue Sep 19 11:24:57 2006
+++ loncom/auth/lonacc.pm	Tue Sep 19 14:03:02 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Cookie Based Access Handler
 #
-# $Id: lonacc.pm,v 1.99 2006/09/19 15:24:57 albertel Exp $
+# $Id: lonacc.pm,v 1.100 2006/09/19 18:03:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -202,7 +202,7 @@
     }
 
     my $result = &sso_login($r,$lonid,$handle);
-    if (defined($result) {
+    if (defined($result)) {
 	return $result
     }
 
Index: loncom/auth/checkauthen.pm
diff -u loncom/auth/checkauthen.pm:1.8 loncom/auth/checkauthen.pm:1.9
--- loncom/auth/checkauthen.pm:1.8	Tue Sep 19 11:18:54 2006
+++ loncom/auth/checkauthen.pm	Tue Sep 19 14:03:02 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # checks for a cokkie to authenticate a user
 #
-# $Id: checkauthen.pm,v 1.8 2006/09/19 15:18:54 albertel Exp $
+# $Id: checkauthen.pm,v 1.9 2006/09/19 18:03:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -61,7 +61,7 @@
     my $lonid=$cookies{'lonID'};
     my $handle;
     if ($lonid) {
-        my $handle = $lonid->value;
+        $handle = $lonid->value;
         $handle=~s/\W//g;
         $handle = $r->dir_config('lonIDsDir')."/$handle.id";
     } else {