From f1017d552a2235bd6647531a60e6432bd8e611d2 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 26 Dec 1996 20:48:46 +0000 Subject: (mouse-start-end): Put values in proper order, in the doublequote case. --- lisp/mouse.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/mouse.el') diff --git a/lisp/mouse.el b/lisp/mouse.el index d45c04cd9df..5613e73c3c1 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -685,14 +685,14 @@ If DIR is positive skip forward; if negative, skip backward." (forward-sexp 1) (point)) (error end)))) - (list (1+ start) - (save-excursion + (list (save-excursion (condition-case nil (progn (goto-char (1+ start)) (backward-sexp 1) (point)) - (error end))))))) + (error end))) + (1+ start))))) ((= mode 1) (list (save-excursion (goto-char start) -- cgit v1.2.1