only do the resolution stuff if neofetch exists
This commit is contained in:
parent
7dcc262d39
commit
240ec1d4d3
@ -71,17 +71,18 @@ console."
|
||||
(pixel-scroll-precision-mode t)
|
||||
(pixel-scroll-mode t))
|
||||
;; Size of text. おまえ わ もう しんでいる.
|
||||
(let* ((resolution (mapcar #'string-to-number
|
||||
(split-string
|
||||
(cadr (split-string
|
||||
(shell-command-to-string
|
||||
"neofetch resolution"))) "x")))
|
||||
(resx (car resolution))
|
||||
(resy (cadr resolution))
|
||||
(font-height (/ resy 11)))
|
||||
(set-face-attribute 'fixed-pitch nil :height font-height)
|
||||
(set-face-attribute 'default nil :height font-height)
|
||||
(set-face-attribute 'variable-pitch nil :height (+ font-height 10))))
|
||||
(if (executable-find "neofetch")
|
||||
(let* ((resolution (mapcar #'string-to-number
|
||||
(split-string
|
||||
(cadr (split-string
|
||||
(shell-command-to-string
|
||||
"neofetch resolution"))) "x")))
|
||||
(resx (car resolution))
|
||||
(resy (cadr resolution))
|
||||
(font-height (/ resy 11)))
|
||||
(set-face-attribute 'fixed-pitch nil :height font-height)
|
||||
(set-face-attribute 'default nil :height font-height)
|
||||
(set-face-attribute 'variable-pitch nil :height (+ font-height 10)))))
|
||||
|
||||
(defun toggle-ja-input ()
|
||||
"Switch between english and japanese. Not broken."
|
||||
|
Loading…
Reference in New Issue
Block a user