From 88890a45c5d29f584f21475e7a9ce4f95c3bdaaa Mon Sep 17 00:00:00 2001 From: Jefferson Carpenter Date: Fri, 30 Mar 2018 03:37:24 -0500 Subject: [PATCH] Turn on global-whitespace-mode when switching buffers --- lisp/whitespace.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/whitespace.el b/lisp/whitespace.el index c2827d3d51..af96ad46ab 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -998,6 +998,7 @@ global-whitespace-mode (save-current-buffer (add-hook 'find-file-hook 'whitespace-turn-on-if-enabled) (add-hook 'after-change-major-mode-hook 'whitespace-turn-on-if-enabled) + (advice-add 'switch-to-buffer :after 'whitespace-turn-on-if-enabled) (dolist (buffer (buffer-list)) ; adjust all local mode (set-buffer buffer) (unless whitespace-mode @@ -1006,6 +1007,7 @@ global-whitespace-mode (save-current-buffer (remove-hook 'find-file-hook 'whitespace-turn-on-if-enabled) (remove-hook 'after-change-major-mode-hook 'whitespace-turn-on-if-enabled) + (advice-remove 'switch-to-buffer 'whitespace-turn-on-if-enabled) (dolist (buffer (buffer-list)) ; adjust all local mode (set-buffer buffer) (unless whitespace-mode @@ -1033,7 +1035,7 @@ whitespace-enable-predicate if the current buffer should obey `global-whitespace-mode'. This variable is normally modified via `add-function'.") -(defun whitespace-turn-on-if-enabled () +(defun whitespace-turn-on-if-enabled (&rest args) (when (funcall whitespace-enable-predicate) (whitespace-turn-on))) -- 2.11.0