diff options
| author | Richard M. Stallman | 1995-07-31 14:03:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-07-31 14:03:34 +0000 |
| commit | 91b3bb19acaf56f1ff0a3aaa7b8e9e37c89d55e2 (patch) | |
| tree | 045f7986b84e03a9906fc353eda009c152069d25 | |
| parent | ff936e5324812012bfe7e8aae34ae301913abe0e (diff) | |
| download | emacs-91b3bb19acaf56f1ff0a3aaa7b8e9e37c89d55e2.tar.gz emacs-91b3bb19acaf56f1ff0a3aaa7b8e9e37c89d55e2.zip | |
(dired-read-shell-command): Pass `shell-command-history' to read-string.
| -rw-r--r-- | lisp/dired-aux.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index e4b96689d0d..ce9ec7a8cb0 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el | |||
| @@ -308,7 +308,8 @@ with a prefix argument." | |||
| 308 | (dired-mark-pop-up | 308 | (dired-mark-pop-up |
| 309 | nil 'shell files | 309 | nil 'shell files |
| 310 | (function read-string) | 310 | (function read-string) |
| 311 | (format prompt (dired-mark-prompt arg files)))) | 311 | (format prompt (dired-mark-prompt arg files)) |
| 312 | nil 'shell-command-history)) | ||
| 312 | 313 | ||
| 313 | ;; The in-background argument is only needed in Emacs 18 where | 314 | ;; The in-background argument is only needed in Emacs 18 where |
| 314 | ;; shell-command doesn't understand an appended ampersand `&'. | 315 | ;; shell-command doesn't understand an appended ampersand `&'. |