From b0f91b1493770784d23023b9ca4933abf00b4ba7 Mon Sep 17 00:00:00 2001 From: Aaron LI Date: Mon, 22 Feb 2016 22:41:36 +0800 Subject: _emacs.d/personal: add fonts.el for Chinese font configuration --- _emacs.d/personal/fonts.el | 45 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) create mode 100644 _emacs.d/personal/fonts.el (limited to '_emacs.d/personal/fonts.el') diff --git a/_emacs.d/personal/fonts.el b/_emacs.d/personal/fonts.el new file mode 100644 index 0000000..d172a92 --- /dev/null +++ b/_emacs.d/personal/fonts.el @@ -0,0 +1,45 @@ +;;; ~/.emacs.d/personal/fonts.el --- Fonts configurations for Emacs. +;; +;; -*- mode: emacs-lisp -*- +;; vim: set ts=8 sw=2 tw=0 fenc=utf-8 ft=lisp: +;; +;; Credits: +;; [1] http://baohaojun.github.io/perfect-emacs-chinese-font.html +;; [2] http://zhuoqiang.me/a/torture-emacs +;; +;; Aaron LI +;; 2016-02-22 +;; + +;;; Commentary: +;; English and Chinese fonts configurations for Emacs. + +;;; Code: + +;; To increase the Unicode coverage of your favorite programming font +;; https://github.com/cpitclaudel/monospacifier +;(dolist (ft (fontset-list)) +; (set-fontset-font ft 'unicode +; (font-spec :name "Inconsolata")) +; (set-fontset-font ft 'unicode +; (font-spec :name "Symbola monospacified for Inconsolata") +; nil 'append)) + +;; English font +;; change the default font for the current frame, as well as future frames +;(set-face-attribute 'default nil :font "Terminus:pixelsize=16") +(set-face-attribute 'default nil :font "Inconsolata:pixelsize=14") + +;; Chinese font +;; available charset: kana han symbol cjk-misc bopomofo +;; font-spec: +;; `:size': either a non-negative integer that specifies the pixel size, +;; or a floating-point number that specifies the point size. +(dolist (charset '(kana han cjk-misc bopomofo)) + (set-fontset-font (frame-parameter nil 'font) + charset + (font-spec :family "WenQuanYi Zen Hei" :size 14))) +;; rescale chinese font to match: 1 Chinese = 2 English characters +;; (however, this will cause that the Chinese characters are higher) +;(setq face-font-rescale-alist '(("WenQuanYi Bitmap Song" . 1.2))) + -- cgit v1.2.2