1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-08 20:58:58 +00:00

; Minor fixes for 'global-text-scale-adjust'

* doc/emacs/display.texi (Text Scale): Improve indexing.

* lisp/mwheel.el (mouse-wheel-global-text-scale): Doc fix.
* lisp/face-remap.el (global-text-scale-adjust-resizes-frames):
Fix a typo.
(global-text-scale-adjust-limits): Doc fix.
(Bug#48307)
This commit is contained in:
Eli Zaretskii 2022-07-02 17:52:23 +03:00
parent 0bb6b2dd1e
commit d06bc48716
3 changed files with 5 additions and 3 deletions

View File

@ -895,6 +895,7 @@ the same as typing @kbd{C-x C-0}.
@cindex ajust global font size
@findex global-text-scale-adjust
@vindex global-text-scale-adjust-resizes-frames
@kindex C-x C-M-+
@kindex C-x C-M-=
@kindex C-x C-M--

View File

@ -452,12 +452,12 @@ See also the related command `global-text-scale-adjust'."
:type '(choice (const :tag "Off" nil)
(const :tag "On" t))
:group 'display
:version "28.1")
:version "29.1")
(defcustom global-text-scale-adjust-limits '(10 . 500)
"Min/max values for `global-text-scale-adjust'.
This is a cons cell where the `car' has the minimum font size and
the `cdr' has the max font size."
the `cdr' has the maximum font size, in units of 1/10 pt."
:version "29.1"
:group 'display
:type '(cons (integer :tag "Min")

View File

@ -43,7 +43,8 @@
(defvar mouse-wheel-mode)
(defun mouse-wheel-global-text-scale (event)
"Increase or decrease the global font size according to the EVENT."
"Increase or decrease the global font size according to the EVENT.
This invokes `global-text-scale-adjust', which see."
(interactive (list last-input-event))
(let ((button (mwheel-event-button event)))
(unwind-protect