summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-06-11 14:00:27 -0400
committerGlenn Morris <rgm@gnu.org>2013-06-11 14:00:27 -0400
commit7de135d06fcc24d3ee946947251a8b969fb3fee0 (patch)
treea1d52a2a6d0120314322269ff2287dd7080630ec /lisp/emacs-lisp
parentfa6bc6fd5023120ba9ecfb34cf88a84e5b3ab2a4 (diff)
downloademacs-7de135d06fcc24d3ee946947251a8b969fb3fee0.tar.gz
emacs-7de135d06fcc24d3ee946947251a8b969fb3fee0.tar.bz2
emacs-7de135d06fcc24d3ee946947251a8b969fb3fee0.zip
lisp-mode font-lock fox for bug#14574
* lisp/emacs-lisp/lisp-mode.el (lisp-mode-variables): Prettify after setting font-lock-defaults.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/lisp-mode.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 4267b9f45b9..cbd8854e7d6 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -223,7 +223,6 @@ font-lock keywords will not be case sensitive."
(setq-local imenu-generic-expression lisp-imenu-generic-expression)
(setq-local multibyte-syntax-as-symbol t)
(setq-local syntax-begin-function 'beginning-of-defun)
- (prog-prettify-install lisp--prettify-symbols-alist)
(setq font-lock-defaults
`((lisp-font-lock-keywords
lisp-font-lock-keywords-1
@@ -231,7 +230,8 @@ font-lock keywords will not be case sensitive."
nil ,keywords-case-insensitive nil nil
(font-lock-mark-block-function . mark-defun)
(font-lock-syntactic-face-function
- . lisp-font-lock-syntactic-face-function))))
+ . lisp-font-lock-syntactic-face-function)))
+ (prog-prettify-install lisp--prettify-symbols-alist))
(defun lisp-outline-level ()
"Lisp mode `outline-level' function."