`diff-mode`で` show-trailing-whitespace`をオーバーライドする

私がしているshow-trailing-whitespaceに設定t私の中で、グローバル.emacsファイルと、これは私がしている時を除いて、一般的な問題ではないdiff-mode空白のコンテキスト行のための必須の末尾に空白があり、パッチを見ています。

1つの解決策は、関連するフックshow-trailing-whitespaceで単純にオフにdiff-modeすることですが、実際には、変更行の末尾の空白を引き続き表示したいのですが。たとえば、誤って末尾の空白を導入した場合や、それを削除する場合は問題ありませんが、それでもtrailing-whitespace顔に表示したいとします。空白のコンテキスト行は、diff形式自体に必要なため、末尾の空白として扱われたくないだけです。

これが私が得る現在の振る舞いの例です：

そして、これは私が望むものです：

次に別の例を示しますが、今回は実際に空白を追加しています。

ただし、でshow-trailing-whitespace完全に無効にするとdiff-mode、暗赤色はまったく表示されません。代わりに、これは私が望んでいるものです：

基本的に、これには、show-trailing-whitespaceスペースが1つしかないdiff行が特別であることを認識させる必要があると思います。

1つの解決策は、差分モードで末尾の空白モードをオフにして、代わりに、表示したくない末尾の空白に対して独自のカスタムフォントロックルールを定義することです。

(defvar diff-trailing-whitespace-keywords
  '(("^[+-<>]\\(.*\\S \\)?\\(\\s +\\)$" (2 'trailing-whitespace t))))
(defun diff-mode-font-lock-add-trailing-whitespace ()
  (setq diff-font-lock-keywords-and-whitespace
    (append diff-font-lock-keywords
        diff-trailing-whitespace-keywords))
  (setcar diff-font-lock-defaults 'diff-font-lock-keywords-and-whitespace))
(defun turn-off-trailing-whitespace ()
  (setq show-trailing-whitespace nil))
(add-hook 'diff-mode-hook 'turn-off-trailing-whitespace)
(eval-after-load "diff-mode" '(diff-mode-font-lock-add-trailing-whitespace))

の値はshow-trailing-whitespace、設定時にローカルのバッファーになるため、関連するフックに設定するだけです。

(add-hook 'diff-mode-hook (lambda () (setq show-trailing-whitespace nil)))

ドキュメントでshow-trailing-whitespaceを確認するには：C-h v show-trailing-whitespace。