Merge from emacs--devo--0

[gnus] / lisp / gnus-art.el

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index c6eeb1a..2dc95ea 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3944,7 +3944,7 @@ The directory to save in defaults to `gnus-article-save-directory'."
               gnus-last-shell-command)
              ((stringp command)
               command)
-             (t (read-string
+             (t (gnus-read-shell-command
                  (format
                   "Shell command on %s: "
                   (if (and gnus-number-of-articles-to-be-saved