停止Emacs font-lock减少Lisp模式中符号的字体大小

Question

当font-lock对我的Lisp缓冲区进行着色时（至少在clojure-mode和emacs-list-mode中，所以我假设所有的Lisp模式都受到影响），我的符号的字体大小越来越大降低。在这种情况下，我认为图片 值得千言万语：

正如您所看到的，由于符号arena-ended-games-limit和game-status出现在比缓冲区中的其他文本更小的字体中，这会导致缩进看起来错误。

有谁知道这个配置的位置，以及我如何关闭它？

我用谷歌搜索并阅读了大量的Emacs Lisp文件无济于事，但由于我真的不知道我在寻找什么，我可能忽略了一个明显的答案。

如果重要，请参阅我的init.el：

中的ELPA包装序言

(require 'package)
(add-to-list 'package-archives
             '("melpa" . "http://melpa.milkbox.net/packages/"))
(add-to-list 'package-archives
             '("marmalade" . "http://marmalade-repo.org/packages/") t)

(package-initialize)

(when (not package-archive-contents)
  (package-refresh-contents))

;; packages
(defvar my-packages '(starter-kit
                      starter-kit-lisp
                      starter-kit-bindings
                      auto-complete
                      rainbow-delimiters
                      clojure-mode
                      cider
                      magit)
  "A list of packages to ensure are installed at launch.")

(dolist (p my-packages)
  (when (not (package-installed-p p))
    (package-install p)))

我很确定starter-kit / starter-kit-lisp中的任何内容都没有这样做，因为我已经非常仔细地阅读了源代码，但是人们从不知道。

Answer 1

感谢legoscia's comment，我已经能够确定负责的面是font-lock-function-name-face，它将字体系列设置为Verdana，高度设置为0.9。一旦我弄明白这一点，我就使用自定义工具删除了面部和高度的变化，这导致以下内容被添加到我的init.el：

(custom-set-faces
 '(font-lock-function-name-face ((t (:foreground "LightSkyBlue" :weight bold)))))

现在一切都排好了！