procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

mm-view.el (mm-display-inline-fontify): Bind `font-lock-support-mode' instead of setting it locally, since the latter doesn't seem to have any effect (most of the time).

Browse source
This commit is contained in:
Lars Ingebrigtsen 2012-01-29 00:28:05 +00:00 • committed by Katsumi Yamaoka
parent cb97cd2a0d
commit 576950c66c
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/gnus/ChangeLog
View file

@ -1,3 +1,9 @@
2012-01-28 Lars Ingebrigtsen <larsi@gnus.org>
* mm-view.el (mm-display-inline-fontify): Bind `font-lock-support-mode'
instead of setting it locally, since the latter doesn't seem to have
any effect (most of the time).
2012-01-27 Elias Pipping <pipping@lavabit.com> (tiny change)
* shr.el (shr-browse-url): Fix the name of the `browse-url-mail'

4
lisp/gnus/mm-view.el
View file

@ -600,11 +600,11 @@ If MODE is not set, try to find mode automatically."
text)))
(require 'font-lock)
;; I find font-lock a bit too verbose.
(let ((font-lock-verbose nil))
(let ((font-lock-verbose nil)
(font-lock-support-mode nil))
;; Disable support modes, e.g., jit-lock, lazy-lock, etc.
;; Note: XEmacs people use `font-lock-mode-hook' to run those modes.
(set (make-local-variable 'font-lock-mode-hook) nil)
(set (make-local-variable 'font-lock-support-mode) nil)
(setq buffer-file-name (mm-handle-filename handle))
(set (make-local-variable 'enable-local-variables) nil)
(with-demoted-errors