diff options
| author | Romain Francoise <romain@orebokech.com> | 2005-09-24 13:45:50 +0000 |
|---|---|---|
| committer | Romain Francoise <romain@orebokech.com> | 2005-09-24 13:45:50 +0000 |
| commit | d88a70a010ef76c08f37497b551a4fc620059096 (patch) | |
| tree | 945d68ccb7d849f9161f6567bd6ae6f9ab1898e7 /lisp/mh-e/mh-comp.el | |
| parent | 5b76833fd5dc63730baaa8a504aa3df4a4c8fc7a (diff) | |
| download | emacs-d88a70a010ef76c08f37497b551a4fc620059096.tar.gz | |
2005-09-24 Emilio C. Lopes <eclig@gmx.net>
* mh-mime.el (mh-compose-forward, mh-mhn-compose-forw):
* mh-comp.el (mh-insert-letter):
* mh-utils.el (mh-prompt-for-folder):
Follow convention for reading with the minibuffer.
Diffstat (limited to 'lisp/mh-e/mh-comp.el')
| -rw-r--r-- | lisp/mh-e/mh-comp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el index 59111098bf1..a99c05debea 100644 --- a/lisp/mh-e/mh-comp.el +++ b/lisp/mh-e/mh-comp.el @@ -1424,10 +1424,10 @@ not indent and do not delete headers. Leaves the mark before the letter and point after it." (interactive (list (mh-prompt-for-folder "Message from" mh-sent-from-folder nil) - (read-input (format "Message number%s: " + (read-input (concat "Message number" (if (numberp mh-sent-from-msg) - (format " [%d]" mh-sent-from-msg) - ""))) + (format " (default %d): " mh-sent-from-msg) + ": "))) current-prefix-arg)) (save-restriction (narrow-to-region (point) (point)) |