From e7ae641ccdd8c41523f6f28effc1d3f47791da2e Mon Sep 17 00:00:00 2001
From: 10sr <8.slashes@gmail.com>
Date: Wed, 22 Jan 2020 20:00:52 +0900
Subject: [PATCH] Fix whitespace style in dired buffer

---
 emacs.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/emacs.el b/emacs.el
index 318af50..a213c18 100644
--- a/emacs.el
+++ b/emacs.el
@@ -770,6 +770,9 @@ Otherwize hook it."
 (when (fboundp 'global-whitespace-mode)
   (add-hook 'after-first-visit-hook
             'global-whitespace-mode))
+(add-hook 'dired-mode-hook
+          ;; Other way to disable in dired buffers?
+          (lambda () (set-variable 'whitespace-style nil t)))
 
 (with-eval-after-load 'whitespace
   (defvar whitespace-display-mappings)
@@ -802,9 +805,6 @@ Otherwize hook it."
       (whitespace-mode 1)))
 
   (set-variable 'whitespace-line-column nil)
-  (add-hook 'dired-mode-hook
-            (lambda ()
-              (set-variable 'whitespace-style nil t)))
   (if (>= (display-color-cells)
           256)
       (set-face-foreground 'whitespace-newline "color-109")
@@ -812,6 +812,7 @@ Otherwize hook it."
     ;;   (set-face-bold-p 'whitespace-newline
     ;;                      t))
     ))
+
 (and nil
      '(require 'fill-column-indicator nil t)
      (setq fill-column-indicator))