Mercurial > emacs

changeset 36494:05a76ee1d3e0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(insert-file-contents-literally): Bind inhibit-file-name-handlers and inhibit-file-name-operation, not jka-compr-compression-info-list.
author Dave Love <fx@gnu.org>
date Fri, 02 Mar 2001 23:50:04 +0000
parents 9a37b554054b
children 13e9844e5c71
files lisp/files.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Fri Mar 02 20:51:32 2001 +0000
+++ b/lisp/files.el	Fri Mar 02 23:50:04 2001 +0000
@@ -1178,11 +1178,12 @@
 	(after-insert-file-functions nil)
 	(coding-system-for-read 'no-conversion)
 	(coding-system-for-write 'no-conversion)
-	(jka-compr-compression-info-list nil)
 	(find-buffer-file-type-function
 	 (if (fboundp 'find-buffer-file-type)
 	     (symbol-function 'find-buffer-file-type)
-	   nil)))
+	   nil))
+	(inhibit-file-name-handlers '(jka-compr-handler image-file-handler))
+	(inhibit-file-name-operation 'insert-file-contents))
     (unwind-protect
 	(progn
 	  (fset 'find-buffer-file-type (lambda (filename) t))