diff --git a/ChangeLog b/ChangeLog
index 390023ea8..92034c183 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,5 @@
+
+
 2007-06-29  Mickael Remond  <mickael.remond@process-one.net>
   	 	
 	* src/ejabberd_config.erl: Normalize hostnames in config file. If mixed
@@ -13,6 +15,10 @@
 	* doc/release_notes_1.1.3.txt: Creation.
 	* src/mod_roster_odbc.erl: Security bugfix.
 
+2006-11-23  Alexey Shchepin  <alexey@sevcom.net>
+
+	* src/eldap/eldap.erl: Bugfix (thanks to Evgeniy Khramtsov)
+
 2006-09-27  Mickael Remond  <mickael.remond@process-one.net>
 
 	* doc/release_notes_1.1.2.txt: Minor fixes.
diff --git a/src/eldap/eldap.erl b/src/eldap/eldap.erl
index 894982e82..1bf64b2b4 100644
--- a/src/eldap/eldap.erl
+++ b/src/eldap/eldap.erl
@@ -713,7 +713,7 @@ recvd_wait_bind_response(Pkt, S) ->
 	    check_id(S#eldap.id, Msg#'LDAPMessage'.messageID),
 	    case Msg#'LDAPMessage'.protocolOp of
 		{bindResponse, Result} ->
-		    case Result#'LDAPResult'.resultCode of
+		    case Result#'BindResponse'.resultCode of
 			success -> bound;
 			Error   -> {fail_bind, Error}
 		    end