diff options
| author | Richard M. Stallman | 1993-01-09 13:54:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-01-09 13:54:05 +0000 |
| commit | 22faf1718449fe877e9df7caadf770573949bbaa (patch) | |
| tree | 766a4c19e881a4ed9d33755dfed28d56cdef85fb | |
| parent | d2cadc4b9d55cb0c8f26c74a197d17bfd5f618b0 (diff) | |
| download | emacs-22faf1718449fe877e9df7caadf770573949bbaa.tar.gz emacs-22faf1718449fe877e9df7caadf770573949bbaa.zip | |
(dired-mark-read-regexp): Give dired-read-regexp 1 arg.
| -rw-r--r-- | lisp/dired-aux.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index 75d0f17fd93..e7c42486e5a 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el | |||
| @@ -1296,8 +1296,7 @@ Type SPC or `y' to %s one match, DEL or `n' to skip to next, | |||
| 1296 | (if whole-path nil current-prefix-arg)) | 1296 | (if whole-path nil current-prefix-arg)) |
| 1297 | (regexp | 1297 | (regexp |
| 1298 | (dired-read-regexp | 1298 | (dired-read-regexp |
| 1299 | (concat (if whole-path "Path " "") operation " from (regexp): ") | 1299 | (concat (if whole-path "Path " "") operation " from (regexp): "))) |
| 1300 | dired-flagging-regexp)) | ||
| 1301 | (newname | 1300 | (newname |
| 1302 | (read-string | 1301 | (read-string |
| 1303 | (concat (if whole-path "Path " "") operation " " regexp " to: ")))) | 1302 | (concat (if whole-path "Path " "") operation " " regexp " to: ")))) |