andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make exit from text-scale-adjust less confusing

Browse source 
* lisp/face-remap.el (text-scale-adjust): Clear the prompt after
exiting (bug#25978).
This commit is contained in:
Lars Ingebrigtsen 2022-02-08 07:33:24 +01:00
parent 9d1ae05442
commit a4d40a32cc
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/face-remap.el
View file

@ -395,7 +395,11 @@ a top-level keymap, `text-scale-increase' or
(dolist (key '(?- ?+ ?= ?0)) ;; = is often unshifted +.
(define-key map (vector (append mods (list key)))
(lambda () (interactive) (text-scale-adjust (abs inc))))))
map))))) ;; )
map)
nil
;; Clear the prompt after exiting.
(lambda ()
(message ""))))))
(defvar-local text-scale--pinch-start-scale 0
"The text scale at the start of a pinch sequence.")