(vc-annotate-mode): Derive from special-mode

instead of using view-mode.

2 files changed, 7 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d85a93c6898..e71ef1acee1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-06-23  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * vc-annotate.el (vc-annotate-mode): Derive from special-mode
+        instead of using view-mode.
+
 2008-06-23  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * Makefile.in (distclean): Don't delete *.elc and autogen files.
diff --git a/lisp/vc-annotate.el b/lisp/vc-annotate.el
index fbc1ba1247d..eadce2db957 100644
--- a/lisp/vc-annotate.el
+++ b/lisp/vc-annotate.el
@@ -149,7 +149,7 @@ List of factors, used to expand/compress the time scale.  See `vc-annotate'."
   ;; The fontification is done by vc-annotate-lines instead of font-lock.
   '((vc-annotate-lines)))
 
-(define-derived-mode vc-annotate-mode fundamental-mode "Annotate"
+(define-derived-mode vc-annotate-mode special-mode "Annotate"
   "Major mode for output buffers of the `vc-annotate' command.
 
 You can use the mode-specific menu to alter the time-span of the used
@@ -161,8 +161,7 @@ menu items."
   (remove-from-invisibility-spec 'foo)
   (set (make-local-variable 'truncate-lines) t)
   (set (make-local-variable 'font-lock-defaults)
-       '(vc-annotate-font-lock-keywords t))
-  (view-mode 1))
+       '(vc-annotate-font-lock-keywords t)))
 
 (defun vc-annotate-toggle-annotation-visibility ()
   "Toggle whether or not the annotation is visible."