私は、TECO Emacs から MacOS X 用の GNU Emacs 23.4 までずっと (26 年間) Emacs のユーザーです。Lisp マクロをハックすることができ、通常は自分のやり方を見つけることができます。
Emacs は非常に大きくなりました。そしてとてもカラフル。
Emacs がフォントのサイズや色を変更しないようにする簡単な方法はありますか?
.emacs で次の行を使用して、すべてのフォントの色とその他の装飾をオフにすることができます。
(global-font-lock-mode 0)
Emacs には、 によって制御されない強調表示がありfont-lock-mode
ます。
以下は、2007 年に Juri Linkov が Emacs Dev メーリング リストに投稿した解決策です。
I use the following trick to post-process faces immediately after they
get created. I also modified this code to not reset mode line faces:
(defun my-faces-fix (&optional frame)
"Fix defined faces."
(interactive)
;; Check if this function is called by `custom-define-hook' from
;; `custom-declare-face' where the variable `face' is bound locally.
(when (boundp 'face)
(dolist (face (face-list))
(unless (memq face '(mode-line mode-line-highlight mode-line-inactive))
;; Reset all face attributes
(modify-face face)))))
;; 1. Fix existing faces
(let ((face t)) (my-faces-fix))
;; 2. Call `my-faces-fix' every time some new face gets defined
(add-to-list 'custom-define-hook 'my-faces-fix)
私が2年間使ってきたのは以下のとおりです。
(custom-set-faces
'(default ((t (:inherit nil :height 113 :family "DejaVu Sans Mono"))))
'(font-lock-builtin-face ((nil (:foreground "#7F0055" :weight bold))))
'(font-lock-keyword-face ((nil (:foreground "#7F0055" :weight bold))))
'(font-lock-comment-face ((nil (:foreground "#3F7F5F"))))
'(font-lock-string-face ((nil (:foreground "#2A00FF"))))
'(font-lock-type-face ((t (:underline t :slant italic :foreground "#000000"))))
'(font-lock-constant-face ((t (:foreground "#110099"))))
'(font-lock-variable-name-face ((nil nil)))
'(font-lock-function-name-face ((t (:weight bold)))))
他の多くの面もカスタマイズできます: を呼び出すだけM-x customize-face
です。現在の面が自動選択されます。