[gnus git] branch master updated: n0-13-101-g219e1b4 =1= Show the default in the prompt when prompting for token creation.

       via  219e1b4f2ae915ca712ed4fb049dde83cf3f6a35 (commit)
      from  fd6577451ba744dcd1323bb37c979c22242f9738 (commit)


- Log -----------------------------------------------------------------
commit 219e1b4f2ae915ca712ed4fb049dde83cf3f6a35
Author: Ted Zlatanov <[email protected]>
Date:   Sun Mar 13 09:00:37 2011 -0500

    Show the default in the prompt when prompting for token creation.
    
    * auth-source.el (auth-source-netrc-create): Show the default in the
    prompt when prompting for token creation.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 74fbc6b..9af5af4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-03-13  Teodor Zlatanov  <[email protected]>
+
+	* auth-source.el (auth-source-netrc-create): Show the default in the
+	prompt when prompting for token creation.
+
 2011-03-12  Teodor Zlatanov  <[email protected]>
 
 	* auth-source.el (auth-source-format-prompt): Always convert the value
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index d82e082..dd1b83d 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -1110,6 +1110,10 @@ See `auth-source-search' for details on SPEC."
                 ;; special case prompt for passwords
                 (read-passwd prompt))
                ((null data)
+                (when default
+                  (setq
+                   prompt
+                   (concat prompt (format "(default %s) " default))))
                 (read-string prompt nil nil default))
                (t (or data default))))
 

-----------------------------------------------------------------------
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 |    4 ++++
 2 files changed, 9 insertions(+), 0 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