Mercurial > emacs

comparison lisp/font-lock.el @ 9513:76ce1230257f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use purify-flag not noninteractive.
author Simon Marshall <simon@gnu.org>
date Thu, 13 Oct 1994 07:55:30 +0000
parents f80b2a33df03
children d352bebc9103
comparison
equal deleted inserted replaced
9512:b2aaf43191aa 9513:76ce1230257f
909 font-lock-syntax-table) 909 font-lock-syntax-table)
910 (setq slist (cdr slist)))))))) 910 (setq slist (cdr slist))))))))
911 911
912 ;; Install ourselves: 912 ;; Install ourselves:
913 913
914 (if noninteractive 914 (if purify-flag
915 (add-hook 'after-init-hook 'font-lock-make-faces) 915 (add-hook 'after-init-hook 'font-lock-make-faces)
916 (font-lock-make-faces)) 916 (font-lock-make-faces))
917 917
918 (or (assq 'font-lock-mode minor-mode-alist) 918 (or (assq 'font-lock-mode minor-mode-alist)
919 (setq minor-mode-alist (cons '(font-lock-mode " Font") minor-mode-alist))) 919 (setq minor-mode-alist (cons '(font-lock-mode " Font") minor-mode-alist)))