[LON-CAPA-cvs] cvs: loncom / lond /auth localauth.pm

[albertel]

albertel		Mon Jan  8 11:24:26 2007 EDT

  Modified files:              
    /loncom	lond 
    /loncom/auth	localauth.pm 
  Log:
  - add in domain to localauthing
  
  
Index: loncom/lond
diff -u loncom/lond:1.352 loncom/lond:1.353
--- loncom/lond:1.352	Mon Nov 27 18:10:27 2006
+++ loncom/lond	Mon Jan  8 11:23:48 2007
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.352 2006/11/27 23:10:27 albertel Exp $
+# $Id: lond,v 1.353 2007/01/08 16:23:48 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -60,7 +60,7 @@
 my $status='';
 my $lastlog='';
 
-my $VERSION='$Revision: 1.352 $'; #' stupid emacs
+my $VERSION='$Revision: 1.353 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid="default";
 my $currentdomainid;
@@ -5893,7 +5893,8 @@
 	    #  Authenticate via installation specific authentcation method:
 	    $validated = &localauth::localauth($user, 
 					       $password, 
-					       $contentpwd);
+					       $contentpwd,
+					       $domain);
 	} else {			# Unrecognized auth is also bad.
 	    $validated = 0;
 	}
Index: loncom/auth/localauth.pm
diff -u loncom/auth/localauth.pm:1.3 loncom/auth/localauth.pm:1.4
--- loncom/auth/localauth.pm:1.3	Fri Aug 25 17:35:52 2006
+++ loncom/auth/localauth.pm	Mon Jan  8 11:24:26 2007
@@ -1,6 +1,6 @@
 # The LON-CAPA dummy localauthentication mechnism
 #
-# $Id: localauth.pm,v 1.3 2006/08/25 21:35:52 albertel Exp $
+# $Id: localauth.pm,v 1.4 2007/01/08 16:24:26 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -37,7 +37,7 @@
 # It is expected to return a 1 if the user is authenticated and a 0 otherwise
 # ----START LOCAL CHANGES HERE ----- DON'T DELETE THIS LINE
 sub localauth {
-    my ($username,$password,$optional_argument) = @_;
+    my ($username,$password,$optional_argument,$domain) = @_;
     return 0;
 }
 # ----END LOCAL CHANGES HERE ----- DON'T DELETE THIS LINE