diff options
| author | Alan Mackenzie <acm@muc.de> | 2012-02-23 18:51:22 +0000 |
|---|---|---|
| committer | Alan Mackenzie <acm@muc.de> | 2012-02-23 18:51:22 +0000 |
| commit | 2cb228f753fbaea3a86dfc1fd57b61db13624a2d (patch) | |
| tree | f9f55e68442986ba10b4a25129855beec6b450d2 /lisp/font-core.el | |
| parent | b2e4ca7d12b306cd15d4ec24ce7749db56729e2b (diff) | |
| download | emacs-2cb228f753fbaea3a86dfc1fd57b61db13624a2d.tar.gz emacs-2cb228f753fbaea3a86dfc1fd57b61db13624a2d.tar.bz2 emacs-2cb228f753fbaea3a86dfc1fd57b61db13624a2d.zip | |
Add new parameter :after-hook to define-minor-mode. Use this in the
definition of font-lock-mode.
Diffstat (limited to 'lisp/font-core.el')
| -rw-r--r-- | lisp/font-core.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/font-core.el b/lisp/font-core.el index f6701c0c79f..9b655319bc9 100644 --- a/lisp/font-core.el +++ b/lisp/font-core.el @@ -138,6 +138,7 @@ 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'. " nil nil nil + :after-hook (if font-lock-mode (font-lock-initial-fontify)) ;; 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) ?\s)) |