Home > Uncategorized > Emacs里高亮代码超出80列的部分

Emacs里高亮代码超出80列的部分

整理自: EmacsWiki EightyColumnRule

;; 高亮结尾白空格
;; 设置颜色
(custom-set-faces
 '(my-tab-face            ((((class color)) (:background "grey10"))) t)
 '(my-trailing-space-face ((((class color)) (:background "gray10"))) t)
 '(my-long-line-face ((((class color)) (:background "gray10"))) t))

;; 辅助函数,用来给指定模式添加超过80列的高亮功能
(defun cc-mode-add-keywords (mode)
  (font-lock-add-keywords
   mode
   '(("\t+" (0 'my-tab-face append))
     ("^.\\{81\\}\\(.+\\)$" (1 'my-long-line-face append)))))

;; 对指定模式使用"超过80列高亮"功能
(cc-mode-add-keywords 'c-mode)
(cc-mode-add-keywords 'cc-mode)
(cc-mode-add-keywords 'c++-mode)
(cc-mode-add-keywords 'perl-mode)
(cc-mode-add-keywords 'python-mode)
Categories: Uncategorized Tags:
  1. No comments yet.
  1. No trackbacks yet.