emacs 콘솔과 그래픽모드 따른 폰트 적용

;; 프레임에 따라서 폰트 적용이 필요해서 이렇게 했음.
(defun my-frame-config (frame)
  "Custom behaviours for new frames."
  (with-selected-frame frame
    (when (display-graphic-p)
      (let ((fontset "fontset-default"))
        (set-fontset-font fontset 'hangul
                          '("NanumGothicOTF" . "unicode-bmp"))
        (set-face-attribute 'default nil
                            :font fontset
                            :height 160)))))

;; run now
(my-frame-config (selected-frame))
;; and later
(add-hook 'after-make-frame-functions 'my-frame-config)