From 2717a191863be96a568b9534e660de469bda3009 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Mon, 28 Dec 2015 14:12:52 +0000 Subject: [PATCH] el/dot-emacs.el: Don't highlight bad whitespace in read-only buffers. It's not like I'm planning to do anything about them. --- el/dot-emacs.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/el/dot-emacs.el b/el/dot-emacs.el index 7e55329..1b0e350 100644 --- a/el/dot-emacs.el +++ b/el/dot-emacs.el @@ -837,11 +837,17 @@ case." (trap (turn-on-font-lock))) (defun mdw-post-local-vars-misc-mode-config () - (when mdw-do-misc-mode-hacking + (when (and mdw-do-misc-mode-hacking + (not buffer-read-only)) (setq show-trailing-whitespace t) (mdw-whitespace-mode 1))) (add-hook 'hack-local-variables-hook 'mdw-post-local-vars-misc-mode-config) +(defadvice toggle-read-only (after mdw-angry-fruit-salad activate) + (when mdw-do-misc-mode-hacking + (setq show-trailing-whitespace (not buffer-read-only)) + (mdw-whitespace-mode (if buffer-read-only 0 1)))) + (eval-after-load 'gtags '(progn (dolist (key '([mouse-2] [mouse-3])) -- 2.11.0