emacs - 根据主要模式更改Emacs模式行颜色

Question

我想看看是否有一种方法可以基于主模式更改模式链接的前景色和背景色，

我当时想在其中添加逻辑

(add-hook 'after-change-major-mode-hook

但是，我没有所有emacs lisp经验来进行此类更改。逻辑如下:

switch major-mode:
case "emacs-lisp-mode":
  (set-face-foreground 'mode-line "ivory")
  (set-face-background 'mode-line "DarkOrange2")
case "ruby-mode":
  (set-face-foreground 'mode-line "white")
  (set-face-background 'mode-line "red")
...
default:
  (set-face-foreground 'mode-line "black")
  (set-face-background 'mode-line "white")
end switch

提前谢谢了!。

Answer 1

您可能想要类似的东西:

(add-hook 'emacs-lisp-mode-hook
          (lambda ()
            (face-remap-add-relative
             'mode-line '((:foreground "ivory" :background "DarkOrange2") mode-line))))

您可能还希望对 mode-line-inactive面孔使用face-remap。