     ;; WARNING!  Depending on the default font,
     ;; if the size is not supported very well, the frame will be clipped
     ;; so that the beginning of the buffer may not be visible correctly.
-    (set-face-attribute 'default nil :height 140 :weight 'normal)
+    (set-face-attribute 'default nil :height size :weight 'normal)
 
     ;; use specific font for Korean charset.
     ;; if you want to use different font size for specific charset,

    (set-fontset-font t 'hangul (font-spec :name "NanumGothicCoding"))
    (dolist (charset '(kana han symbol cjk-misc bopomofo))
      (set-fontset-font t charset (font-spec :name "Hiragino Sans GB")))
    (setq face-font-rescale-alist '(("Hiragino Sans GB" . 1.2) ("WenQuanYi Zen Hei" . 1.2)))
    ;; you may want to add different for other charset in this way.
    ))

(when (featurep 'ns)
  (defun ns-raise-emacs ()

  (defun ns-raise-emacs-with-frame (frame)
    "Raise Emacs and select the provided frame."
    (with-selected-frame frame
      (when (display-graphic-p) (ns-raise-emacs))))

  (add-hook 'after-make-frame-functions 'ns-raise-emacs-with-frame))

;; 默认 80 列自动换行, 需要 M-x auto-fill-mode 模式下
