--- loncom/lond 2007/01/15 01:08:28 1.356 +++ loncom/lond 2007/01/19 02:58:17 1.357 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.356 2007/01/15 01:08:28 raeburn Exp $ +# $Id: lond,v 1.357 2007/01/19 02:58:17 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -44,7 +44,6 @@ use Digest::MD5 qw(md5_hex); use GDBM_File; use Authen::Krb4; use Authen::Krb5; -use lib '/home/httpd/lib/perl/'; use localauth; use localenroll; use localstudentphoto; @@ -60,7 +59,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.356 $'; #' stupid emacs +my $VERSION='$Revision: 1.357 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -5896,6 +5895,10 @@ sub validate_user { $password, $contentpwd, $domain); + if ($validate < 0) { + &logthis("localauth for $contentpwd $user:$domain returned a $validated"); + $validated = 0; + } } else { # Unrecognized auth is also bad. $validated = 0; }