# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1022778834 0
# Node ID 0965e40e4b463909f90a9234cd99708473945d4d
# Parent  ac048d849245e42076e2da9949402423f61d6dbf
(find-file-default): Add defvar for var already used.

diff -r ac048d849245 -r 0965e40e4b46 lisp/files.el
--- 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