changeset 81691:232b52537e60

(find-file-confirm-inexistent-file): Make it a defcustom. Make nil the default.
author Richard M. Stallman <rms@gnu.org>
date Tue, 03 Jul 2007 02:54:27 +0000
parents 1286cf762828
children 5daa11039ff2
files lisp/files.el
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Tue Jul 03 02:52:32 2007 +0000
+++ b/lisp/files.el	Tue Jul 03 02:54:27 2007 +0000
@@ -1051,8 +1051,11 @@
 	     ,@body)
 	 (remove-hook 'minibuffer-setup-hook ,hook)))))
 
-(defvar find-file-confirm-inexistent-file t
-  "If non-nil, `find-file' will require confirmation before visiting a new file.")
+(defcustom find-file-confirm-inexistent-file nil
+  "If non-nil, `find-file' requires confirmation before visiting a new file."
+  :group 'find-file
+  :version "23.1"
+  :type 'boolean)
 
 (defun find-file-read-args (prompt mustmatch)
   (list (let ((find-file-default