lupan/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

my-set-frame-font instead of two font specific function

Browse Source
This commit is contained in:
Łukasz Pankowski 2018-08-31 21:05:35 +02:00
parent 31c3075170
commit bf6781ee8e
1 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
init.el
View File

@ -909,20 +909,19 @@ inserted between the braces between the braces."
(menu-bar-mode 0) (menu-bar-mode 0)
(tool-bar-mode 0) (tool-bar-mode 0)
(defun set-frame-font-inconsolata (size &optional frames) (setq my-font-list '("Inconsolata" "Go mono" "mononoki"))
"Set font to Inconsolata:pixelsize=SIZE:antialias=true:autohint=false.
Argument FRAMES has the same meaning as for `set-frame-font'"
(interactive "n[Inconsolata] size: ")
(set-frame-font
(format "Inconsolata:pixelsize=%d:antialias=true:autohint=true" size)
nil frames))
(defun set-frame-font-go-mono (size &optional frames) (defun my-set-frame-font (font-name size &optional frames)
"Set font to Go mono:pixelsize=SIZE:antialias=true:autohint=false. "Set font to one of the fonts from `my-font-list'
Argument FRAMES has the same meaning as for `set-frame-font'" Argument FRAMES has the same meaning as for `set-frame-font'"
(interactive "n[Go mono] size: ") (interactive
(list (helm :prompt "Font name: "
:sources (helm-build-sync-source "Fonts"
:candidates my-font-list)
:buffer "*font selection*")
(read-number "Font size: ")))
(set-frame-font (set-frame-font
(format "Go mono:pixelsize=%d:antialias=true:autohint=true" size) (format "%s:pixelsize=%d:antialias=true:autohint=true" font-name size)
nil frames)) nil frames))
(use-package powerline (use-package powerline