diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-02-06 20:54:50 -0500 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-02-06 20:54:50 -0500 |
| commit | 925baaa91d731fba2d3d9bf16c8af29735f1999c (patch) | |
| tree | 41145625385ef6520194cfcbe8aea45c386a01b6 | |
| parent | 55b056bacf43ae3daeebe484911ef3c8acbc9516 (diff) | |
| download | emacs-925baaa91d731fba2d3d9bf16c8af29735f1999c.tar.gz | |
mouse.el comment
| -rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index a1aa104495a..bd7242e3b20 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -865,6 +865,8 @@ DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by ;; Find its binding. (let* ((fun (key-binding (vector (car event)))) + ;; FIXME This doesn't make sense, because + ;; event-click-count always returns something >= 1. (do-multi-click (and (> (event-click-count event) 0) (functionp fun) (not (memq fun '(mouse-set-point |