fix use-package dep, interactive font size fn
This commit is contained in:
parent
6bd79b588d
commit
0ea4a02c7d
14
init.el
14
init.el
|
@ -18,6 +18,9 @@
|
|||
(eval-print-last-sexp)))
|
||||
(load bootstrap-file nil 'nomessage))
|
||||
|
||||
;; set up use-package
|
||||
(straight-use-package 'use-package)
|
||||
|
||||
;; set a bunch of varibles
|
||||
(setq user-full-name "d_m"
|
||||
user-mail-address "d_m@plastic-idolatry.com"
|
||||
|
@ -72,6 +75,17 @@
|
|||
:repo "lumiknit/emacs-pragmatapro-ligatures")
|
||||
:config (add-hook 'prog-mode-hook 'pragmatapro-lig-mode))
|
||||
|
||||
;; interactive font size
|
||||
(defun set-font-size ()
|
||||
"Set font size interactively."
|
||||
(interactive)
|
||||
(let* ((family (face-attribute 'default :family))
|
||||
(curHeight (face-attribute 'default :height))
|
||||
(curSize (/ curHeight 10))
|
||||
(newSize (string-to-number (read-string "Font-size: " (number-to-string curSize))))
|
||||
(newHeight (* newSize 10)))
|
||||
(set-face-attribute 'default nil :height newHeight)))
|
||||
|
||||
;; ;; use doom themes
|
||||
;; (use-package doom-themes
|
||||
;; :straight (doom-themes :type git
|
||||
|
|
Loading…
Reference in New Issue