aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2005-12-04 02:30:37 +0000
committerJuri Linkov2005-12-04 02:30:37 +0000
commit3ff522d9c54f533b7bb190939a9ef0092e663d54 (patch)
tree3ab042f722d2470060419ad4d67a3b7f018aa0a2
parent2f33468cdc444484c081cef431405b7f6fb4d70f (diff)
downloademacs-3ff522d9c54f533b7bb190939a9ef0092e663d54.tar.gz
emacs-3ff522d9c54f533b7bb190939a9ef0092e663d54.zip
(global-font-lock-mode): Use define-global-minor-mode
instead of easy-mmode-define-global-mode. Add `:group font-lock'. (font-lock-mode): Remove `:group font-lock'.
-rw-r--r--lisp/font-core.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/font-core.el b/lisp/font-core.el
index 2f903acee6b..5cfab04c956 100644
--- a/lisp/font-core.el
+++ b/lisp/font-core.el
@@ -146,7 +146,6 @@ buffer local value for `font-lock-defaults', via its mode hook.
146The above is the default behavior of `font-lock-mode'; you may specify 146The above is the default behavior of `font-lock-mode'; you may specify
147your own function which is called when `font-lock-mode' is toggled via 147your own function which is called when `font-lock-mode' is toggled via
148`font-lock-function'. " 148`font-lock-function'. "
149 :group 'font-lock
150 ;; Don't turn on Font Lock mode if we don't have a display (we're running a 149 ;; Don't turn on Font Lock mode if we don't have a display (we're running a
151 ;; batch job) or if the buffer is invisible (the name starts with a space). 150 ;; batch job) or if the buffer is invisible (the name starts with a space).
152 (when (or noninteractive (eq (aref (buffer-name) 0) ?\ )) 151 (when (or noninteractive (eq (aref (buffer-name) 0) ?\ ))
@@ -291,12 +290,13 @@ means that Font Lock mode is turned on for buffers in C and C++ modes only."
291 (let (inhibit-quit) 290 (let (inhibit-quit)
292 (turn-on-font-lock)))) 291 (turn-on-font-lock))))
293 292
294(easy-mmode-define-global-mode 293(define-global-minor-mode global-font-lock-mode
295 global-font-lock-mode font-lock-mode turn-on-font-lock-if-enabled 294 font-lock-mode turn-on-font-lock-if-enabled
296 :extra-args (dummy) 295 :extra-args (dummy)
297 :initialize 'custom-initialize-safe-default 296 :initialize 'custom-initialize-safe-default
298 :init-value (not (or noninteractive emacs-basic-display)) 297 :init-value (not (or noninteractive emacs-basic-display))
299 :version "22.1") 298 :group 'font-lock
299 :version "22.1")
300 300
301;;; End of Global Font Lock mode. 301;;; End of Global Font Lock mode.
302 302