Mercurial > emacs
diff lisp/files.el @ 45589:0965e40e4b46
(find-file-default): Add defvar for var already used.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 30 May 2002 17:13:54 +0000 |
parents | 431fa03cb605 |
children | b234841ccaef |
line wrap: on
line diff
--- a/lisp/files.el Thu May 30 17:13:22 2002 +0000 +++ b/lisp/files.el Thu May 30 17:13:54 2002 +0000 @@ -788,6 +788,9 @@ (pop-to-buffer buffer t norecord) (raise-frame (window-frame (selected-window))))) +(defvar find-file-default nil + "Used within `find-file-read-args'.") + (defun find-file-read-args (prompt) (list (let ((find-file-default (and buffer-file-name