aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEl Azimov <el@azimov.rocks>2020-08-08 15:13:08 +0500
committerEivind Fonn <evfonn@gmail.com>2020-08-16 09:35:07 +0200
commitea7126e8ee7d3500a59082cd6d5abd76bf097859 (patch)
tree4309d196aabebdcef67193904c3bb8c1a1c488af
parent2bc6ca3587502fde67b93e411e329fc8224c916a (diff)
Fix multiline tag text object.
-rw-r--r--evil-common.el4
1 files 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)))))