summaryrefslogtreecommitdiff
path: root/lisp/mouse.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r--lisp/mouse.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index c67d22c158e..e54ecd0cf80 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -677,7 +677,7 @@ remains active. Otherwise, it remains until the next input event."
(mouse-set-region-1))))
(delete-overlay mouse-drag-overlay)
;; Run the binding of the terminating up-event.
- (when (and (fboundp fun)
+ (when (and (functionp fun)
(= start-hscroll (window-hscroll start-window)))
(setq unread-command-events
(cons event unread-command-events)))))