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:
parent
0bb6b2dd1e
commit
d06bc48716
@ -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--
|
||||
|
@ -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")
|
||||
|
@ -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
|
||||
|
Loading…
x
Reference in New Issue
Block a user