emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/files.el,v


From: Chong Yidong
Subject: [Emacs-diffs] Changes to emacs/lisp/files.el,v
Date: Mon, 19 Mar 2007 18:29:56 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      07/03/19 18:29:56

Index: files.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/files.el,v
retrieving revision 1.888
retrieving revision 1.889
diff -u -b -r1.888 -r1.889
--- files.el    19 Mar 2007 05:40:20 -0000      1.888
+++ files.el    19 Mar 2007 18:29:56 -0000      1.889
@@ -1700,16 +1700,6 @@
   (if (file-directory-p filename)
       (signal 'file-error (list "Opening input file" "file is a directory"
                                 filename)))
-  ;; Check whether the file is uncommonly large (see find-file-noselect):
-  (let (size)
-    (when (and large-file-warning-threshold
-              (setq size (nth 7 (file-attributes filename)))
-              (> size large-file-warning-threshold)
-              (not (y-or-n-p
-                    (format "File %s is large (%dMB), really insert? "
-                            (file-name-nondirectory filename)
-                            (/ size 1048576)))))
-      (error "Aborted")))
   (let* ((buffer (find-buffer-visiting (abbreviate-file-name (file-truename 
filename))
                                        #'buffer-modified-p))
          (tem (funcall insert-func filename)))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]