让Emacs像Firefox一样放大与缩小字体

只要把下面这段代码放到.emacs里，即可像Firefox一样，用”C-+“和”C–“来放大Emacs显示字体的大小，非常地方便。

(defun increase-font-size ()
(interactive)
(set-face-attribute ‘default
nil
:height
(ceiling (* 1.10
(face-attribute ‘default :height)))))
(defun decrease-font-size ()
(interactive)
(set-face-attribute ‘default
nil
:height
(floor (* 0.9
(face-attribute ‘default :height)))))
(global-set-key (kbd “C-+”) ‘increase-font-size)
(global-set-key (kbd “C–“) ‘decrease-font-size)

本代码摘自：http://sachachua.com/wp/2006/09/15/emacs-changing-the-font-size-on-the-fly/