[gnus git] branch master updated: m0-13-101-g386e4d3 =1= auth-source.el (auth-source-ensure-strings): Don't make a list out of 't' (Bug#22188)

       via  386e4d3ea54d4898bd5c7447991a116a1ef2c11f (commit)
      from  239a1dbe33e801128b62b9f2cda70e6227c42a8b (commit)


- Log -----------------------------------------------------------------
commit 386e4d3ea54d4898bd5c7447991a116a1ef2c11f
Author: Eli Zaretskii <[email protected]>
Date:   Thu Dec 17 22:58:38 2015 +0000

    auth-source.el (auth-source-ensure-strings): Don't make a list out of 't' (Bug#22188)
    
    Synch with the emacs-25 branch.
    The changes having not been merged to the Emacs trunk are in:
    http://www.jpl.org/ftp/pub/tmp/MaGnus-to-Emacs-trunk-unfinished.patch
    
    * auth-source.el (auth-source-ensure-strings):
    Don't make a list out of 't'.  (Bug#22188)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4e1430e..aab4aec 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-12-17  Eli Zaretskii  <[email protected]>
+
+	* auth-source.el (auth-source-ensure-strings):
+	Don't make a list out of 't'.  (Bug#22188)
+
 2015-12-16  Katsumi Yamaoka  <[email protected]>
 
 	* dgnushack.el (byte-optimize-apply): Make the use-mapcan advice work
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index d263f78..45ff3b7 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -929,13 +929,15 @@ while \(:host t) would find all host entries."
   prompt)
 
 (defun auth-source-ensure-strings (values)
+  (if (eq values t)
+      values
     (unless (listp values)
       (setq values (list values)))
     (mapcar (lambda (value)
 	      (if (numberp value)
 		  (format "%s" value)
 		value))
-          values))
+	    values)))
 
 ;;; Backend specific parsing: netrc/authinfo backend
 

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

Summary of changes:
 lisp/ChangeLog      |    5 +++++
 lisp/auth-source.el |   16 +++++++++-------
 2 files changed, 14 insertions(+), 7 deletions(-)

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 "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project