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." (= start end) (char-after start) (= (char-syntax (char-after start)) ?\()) - (list start (save-excursion (forward-sexp 1) (point)))) + (list start + (save-excursion + (goto-char start) + (forward-sexp 1) + (point)))) ((and (= mode 1) (= start end) (char-after start) |