From f78aa7fa438171b19bb8da338bc67d61b336f0ef Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Fri, 16 May 2003 03:06:50 +0000
Subject: [PATCH] Fixed a bug where users could authenticate with no password
 if an administrator did not specify a connect dn for them.

---
 lib/WebGUI/Authentication/LDAP.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/Authentication/LDAP.pm b/lib/WebGUI/Authentication/LDAP.pm
index 47e0e523e..3e322dc95 100644
--- a/lib/WebGUI/Authentication/LDAP.pm
+++ b/lib/WebGUI/Authentication/LDAP.pm
@@ -40,6 +40,7 @@ sub authenticate {
 	$userId = $_[0]->[0];
         my $identifier = $_[0]->[1];
 	$userData = WebGUI::Authentication::getParams($userId, 'LDAP');
+	return "No connect DN specified." if ($$userData{connectDN} eq "");
 	if ($uri = URI->new($userData->{ldapUrl})) {
         	$ldap = Net::LDAP->new($uri->host, (port=>$uri->port)) or $result = WebGUI::International::get(2,'Auth/LDAP');
 		return $result if $result;