diff options
Diffstat (limited to 'lisp/mh-e')
| -rw-r--r-- | lisp/mh-e/mh-mime.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/mh-e/mh-mime.el b/lisp/mh-e/mh-mime.el index 5eada03ba46..865f817da5b 100644 --- a/lisp/mh-e/mh-mime.el +++ b/lisp/mh-e/mh-mime.el @@ -379,10 +379,8 @@ do the work." ((and (or prompt (equal t mh-mime-save-parts-default-directory)) mh-mime-save-parts-directory) - (read-directory-name (format-prompt - "Store in directory" - mh-mime-save-parts-directory) - "" mh-mime-save-parts-directory t "")) + (read-directory-name "Store in directory: " + mh-mime-save-parts-directory nil t)) ((stringp mh-mime-save-parts-default-directory) mh-mime-save-parts-default-directory) (t |