Mercurial > emacs
changeset 30122:76b25f049c1e
(mouse-drag-region): Use functionp rather than fboundp.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sun, 09 Jul 2000 18:35:46 +0000 |
| parents | f67697912c81 |
| children | b235edbd96c8 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Sun Jul 09 09:33:41 2000 +0000 +++ b/lisp/mouse.el Sun Jul 09 18:35:46 2000 +0000 @@ -677,7 +677,7 @@ (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)))))