Tweak the behaviour of thing-at-point--end-of-sexp

* lisp/thingatpt.el (thing-at-point--end-of-sexp): Don't return
nil when called with point between two parentheses (bug#29499).

1 files changed, 3 insertions, 1 deletions

diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 60a20e2d188..319f4b2cf8a 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -194,7 +194,9 @@ The bounds of THING are determined by `bounds-of-thing-at-point'."
     (if (or (eq char-syntax ?\))
             (and (eq char-syntax ?\") (nth 3 (syntax-ppss))))
         (forward-char 1)
-      (forward-sexp 1))))
+      (condition-case _
+          (forward-sexp 1)
+        (scan-error nil)))))
 
 (define-obsolete-function-alias 'end-of-sexp
   'thing-at-point--end-of-sexp "25.1"