changeset 75545:4f14c21e4f44

(image-mode): Don't automatically view as image.
author Chong Yidong <cyd@stupidchicken.com>
date Tue, 30 Jan 2007 16:52:48 +0000
parents da63007980c4
children 96ca40f6d5d9
files lisp/image-mode.el
diffstat 1 files changed, 1 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/image-mode.el	Tue Jan 30 16:52:39 2007 +0000
+++ b/lisp/image-mode.el	Tue Jan 30 16:52:48 2007 +0000
@@ -60,17 +60,11 @@
   (setq major-mode 'image-mode)
   (use-local-map image-mode-map)
   (add-hook 'change-major-mode-hook 'image-toggle-display-text nil t)
-  (if (and (display-images-p)
-	   (not (get-text-property (point-min) 'display)))
-      (image-toggle-display)
-    ;; Set next vars when image is already displayed but local
-    ;; variables were cleared by kill-all-local-variables
-    (setq cursor-type nil truncate-lines t))
   (run-mode-hooks 'image-mode-hook)
   (if (display-images-p)
       (message "%s" (concat
 		     (substitute-command-keys
-		      "Type \\[image-toggle-display] to view the image as ")
+		      "Type \\[image-toggle-display] to view as ")
 		     (if (get-text-property (point-min) 'display)
 			 "text" "an image") "."))))