Emacs: Close TODO regarding whitespace-report bug
parent
9846e7f47a
commit
d27ce8bbcc
|
@ -129,24 +129,21 @@
|
||||||
;; Highlight selections -- not activated by default on old Emacs.
|
;; Highlight selections -- not activated by default on old Emacs.
|
||||||
(transient-mark-mode 1)
|
(transient-mark-mode 1)
|
||||||
|
|
||||||
;; Whitespace, tabs, and other frivolities. Highlight trailing whitespaces. For
|
;; There is no prog-mode-hook on Emacs<24.
|
||||||
;; programming languages only, so that it does not affect buffer like calendar
|
|
||||||
;; and so on. There is no prog-mode-hook on Emacs<24.
|
|
||||||
(require 'functions) ; for `page-number-mode'
|
(require 'functions) ; for `page-number-mode'
|
||||||
(add-hook
|
(add-hook
|
||||||
'prog-mode-hook
|
'prog-mode-hook
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(page-number-mode t)
|
(page-number-mode t)))
|
||||||
;; (whitespace-mode) ; This mode is a performance killer.
|
|
||||||
))
|
|
||||||
(define-key mickey-minor-mode-map (kbd "C-<f7>") 'whitespace-mode)
|
|
||||||
|
|
||||||
|
(define-key mickey-minor-mode-map (kbd "C-<f7>") 'whitespace-mode)
|
||||||
(setq
|
(setq
|
||||||
whitespace-style
|
whitespace-style
|
||||||
'(face indentation::space space-after-tab space-before-tab tab-mark trailing))
|
'(face empty indentation space-after-tab space-before-tab tab-mark trailing))
|
||||||
;; TODO: whitespace report-on-bogus and cleanup do not seem to work properly.
|
;; `whitespace-report' will mistakenly always report empty lines at
|
||||||
;; Empty lines seems to be always true. Report is shown even when style is not
|
;; beginning and end of buffer as long as there is at least one empty line.
|
||||||
;; matching the errors.
|
;; `whitespace-cleanup' works properly however.
|
||||||
|
;; DONE: Reported at http://debbugs.gnu.org/cgi/bugreport.cgi?bug=23740.
|
||||||
; (setq whitespace-action '(report-on-bogus))
|
; (setq whitespace-action '(report-on-bogus))
|
||||||
|
|
||||||
;; WARNING: this can break some configuration files needing whitespaces at the
|
;; WARNING: this can break some configuration files needing whitespaces at the
|
||||||
|
@ -355,7 +352,7 @@
|
||||||
;; Replace maximized binding for fullscreen.
|
;; Replace maximized binding for fullscreen.
|
||||||
(define-key mickey-minor-mode-map (kbd "M-<f10>") 'toggle-frame-fullscreen)
|
(define-key mickey-minor-mode-map (kbd "M-<f10>") 'toggle-frame-fullscreen)
|
||||||
|
|
||||||
;; Scroll zooming.
|
;; Scroll zooming.
|
||||||
(define-key mickey-minor-mode-map (kbd "C-<wheel-down>") 'text-scale-decrease)
|
(define-key mickey-minor-mode-map (kbd "C-<wheel-down>") 'text-scale-decrease)
|
||||||
(define-key mickey-minor-mode-map (kbd "C-<mouse-5>") 'text-scale-decrease)
|
(define-key mickey-minor-mode-map (kbd "C-<mouse-5>") 'text-scale-decrease)
|
||||||
(define-key mickey-minor-mode-map (kbd "C-<wheel-up>") 'text-scale-increase)
|
(define-key mickey-minor-mode-map (kbd "C-<wheel-up>") 'text-scale-increase)
|
||||||
|
|
Loading…
Reference in New Issue