--- loncom/auth/checkauthen.pm 2006/06/05 10:03:11 1.4 +++ loncom/auth/checkauthen.pm 2006/08/30 21:35:08 1.6 @@ -1,7 +1,7 @@ # The LearningOnline Network # checks for a cokkie to authenticate a user # -# $Id: checkauthen.pm,v 1.4 2006/06/05 10:03:11 foxr Exp $ +# $Id: checkauthen.pm,v 1.6 2006/08/30 21:35:08 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -36,11 +36,14 @@ use Apache::lonnet; sub handler { my ($r) = @_; - if ($r->auth_type() ne 'Basic') { + if ($r->auth_type() eq 'Basic') { 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; }