changeset 43834:aa881082fd04

(image-type-from-file-header): Make temporary buffer unibyte.
author Pavel Janík <Pavel@Janik.cz>
date Mon, 11 Mar 2002 13:32:22 +0000
parents 37bc1e73d4b3
children d9af887af46c
files lisp/image.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/image.el	Mon Mar 11 13:31:50 2002 +0000
+++ b/lisp/image.el	Mon Mar 11 13:32:22 2002 +0000
@@ -99,6 +99,7 @@
     (setq file (expand-file-name file data-directory)))
   (setq file (expand-file-name file))
   (let ((header (with-temp-buffer
+		  (set-buffer-multibyte nil)
 		  (insert-file-contents-literally file nil 0 256)
 		  (buffer-string))))
     (image-type-from-data header)))