.emacs-my
changeset 1304 8c1f6458c907
parent 1303 60e6b8174aee
child 1305 57b16a684500
equal deleted inserted replaced
1303:60e6b8174aee 1304:8c1f6458c907
  1624     (dolist (r (reverse rs))            ; Kill from the end so upcoming regions still valid.
  1624     (dolist (r (reverse rs))            ; Kill from the end so upcoming regions still valid.
  1625       (apply #'kill-region r))))
  1625       (apply #'kill-region r))))
  1626 
  1626 
  1627 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1627 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1628 (message "TODO, XXX, FIXME highlight")
  1628 (message "TODO, XXX, FIXME highlight")
  1629 
       
  1630 (defface my-contrasty-face
       
  1631   '((t :background "pink" :foreground "red" :weight bold))
       
  1632   "Font for showing conflicts."
       
  1633   :group 'basic-faces)
       
  1634 
  1629 
  1635 (dolist (mode (append my-devel-mode-list my-text-mode-list))
  1630 (dolist (mode (append my-devel-mode-list my-text-mode-list))
  1636   (font-lock-add-keywords
  1631   (font-lock-add-keywords
  1637    mode
  1632    mode
  1638    `(
  1633    `(