mirror of
https://github.com/larstvei/dot-emacs.git
synced 2024-11-26 07:28:31 +00:00
Fix lingering dependencies on cl
This commit is contained in:
parent
84b8947f94
commit
70810d41ac
7
init.org
7
init.org
@ -765,16 +765,15 @@
|
||||
|
||||
(defun global-scale-default ()
|
||||
(interactive)
|
||||
(setq size default)
|
||||
(global-scale-internal size))
|
||||
(global-scale-internal (setq size default)))
|
||||
|
||||
(defun global-scale-up ()
|
||||
(interactive)
|
||||
(global-scale-internal (incf size 20)))
|
||||
(global-scale-internal (setq size (+ size 20))))
|
||||
|
||||
(defun global-scale-down ()
|
||||
(interactive)
|
||||
(global-scale-internal (decf size 20)))
|
||||
(global-scale-internal (setq size (- size 20))))
|
||||
|
||||
(defun global-scale-internal (arg)
|
||||
(set-face-attribute 'default (selected-frame) :height arg)
|
||||
|
Loading…
Reference in New Issue
Block a user