Function: mouse-wheel-global-text-scale

mouse-wheel-global-text-scale is an interactive and byte-compiled function defined in mwheel.el.gz.

Signature

(mouse-wheel-global-text-scale EVENT)

Documentation

Increase or decrease the global font size according to the EVENT.

This invokes global-text-scale-adjust, which see.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mwheel.el.gz
(defun mouse-wheel-global-text-scale (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
        (cond ((memq button (list mouse-wheel-down-event
                                  mouse-wheel-down-alternate-event))
               (global-text-scale-adjust 1))
              ((memq button (list mouse-wheel-up-event
                                  mouse-wheel-up-alternate-event))
               (global-text-scale-adjust -1))))))