下面是一个代码片段，可以让你直接使用交互函数指定全局字体大小:

(defun set-font-size ()
    "Set the font size."
  (interactive)
  (set-face-attribute
   'default nil :height
   (string-to-number
    (read-string "Font size: " (number-to-string (face-attribute 'default :height nil))))))

Firefox和其他程序允许您使用C-+和C——来增加和减少字体大小。我设置了我的.emacs，这样我就可以通过添加以下几行代码来拥有同样的能力:

(global-set-key [C-kp-add] 'text-scale-increase)

(global-set-key [C-kp-subtract] 'text-scale-decrease)

如果你喜欢控制台emacs (emacs -nw)，现代vterm实现(如gnome-terminal)往往有更好的字体支持。另外，如果您习惯了这一点，就可以使用tmux，这样即使没有X，也可以在远程服务器上使用完整的环境。

下面是一个代码片段，可以让你直接使用交互函数指定全局字体大小:

(defun set-font-size ()
    "Set the font size."
  (interactive)
  (set-face-attribute
   'default nil :height
   (string-to-number
    (read-string "Font size: " (number-to-string (face-attribute 'default :height nil))))))

在NTEmacs 23.1中，选项菜单有一个“设置默认字体…”选项。

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