Commit 22faf171 authored by Richard M. Stallman's avatar Richard M. Stallman

(dired-mark-read-regexp): Give dired-read-regexp 1 arg.

parent d2cadc4b
......@@ -1296,8 +1296,7 @@ Type SPC or `y' to %s one match, DEL or `n' to skip to next,
(if whole-path nil current-prefix-arg))
(regexp
(dired-read-regexp
(concat (if whole-path "Path " "") operation " from (regexp): ")
dired-flagging-regexp))
(concat (if whole-path "Path " "") operation " from (regexp): ")))
(newname
(read-string
(concat (if whole-path "Path " "") operation " " regexp " to: "))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment