diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-07-09 18:36:21 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-07-09 18:36:21 +0000 |
| commit | f45aab653b455d319ad271b0a43939a4c3f07e37 (patch) | |
| tree | f7699bbe6dbb6296d04e66f85cbb4428d2b00d2f /lisp/mouse.el | |
| parent | 0b50c67ff63a78e90b16901612d9f8ab43d05f7a (diff) | |
| download | emacs-f45aab653b455d319ad271b0a43939a4c3f07e37.tar.gz | |
(mouse-drag-region): Use functionp rather than fboundp.
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 2 |
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))))) |