From fda9a2bbfd3adcce046c03bee72ba848c61a3e29 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Wed, 16 Dec 2020 02:49:35 +0200 Subject: [PATCH] (flymake-diag-region): Fall back to (end-of-thing 'symbol) * lisp/progmodes/flymake.el (flymake-diag-region): Fall back to (end-of-thing 'symbol) (bug#29193). --- lisp/progmodes/flymake.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index efa7b2ffbf1..6c3e0a19819 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -437,7 +437,8 @@ region is invalid." (if (and col (cl-plusp col)) (let* ((beg (progn (forward-char (1- col)) (point))) - (sexp-end (ignore-errors (end-of-thing 'sexp))) + (sexp-end (or (ignore-errors (end-of-thing 'sexp)) + (ignore-errors (end-of-thing 'symbol)))) (end (or (and sexp-end (not (= sexp-end beg)) sexp-end) -- 2.39.2