# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1183431267 0
# Node ID 232b52537e609680089c71e07f2b1e67964b74c5
# Parent  1286cf76282856a83d3ed364f888dab1866df825
(find-file-confirm-inexistent-file): Make it a defcustom.
Make nil the default.

diff -r 1286cf762828 -r 232b52537e60 lisp/files.el
--- 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