[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112219: lisp/gnus/mml.el (mml-minibu
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112219: lisp/gnus/mml.el (mml-minibuffer-read-description): Use `default' insted of `initial-input' for the argument name |
Date: |
Thu, 04 Apr 2013 02:35:55 +0000 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 112219
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Thu 2013-04-04 02:35:55 +0000
message:
lisp/gnus/mml.el (mml-minibuffer-read-description): Use `default' insted of
`initial-input' for the argument name
modified:
lisp/gnus/ChangeLog
lisp/gnus/mml.el
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2013-04-03 23:19:58 +0000
+++ b/lisp/gnus/ChangeLog 2013-04-04 02:35:55 +0000
@@ -1,3 +1,9 @@
+2013-04-04 Katsumi Yamaoka <address@hidden>
+
+ * mml.el (mml-minibuffer-read-description): Use `default' insted of
+ `initial-input' for the argument name.
+ Suggested by Stefan Monnier <address@hidden>.
+
2013-04-03 Kevin Layer <address@hidden> (tiny change)
* mml.el (mml-minibuffer-read-description): Allow passing in a prefix
=== modified file 'lisp/gnus/mml.el'
--- a/lisp/gnus/mml.el 2013-04-03 23:19:58 +0000
+++ b/lisp/gnus/mml.el 2013-04-04 02:35:55 +0000
@@ -1212,8 +1212,8 @@
string
default)))
-(defun mml-minibuffer-read-description (&optional initial-input)
- (let ((description (read-string "One line description: " initial-input)))
+(defun mml-minibuffer-read-description (&optional default)
+ (let ((description (read-string "One line description: " default)))
(when (string-match "\\`[ \t]*\\'" description)
(setq description nil))
description))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112219: lisp/gnus/mml.el (mml-minibuffer-read-description): Use `default' insted of `initial-input' for the argument name,
Katsumi Yamaoka <=