[cl-xmpp-cvs] CVS update: cl-xmpp/cl-xmpp-sasl.lisp

[Erik Enge]

Update of /project/cl-xmpp/cvsroot/cl-xmpp
In directory common-lisp.net:/tmp/cvs-serv1234

Modified Files:
	cl-xmpp-sasl.lisp 
Log Message:

Date: Fri Nov 11 23:31:38 2005
Author: eenge

Index: cl-xmpp/cl-xmpp-sasl.lisp
diff -u cl-xmpp/cl-xmpp-sasl.lisp:1.2 cl-xmpp/cl-xmpp-sasl.lisp:1.3
--- cl-xmpp/cl-xmpp-sasl.lisp:1.2	Fri Nov 11 22:20:20 2005
+++ cl-xmpp/cl-xmpp-sasl.lisp	Fri Nov 11 23:31:38 2005
@@ -1,4 +1,4 @@
-;;;; $Id: cl-xmpp-sasl.lisp,v 1.2 2005/11/11 21:20:20 eenge Exp $
+;;;; $Id: cl-xmpp-sasl.lisp,v 1.3 2005/11/11 22:31:38 eenge Exp $
 ;;;; $Source: /project/cl-xmpp/cvsroot/cl-xmpp/cl-xmpp-sasl.lisp,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -26,6 +26,7 @@
 					   :authentication-id username
 					   :password password
 					   :service "xmpp"
+					   :realm (hostname connection)
 					   :host (hostname connection)))
 	       (response (sasl:client-step sasl-client challenge-string))
 	       (base64-response (base64:string-to-base64-string response)))