--- loncom/auth/checkauthen.pm	2006/06/02 19:29:21	1.3
+++ loncom/auth/checkauthen.pm	2006/09/07 17:07:26	1.7
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # checks for a cokkie to authenticate a user
 #
-# $Id: checkauthen.pm,v 1.3 2006/06/02 19:29:21 albertel Exp $
+# $Id: checkauthen.pm,v 1.7 2006/09/07 17:07:26 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -36,11 +36,14 @@ use Apache::lonnet;
 sub handler {
     my ($r) = @_;
 
-    if ($r->auth_type() eq 'Basic') {
+    if ($r->auth_type() ne 'LONCAPA') {
 	return DECLINED;
     }
     my $fail = FORBIDDEN; 
     if ($r->dir_config('lonOtherAuthen') eq 'yes') {
+	if (defined($r->dir_config('lonOtherAuthenType'))) {
+            $r->auth_type($r->dir_config('lonOtherAuthenType'));
+        }
 	#&Apache::lonnet::logthis("other authen");
 	$fail = DECLINED;
     }
@@ -65,7 +68,6 @@ sub handler {
 	    return OK;
 	}
     }
-
     return $fail;
 }