diff options
| author | Lars Ingebrigtsen <[email protected]> | 2012-01-29 00:28:05 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <[email protected]> | 2012-01-29 00:28:05 +0000 |
| commit | 576950c66cf13943165ec610894ff6d394f29877 (patch) | |
| tree | fcc85892f73b48cb67b8cfc899aa6ac4bb77632e /lisp/gnus | |
| parent | cb97cd2a0d0d5f72fcfbc2e4669c15ceee9fde3c (diff) | |
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).
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/gnus/mm-view.el | 4 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 10eac2e5ea..316e266c5e 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,9 @@ +2012-01-28 Lars Ingebrigtsen <[email protected]> + + * 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 <[email protected]> (tiny change) * shr.el (shr-browse-url): Fix the name of the `browse-url-mail' diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el index 18ee3b5047..1d7b174d5a 100644 --- a/lisp/gnus/mm-view.el +++ b/lisp/gnus/mm-view.el @@ -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 |