(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).
This commit is contained in:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user