larstvei/emacs
1
1
Fork 0
mirror of https://github.com/larstvei/dot-emacs.git synced 2025-11-04 01:20:11 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix lingering dependencies on cl

Browse Source
This commit is contained in:
Lars Tveito 2020-10-05 01:42:44 +02:00
parent 84b8947f94
commit 70810d41ac
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
init.org
View File

@ -765,16 +765,15 @@
(defun global-scale-default () (defun global-scale-default ()
(interactive) (interactive)
(setq size default) (global-scale-internal (setq size default)))
(global-scale-internal size))
(defun global-scale-up () (defun global-scale-up ()
(interactive) (interactive)
(global-scale-internal (incf size 20))) (global-scale-internal (setq size (+ size 20))))
(defun global-scale-down () (defun global-scale-down ()
(interactive) (interactive)
(global-scale-internal (decf size 20))) (global-scale-internal (setq size (- size 20))))
(defun global-scale-internal (arg) (defun global-scale-internal (arg)
(set-face-attribute 'default (selected-frame) :height arg) (set-face-attribute 'default (selected-frame) :height arg)