auth-source.el (auth-source-format-prompt): Don't get confused by any "\\" in replace...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 66d0fc9..76595f3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-02-07  Gábor Vida  <gabor.v.vida@ericsson.com>  (tiny change)
+
+       * auth-source.el (auth-source-format-prompt): Don't get confused by
+       any "\" in replacement text.  (Bug#13637)
+
 2013-01-30  Christopher Schmidt  <christopher@ch.ristopher.com>
 
        * gnus-int.el (gnus-backend-trace-elapsed): New variable.

diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 8144d5a..f40d32a 100644 (file)
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -923,7 +923,7 @@ while \(:host t) would find all host entries."
       (when (and c v)
         (setq prompt (replace-regexp-in-string (format "%%%c" c)
                                                (format "%s" v)
-                                               prompt)))))
+                                               prompt nil t)))))
   prompt)
 
 (defun auth-source-ensure-strings (values)