* doc-view.el (doc-view-mode):

* image-mode.el (image-mode): Put property mode-class=special.
(Bug#4896)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6982e48..7edff43 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2010-02-05  Juri Linkov  <juri@jurta.org>
+
+       * doc-view.el (doc-view-mode):
+       * image-mode.el (image-mode): Put property mode-class=special.
+       (Bug#4896)
+
 2010-02-05  Mark A. Hershberger  <mah@everybody.org>
 
        * vc-svn.el (vc-svn-revision-table): New function.

diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 5b84fc3..77a075b 100644 (file)
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -1134,7 +1134,7 @@ If BACKWARD is non-nil, jump to the previous match."
 
 ;;;; User interface commands and the mode
 
-;; (put 'doc-view-mode 'mode-class 'special)
+(put 'doc-view-mode 'mode-class 'special)
 
 (defun doc-view-already-converted-p ()
   "Return non-nil if the current doc was already converted."

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index f3cdc05..5b785f0 100644 (file)
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -317,6 +317,8 @@ This variable is used to display the current image type in the mode line.")
 
 (defvar bookmark-make-record-function)
 
+(put 'image-mode 'mode-class 'special)
+
 ;;;###autoload
 (defun image-mode ()
   "Major mode for image files.