From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 9 Feb 1994 22:21:47 +0000 (+0000)
Subject: (mouse-start-end): Check START rather than point for being at eob.
X-Git-Tag: emacs-19.34~9982
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1ec715837b4881f7f4dbe320b0ed62557546c492;p=emacs.git

(mouse-start-end): Check START rather than point for being at eob.
---

diff --git a/lisp/mouse.el b/lisp/mouse.el
index a92cb74196c..137fd54d189 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -288,12 +288,12 @@ If DIR is positive skip forward; if negative, skip backward."
 	 (list start end))
         ((and (= mode 1)
               (= start end)
-	      (not (eobp))
+	      (char-after start)
               (= (char-syntax (char-after start)) ?\())
 	 (list start (save-excursion (forward-sexp 1) (point))))
         ((and (= mode 1)
               (= start end)
-	      (not (eobp))
+	      (char-after start)
               (= (char-syntax (char-after start)) ?\)))
 	 (list (save-excursion 
 		 (goto-char (1+ start))