comparison lisp/files.el @ 363:972bbb6d6ca2 r21-1-11

Import from CVS: tag r21-1-11
author cvs
date Mon, 13 Aug 2007 10:59:28 +0200
parents 7347b34c275b
children 30d2cfa1092a
comparison
equal deleted inserted replaced
362:1e474c183006 363:972bbb6d6ca2
882 find-file-hooks, etc. 882 find-file-hooks, etc.
883 This function ensures that none of these modifications will take place." 883 This function ensures that none of these modifications will take place."
884 (let ((file-name-handler-alist nil) 884 (let ((file-name-handler-alist nil)
885 (format-alist nil) 885 (format-alist nil)
886 (after-insert-file-functions nil) 886 (after-insert-file-functions nil)
887 (coding-system-for-read 'binary)
887 (find-buffer-file-type-function 888 (find-buffer-file-type-function
888 (if (fboundp 'find-buffer-file-type) 889 (if (fboundp 'find-buffer-file-type)
889 (symbol-function 'find-buffer-file-type) 890 (symbol-function 'find-buffer-file-type)
890 nil))) 891 nil)))
891 (unwind-protect 892 (unwind-protect