diff options
Diffstat (limited to 'lisp/whitespace.el')
| -rw-r--r-- | lisp/whitespace.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/whitespace.el b/lisp/whitespace.el index d0368b54a80..243e7502461 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -2025,7 +2025,8 @@ resultant list will be returned." (memq 'space-after-tab::space whitespace-active-style) (memq 'space-before-tab whitespace-active-style) (memq 'space-before-tab::tab whitespace-active-style) - (memq 'space-before-tab::space whitespace-active-style)))) + (memq 'space-before-tab::space whitespace-active-style)) + t)) (defun whitespace-color-on () @@ -2326,9 +2327,10 @@ Also refontify when necessary." (defun whitespace-style-mark-p () "Return t if there is some visualization via display table." - (or (memq 'tab-mark whitespace-active-style) - (memq 'space-mark whitespace-active-style) - (memq 'newline-mark whitespace-active-style))) + (and (or (memq 'tab-mark whitespace-active-style) + (memq 'space-mark whitespace-active-style) + (memq 'newline-mark whitespace-active-style)) + t)) (defsubst whitespace-char-valid-p (char) |