summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-dired.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/gnus-dired.el')
-rw-r--r--lisp/gnus/gnus-dired.el8
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/gnus/gnus-dired.el b/lisp/gnus/gnus-dired.el
index f9502b43c06..da20c66ddbc 100644
--- a/lisp/gnus/gnus-dired.el
+++ b/lisp/gnus/gnus-dired.el
@@ -152,12 +152,8 @@ filenames."
(setq destination
(if (= (length bufs) 1)
(get-buffer (car bufs))
- (completing-read "Attach to which mail composition buffer: "
- (mapcar
- (lambda (b)
- (cons b (get-buffer b)))
- bufs)
- nil t)))
+ (gnus-completing-read "Attach to which mail composition buffer"
+ bufs t)))
;; setup a new mail composition buffer
(let ((mail-user-agent gnus-dired-mail-mode)
;; A workaround to prevent Gnus from displaying the Gnus