Commit b5e10b23 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(rmail): Allow nonexistent file as arg.

parent c7de13da
......@@ -282,8 +282,7 @@ have a chance to specify a file name with the minibuffer.
If `rmail-display-summary' is non-nil, make a summary for this RMAIL file."
(interactive (if current-prefix-arg
(list (read-file-name "Run rmail on RMAIL file: "
nil nil t))))
(list (read-file-name "Run rmail on RMAIL file: "))))
(let* ((file-name (expand-file-name (or file-name-arg rmail-file-name)))
(existed (get-file-buffer file-name)))
;; Like find-file, but in the case where a buffer existed
......
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