From f45aab653b455d319ad271b0a43939a4c3f07e37 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 9 Jul 2000 18:36:21 +0000 Subject: [PATCH] (mouse-drag-region): Use functionp rather than fboundp. --- lisp/ChangeLog | 13 +++++++++++++ lisp/mouse.el | 2 +- 2 files changed, 14 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 51c23f6fe8c..c39dc035b63 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2000-07-09 Stefan Monnier + + * mouse.el (mouse-drag-region): Use functionp rather than fboundp. + 2000-07-07 Gerd Moellmann * bindings.el: Bind ยด[delete]' to delete-char. @@ -32,6 +36,15 @@ * rmail.el (mail-unsent-separator): Changed "the" to "\\w+", as exim can use "your message" instead of "the message". +2000-07-06 Stefan Monnier + + * facemenu.el: Docstrings fixes. + (facemenu-get-face): Don't use internal-find-face. + (facemenu-iterate): Rename arg to match the docstring. + + * newcomment.el (uncomment-region): Be more careful when skipping + backwards over `=' not to bump into BOBP. + 2000-07-05 Michael Kifer * ediff-diff.el (ediff-wordify): Use syntax table. 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))))) -- 2.39.2