全局放大Emacs字体

狠狠地折腾了一把Emacs中文字体 之后,我们的中文字体可以和英文字体一起 缩放了。

但是还有一个小缺陷没有解决,这个在做讲演的时候字体太小的话就体现出来了: Emacs只提供了一个针对单个buffer的text-scale-adjust命令。这样你每开一个 新buffer都需要重新调整字体大小。

上次北京lisper聚会我做 lightening talk 的时候发现了这个问题,我对着自己 的本本兴致勃勃的讲啊讲,抬头一看投影,咋字体又小了呢?马上放大,过一会 换了个buffer… 如此反复几次,大家都受不了了,哥也受不了了,丢不起这个 人啊!我丢得起,Emacs丢不起啊!

所以小小折腾了一下,增加了一个全局缩放字体的函数:

(global-set-key [(control x) (meta -)] (lambda () (interactive) (bhj-step-frame-font-size -1)))
(global-set-key [(control x) (meta +)] (lambda () (interactive) (bhj-step-frame-font-size 1)))

代码还是见 bhj-fonts.el