[SCM] emacs-jabber branch, master, updated. 27ef29a7a21635e2e578dd207dd6b751b082ed08

[Magnus H. <leg...@us...>]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "emacs-jabber".

The branch, master has been updated
       via  27ef29a7a21635e2e578dd207dd6b751b082ed08 (commit)
      from  c98be9e194710ea6b36903ba0435450686243b10 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 27ef29a7a21635e2e578dd207dd6b751b082ed08
Author: Magnus Henoch <mag...@gm...>
Date:   Thu Apr 11 13:50:04 2013 +0100

    Copy the string received from auth-source
    
    The SASL library likes to erase the string, so make sure it doesn't
    erase the cached string.

diff --git a/jabber-util.el b/jabber-util.el
index 822ef60..c4b8a97 100644
--- a/jabber-util.el
+++ b/jabber-util.el
@@ -317,9 +317,10 @@ If FULLJIDS is non-nil, complete jids with resources."
 		      :require '(:secret))))))
     (if found
 	(let ((secret (plist-get found :secret)))
-	  (if (functionp secret)
-	      (funcall secret)
-	    secret))
+	  (copy-sequence
+	   (if (functionp secret)
+	       (funcall secret)
+	     secret)))
       (let ((prompt (format "Jabber password for %s: " bare-jid)))
 	(if (require 'password-cache nil t)
 	    ;; Need to copy the password, as sasl.el wants to erase it.

-----------------------------------------------------------------------

Summary of changes:
 jabber-util.el |    7 ++++---
 1 files changed, 4 insertions(+), 3 deletions(-)


hooks/post-receive
-- 
emacs-jabber