diff options
| -rw-r--r-- | lisp/mouse.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 137fd54d189..64f188928c8 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el | |||
| @@ -290,7 +290,11 @@ If DIR is positive skip forward; if negative, skip backward." | |||
| 290 | (= start end) | 290 | (= start end) |
| 291 | (char-after start) | 291 | (char-after start) |
| 292 | (= (char-syntax (char-after start)) ?\()) | 292 | (= (char-syntax (char-after start)) ?\()) |
| 293 | (list start (save-excursion (forward-sexp 1) (point)))) | 293 | (list start |
| 294 | (save-excursion | ||
| 295 | (goto-char start) | ||
| 296 | (forward-sexp 1) | ||
| 297 | (point)))) | ||
| 294 | ((and (= mode 1) | 298 | ((and (= mode 1) |
| 295 | (= start end) | 299 | (= start end) |
| 296 | (char-after start) | 300 | (char-after start) |