[jabber.el] [PATCH] Don't prompt for anonymous authentication every time

[Marco P. <mel...@gm...>]

Hello there

Today I enabled anonymous authentication on my server with
ejabberd. Every time I connect, I get the question "Use anonymous
authentication?". This is my quick and dirty patch, which at least
appears to work.

Best wishes and thanks for jabber.el

diff --git a/jabber-sasl.el b/jabber-sasl.el
index d7992b1..f77a9a8 100644
--- a/jabber-sasl.el
+++ b/jabber-sasl.el
@@ -43,6 +43,7 @@
 		      (jabber-xml-get-children mechanism-elements 'mechanism)))
 	 (mechanism
 	  (if (and (member "ANONYMOUS" mechanisms)
+		   jabber-use-anonymous-authentication-if-available
 		   (or jabber-silent-mode (yes-or-no-p "Use anonymous authentication? ")))
 	      (sasl-find-mechanism '("ANONYMOUS"))
 	    (sasl-find-mechanism mechanisms))))
diff --git a/jabber.el b/jabber.el
index a5c66cf..fd22cda 100644
--- a/jabber.el
+++ b/jabber.el
@@ -217,6 +217,13 @@ Contents of process buffers might be useful for debugging."
   :type 'boolean
   :group 'jabber)
 
+(defcustom jabber-use-anonymous-authentication-if-available nil
+  "Prompt to use the anonymous sasl authentication if available on the server.
+Usually used for webchats, so defaults to nil"
+  :type 'boolean
+  :group 'jabber)
+
+
 ;;;###autoload
 (defconst jabber-presence-faces
  '(("" . jabber-roster-user-online)




-- 
Marco