diff options
| -rw-r--r-- | emacs-init.org | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/emacs-init.org b/emacs-init.org index af0812f..4ca3c60 100644 --- a/emacs-init.org +++ b/emacs-init.org @@ -1683,7 +1683,12 @@ When switching between monitors with different resolution, scaling the (scale (if arg -10 10)) (new (+ height scale))) (set-face-attribute 'default nil :height new) - (message "Default height: %s" new))) + (message "Default height: %s. Use +,- for further adjustment" new) + (set-transient-map + (let ((map (make-sparse-keymap))) + (define-key map (vector '(?-)) (lambda () (interactive) (fpi/scale-default-face t))) + (define-key map (vector '(?+)) (lambda () (interactive) (fpi/scale-default-face nil))) + map)))) #+end_src #+begin_src emacs-lisp :tangle no :noweb-ref fpi-bindings (fpi/define-key fpi-map (kbd "+") #'fpi/scale-default-face "Zoom") |