|
|
@@ -384,19 +384,19 @@ found, otherwise returns nil." |
|
|
|
)) |
|
|
|
|
|
|
|
(when (require 'whitespace nil t) |
|
|
|
(add-to-list 'whitespace-display-mappings ; not work |
|
|
|
`(tab-mark ?\t ,(vconcat "^I\t"))) |
|
|
|
(add-to-list 'whitespace-display-mappings |
|
|
|
`(newline-mark ?\n ,(vconcat "$\n"))) |
|
|
|
(setq whitespace-style '(face |
|
|
|
trailing ; trailing blanks |
|
|
|
newline ; newlines |
|
|
|
newline-mark ; use display table for newline |
|
|
|
tab-mark |
|
|
|
;; tab-mark |
|
|
|
empty ; empty lines at beg or end of buffer |
|
|
|
lines-tail ; lines over 80 |
|
|
|
)) |
|
|
|
;; (setq whitespace-newline 'font-lock-comment-face) |
|
|
|
(add-to-list 'whitespace-display-mappings |
|
|
|
`(newline-mark ?\n ,(vconcat "$\n"))) |
|
|
|
(add-to-list 'whitespace-display-mappings ; not work |
|
|
|
`(tab-mark ?\t ,(vconcat "^I\t"))) |
|
|
|
(global-whitespace-mode t) |
|
|
|
(when (eq (display-color-cells) |
|
|
|
256) |
|
|
|