diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-04-04 02:35:55 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2013-04-04 02:35:55 +0000 |
| commit | aab96513490ee93962c2268887ba3cd6393c32ac (patch) | |
| tree | 9d9214b8de37784ef461635b53b4dec61c68f723 /lisp/gnus/mml.el | |
| parent | f3d3eaf070d28678d0f094316658037ee411068b (diff) | |
| download | emacs-aab96513490ee93962c2268887ba3cd6393c32ac.tar.gz | |
lisp/gnus/mml.el (mml-minibuffer-read-description): Use `default' insted of `initial-input' for the argument name
Diffstat (limited to 'lisp/gnus/mml.el')
| -rw-r--r-- | lisp/gnus/mml.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index 3c79d18b0c3..91f0e325182 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el @@ -1212,8 +1212,8 @@ If not set, `default-directory' will be used." 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)) |