# HG changeset patch # User Richard M. Stallman # Date 819701834 0 # Node ID 0d1de22afac0a0c5b1ec8b6f50f59f06b66f0ab9 # Parent ec73462ad90c24806a0a6da54673a9ba8b4b7984 (rmail): Allow nonexistent file as arg. diff -r ec73462ad90c -r 0d1de22afac0 lisp/mail/rmail.el --- a/lisp/mail/rmail.el Fri Dec 22 12:13:30 1995 +0000 +++ b/lisp/mail/rmail.el Sat Dec 23 06:57:14 1995 +0000 @@ -282,8 +282,7 @@ 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