Function: gud-tooltip-activate-mouse-motions

gud-tooltip-activate-mouse-motions is a byte-compiled function defined in gud.el.gz.

Signature

(gud-tooltip-activate-mouse-motions ACTIVATEP)

Documentation

Activate/deactivate mouse motion events for the current buffer.

ACTIVATEP non-nil means activate mouse motion events.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/gud.el.gz
;; We don't set track-mouse globally because this is a big redisplay
;; problem in buffers having a pre-command-hook or such installed,
;; which does a set-buffer, like the summary buffer of Gnus.  Calling
;; set-buffer prevents redisplay optimizations, so every mouse motion
;; would be accompanied by a full redisplay.

(defun gud-tooltip-activate-mouse-motions (activatep)
  "Activate/deactivate mouse motion events for the current buffer.
ACTIVATEP non-nil means activate mouse motion events."
  (if activatep
      (progn
        (setq-local gud-tooltip-mouse-motions-active t)
        (setq-local track-mouse t))
    (when gud-tooltip-mouse-motions-active
      (kill-local-variable 'gud-tooltip-mouse-motions-active)
      (kill-local-variable 'track-mouse))))