]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix stupidity in previous change.
authorGlenn Morris <rgm@gnu.org>
Tue, 10 Feb 2009 05:26:52 +0000 (05:26 +0000)
committerGlenn Morris <rgm@gnu.org>
Tue, 10 Feb 2009 05:26:52 +0000 (05:26 +0000)
lisp/speedbar.el

index ca2c102b35b973432bc6391d705d1ced0b38807d..bd589f507ffdaa9909b0a6165a9b3880bc842854 100644 (file)
@@ -4127,10 +4127,9 @@ TEXT is the buffer's name, TOKEN and INDENT are unused."
      (if (eq font-lock-global-modes t)
         (setq font-lock-global-modes '(not speedbar-mode))
        (if (eq (car font-lock-global-modes) 'not)
-          (add-to-list 'font-lock-global-modes 'speedbar-mode t))))
-;; If f-l-g-m is a non-empty list that doesn't begin with not, there
-;; is nothing we can do.
-
+          (add-to-list 'font-lock-global-modes 'speedbar-mode t)
+        (setq font-lock-global-modes (delq 'speedbar-mode
+                                           font-lock-global-modes)))))
 \f
 ;;; Obsolete variables and functions