diff options
| author | Glenn Morris | 2013-02-06 20:54:50 -0500 |
|---|---|---|
| committer | Glenn Morris | 2013-02-06 20:54:50 -0500 |
| commit | 925baaa91d731fba2d3d9bf16c8af29735f1999c (patch) | |
| tree | 41145625385ef6520194cfcbe8aea45c386a01b6 | |
| parent | 55b056bacf43ae3daeebe484911ef3c8acbc9516 (diff) | |
| download | emacs-925baaa91d731fba2d3d9bf16c8af29735f1999c.tar.gz emacs-925baaa91d731fba2d3d9bf16c8af29735f1999c.zip | |
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 | |||
| 865 | 865 | ||
| 866 | ;; Find its binding. | 866 | ;; Find its binding. |
| 867 | (let* ((fun (key-binding (vector (car event)))) | 867 | (let* ((fun (key-binding (vector (car event)))) |
| 868 | ;; FIXME This doesn't make sense, because | ||
| 869 | ;; event-click-count always returns something >= 1. | ||
| 868 | (do-multi-click (and (> (event-click-count event) 0) | 870 | (do-multi-click (and (> (event-click-count event) 0) |
| 869 | (functionp fun) | 871 | (functionp fun) |
| 870 | (not (memq fun '(mouse-set-point | 872 | (not (memq fun '(mouse-set-point |