# HG changeset patch # User Oleksandr Gavenko # Date 1446383632 -7200 # Node ID 8c1f6458c907c658b4b1bb4c52fe0530b7afc5e2 # Parent 60e6b8174aee03221b4fd05fdc6bcbd859f46d8e Do not highlight 64 equal characters. diff -r 60e6b8174aee -r 8c1f6458c907 .emacs-my --- a/.emacs-my Sun Nov 01 15:11:09 2015 +0200 +++ b/.emacs-my Sun Nov 01 15:13:52 2015 +0200 @@ -1627,11 +1627,6 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (message "TODO, XXX, FIXME highlight") -(defface my-contrasty-face - '((t :background "pink" :foreground "red" :weight bold)) - "Font for showing conflicts." - :group 'basic-faces) - (dolist (mode (append my-devel-mode-list my-text-mode-list)) (font-lock-add-keywords mode diff -r 60e6b8174aee -r 8c1f6458c907 .emacs-obsolete --- a/.emacs-obsolete Sun Nov 01 15:11:09 2015 +0200 +++ b/.emacs-obsolete Sun Nov 01 15:13:52 2015 +0200 @@ -69,3 +69,18 @@ ;; For Cygwin. (add-hook 'comint-output-filter-functions 'comint-strip-ctrl-m) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(message "TODO, XXX, FIXME highlight") + +(defface my-contrasty-face + '((t :background "pink" :foreground "red" :weight bold)) + "Font for showing conflicts." + :group 'basic-faces) + +(dolist (mode (append my-devel-mode-list my-text-mode-list)) + (font-lock-add-keywords + mode + `( + ;; 64 times, for highlight C-u C-u C-u + ("\\([^[:space:]]\\)\\1\\{63\\}" 0 'my-contrasty-face t) )) )