From ea7126e8ee7d3500a59082cd6d5abd76bf097859 Mon Sep 17 00:00:00 2001 From: El Azimov Date: Sat, 8 Aug 2020 15:13:08 +0500 Subject: Fix multiline tag text object. --- evil-common.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/evil-common.el b/evil-common.el index 7afa99d..e17029d 100644 --- a/evil-common.el +++ b/evil-common.el @@ -1529,7 +1529,7 @@ last successful match (that caused COUNT to reach zero)." (while (and (setq match (re-search-forward - "<\\([^/ >]+\\)\\(?:[^\"/>]\\|\"[^\"]*\"\\)*?>\\|]+?\\)>" + "<\\([^/ >\n]+\\)\\(?:[^\"/>]\\|\"[^\"]*\"\\)*?>\\|]+?\\)>" nil t dir)) (cond ((match-beginning op) @@ -1563,7 +1563,7 @@ last successful match (that caused COUNT to reach zero)." (let* ((tag (match-string cl)) (refwd (concat "<\\(/\\)?" (regexp-quote tag) - "\\(?:>\\| \\(?:[^\"/>]\\|\"[^\"]*\"\\)*?>\\)")) + "\\(?:>\\|[ \n]\\(?:[^\"/>]\\|\"[^\"]*\"\\)*?>\\)")) (cnt 1)) (while (and (> cnt 0) (re-search-backward refwd nil t dir)) (setq cnt (+ cnt (if (match-beginning 1) dir (- dir))))) -- cgit v1.0