Lines Matching +defs:time +defs:up
32 ;; events into different event types, like 'mwheel-up' or
63 'wheel-up
71 (defvar mouse-wheel-up-button 5)
72 (make-obsolete-variable 'mouse-wheel-up-button
73 'mouse-wheel-up-event)
74 (defcustom mouse-wheel-up-event
79 mouse-wheel-up-button)))
80 "Event used for scrolling up."
101 (defcustom mouse-wheel-inhibit-click-time 0.35
162 mouse-wheel-up-event
186 "Scroll up or down according to the EVENT.
203 ;; So by adding things up we get a squaring up (1, 3, 6, 10, 15, ...).
222 ((eq button mouse-wheel-up-event)
223 (condition-case nil (scroll-up amt)
225 (end-of-buffer (while t (scroll-up)))))
228 (when (and mouse-wheel-click-event mouse-wheel-inhibit-click-time)
233 (run-with-timer mouse-wheel-inhibit-click-time nil
244 (up mouse-wheel-up-event)
246 (nconc (mapcar (lambda (amt) `[(,@(if (consp amt) (car amt)) ,up)])