diff options
| author | Juri Linkov <juri@jurta.org> | 2005-12-04 02:30:37 +0000 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2005-12-04 02:30:37 +0000 |
| commit | 1a3aecfb92eb9465903cf4be4334b598804f2c9d (patch) | |
| tree | 17f5c415ff3b6296ff0ac031628f062c993addc8 /lisp/font-core.el | |
| parent | 68785e47cd642d115de07a260a3895157e7bce80 (diff) | |
| download | emacs-1a3aecfb92eb9465903cf4be4334b598804f2c9d.tar.gz | |
(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'.
Diffstat (limited to 'lisp/font-core.el')
| -rw-r--r-- | lisp/font-core.el | 14 |
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. The above is the default behavior of `font-lock-mode'; you may specify your own function which is called when `font-lock-mode' is toggled via `font-lock-function'. " - :group 'font-lock ;; Don't turn on Font Lock mode if we don't have a display (we're running a ;; batch job) or if the buffer is invisible (the name starts with a space). (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." (let (inhibit-quit) (turn-on-font-lock)))) -(easy-mmode-define-global-mode - global-font-lock-mode font-lock-mode turn-on-font-lock-if-enabled - :extra-args (dummy) - :initialize 'custom-initialize-safe-default - :init-value (not (or noninteractive emacs-basic-display)) - :version "22.1") +(define-global-minor-mode global-font-lock-mode + font-lock-mode turn-on-font-lock-if-enabled + :extra-args (dummy) + :initialize 'custom-initialize-safe-default + :init-value (not (or noninteractive emacs-basic-display)) + :group 'font-lock + :version "22.1") ;;; End of Global Font Lock mode. |