# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 983577004 0
# Node ID 05a76ee1d3e00693bdc39cda24ab052c73d31ca1
# Parent  9a37b554054bcd9d6d271be8a4de8cc2fca81013
(insert-file-contents-literally): Bind
inhibit-file-name-handlers and inhibit-file-name-operation, not
jka-compr-compression-info-list.

diff -r 9a37b554054b -r 05a76ee1d3e0 lisp/files.el
--- 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))