这里有一个交互调整字体高度的选项，一次一点:

;; font sizes
(global-set-key (kbd "s-=")
                (lambda ()
                  (interactive)
                  (let ((old-face-attribute (face-attribute 'default :height)))
                    (set-face-attribute 'default nil :height (+ old-face-attribute 10)))))

(global-set-key (kbd "s--")
                (lambda ()
                  (interactive)
                  (let ((old-face-attribute (face-attribute 'default :height)))
                    (set-face-attribute 'default nil :height (- old-face-attribute 10)))))

当您想要调整所有缓冲区中的文本大小时，这是可取的。我不喜欢使用文本比例增加和文本比例减少的解决方案，因为排水沟中的行号之后会被切断。

这是另一个简单的解决方案。《24小时》也适用

(set-default-font "Monaco 14")

捷径:

`C-+` increases font size
`C--` Decreases font size

这里有一个交互调整字体高度的选项，一次一点:

;; font sizes
(global-set-key (kbd "s-=")
                (lambda ()
                  (interactive)
                  (let ((old-face-attribute (face-attribute 'default :height)))
                    (set-face-attribute 'default nil :height (+ old-face-attribute 10)))))

(global-set-key (kbd "s--")
                (lambda ()
                  (interactive)
                  (let ((old-face-attribute (face-attribute 'default :height)))
                    (set-face-attribute 'default nil :height (- old-face-attribute 10)))))

当您想要调整所有缓冲区中的文本大小时，这是可取的。我不喜欢使用文本比例增加和文本比例减少的解决方案，因为排水沟中的行号之后会被切断。

(set-face-attribute 'default nil :height 100)

这个值的单位是1/10pt，所以100会给你10pt，以此类推。

Aquamacs:

(set-face-attribute 'default nil :font "Monaco-16" )

从Emacs Wiki全局更改默认字体，它说你可以使用以下任何一种:

(set-face-attribute 'default nil :font FONT )

(set-frame-font FONT nil t)

其中FONT是“Monaco-16”之类的东西，例如:

(set-face-attribute 'default nil :font "Monaco-16" )

在wiki上的第一个建议中有一个额外的右括号，这导致了启动时的错误。我终于注意到这个额外的右括号，随后我在维基上更正了这个建议。这两个建议都对我有用。

zoom.cfg和global-zoom.cfg提供字体大小更改绑定(来自EmacsWiki)

C——或C-mousewheel-up:增大字体大小。 C-+或C-鼠标滚轮向下:减小字体大小。 C-0将字体大小恢复为默认值。