From 1ec715837b4881f7f4dbe320b0ed62557546c492 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 9 Feb 1994 22:21:47 +0000
Subject: [PATCH] (mouse-start-end): Check START rather than point for being at
 eob.

---
 lisp/mouse.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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))
-- 
2.11.4.GIT