如何修改Emacs Shell模式的颜色主题？

问题背景 #

我使用的是Emacs 25.3.1版本，在Shell模式下遇到了一个恼人的问题：stdout文本只要出现在短横线（-）之后，就会变成红色（截图中能看到红色文本与其他正常白色stdout的明显对比）。我尝试在.emacs配置文件中添加了以下代码来解决，但没有效果，希望能把这部分红色文本改成和其他stdout一致的白色：

(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)

解决方案 #

1. 先定位问题根源：找到控制颜色的Face #

首先得搞清楚是Emacs里哪个「Face」（控制文本样式的单元）在主导这个红色显示。你可以这么操作：

• 把光标移到红色文本上，按下C-u C-x =，在弹出的信息缓冲区里查找「Face」相关内容；
• 或者直接执行M-x describe-face命令，查看当前光标位置对应的Face名称。
  大概率会是ansi-color-red或者font-lock-warning-face这类Face在起作用。

2. 针对性修改颜色设置 #

情况一：由ansi-color系列Face导致

如果查到是ansi-color-red，直接在Shell模式下覆盖这个Face的颜色即可，把这段代码加到你的.emacs里：

(add-hook 'shell-mode-hook
          (lambda ()
            (set-face-attribute 'ansi-color-red nil :foreground "white")))

情况二：由Shell模式语法高亮规则导致

要是发现是font-lock-warning-face（这类Face通常用来标记警告，默认偏红色），说明Shell模式把短横线开头的文本误判成了警告内容，咱们移除这个高亮规则就行：

(add-hook 'shell-mode-hook
          (lambda ()
            ;; 移除短横线开头文本的高亮规则
            (font-lock-remove-keywords nil '(("^-.*" . font-lock-warning-face)))
            ;; 刷新当前缓冲区的语法高亮
            (font-lock-fontify-buffer)))

3. 确保ansi-color配置真正生效 #

有时候ansi-color-for-comint-mode-on会因为加载顺序问题没正常启动，你可以把它和强制刷新颜色的命令绑定到Shell模式钩子上：

(add-hook 'shell-mode-hook
          (lambda ()
            (ansi-color-for-comint-mode-on)
            ;; 对整个缓冲区应用ansi颜色规则
            (ansi-color-apply-on-region (point-min) (point-max))))

4. 测试配置效果 #

修改完配置后，要么重启Emacs，要么执行M-x eval-buffer加载修改后的.emacs，再打开Shell模式测试。如果还是没解决，检查下有没有其他配置文件（比如init.el）或者第三方插件覆盖了你的设置。

内容的提问来源于stack exchange，提问作者Wang Jinkai