Mercurial > emacs

comparison lisp/files.el @ 83397:693e794b57bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from miles@gnu.org--gnu-2005 (patch 149-151, 629-641) Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-629 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-630 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-631 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-632 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-633 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-634 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-635 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-636 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-637 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-638 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-639 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-640 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-641 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-149 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-150 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-151 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-437
author Karoly Lorentey <lorentey@elte.hu>
date Mon, 07 Nov 2005 14:56:19 +0000
parents b31326248cf6 67bd44c70980
children 03934708f1e9
comparison
equal deleted inserted replaced
83396:201f610eb492 83397:693e794b57bf
1412 ;; Don't ask again if we already have the file or 1412 ;; Don't ask again if we already have the file or
1413 ;; if we're asked to be quiet. 1413 ;; if we're asked to be quiet.
1414 (not (or buf nowarn)) 1414 (not (or buf nowarn))
1415 (> (nth 7 attributes) large-file-warning-threshold) 1415 (> (nth 7 attributes) large-file-warning-threshold)
1416 (not (y-or-n-p 1416 (not (y-or-n-p
1417 (format "File %s is large (%sMB), really open? " 1417 (format "File %s is large (%dMB), really open? "
1418 (file-name-nondirectory filename) 1418 (file-name-nondirectory filename)
1419 (/ (nth 7 attributes) 1048576))))) 1419 (/ (nth 7 attributes) 1048576)))))
1420 (error "Aborted")) 1420 (error "Aborted"))
1421 (if buf 1421 (if buf
1422 ;; We are using an existing buffer. 1422 ;; We are using an existing buffer.