[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/evil b7bc385a0b 1/3: Fix a-word on whitespace-only line
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/evil b7bc385a0b 1/3: Fix a-word on whitespace-only line |
Date: |
Mon, 29 May 2023 19:01:03 -0400 (EDT) |
branch: elpa/evil
commit b7bc385a0b41c87133e8e7f3beaca2a97b74b17c
Author: Tom Dalziel <tom_dl@hotmail.com>
Commit: Tom Dalziel <tom_dl@hotmail.com>
Fix a-word on whitespace-only line
---
evil-common.el | 4 +++-
evil-tests.el | 4 ++++
2 files changed, 7 insertions(+), 1 deletion(-)
diff --git a/evil-common.el b/evil-common.el
index f772cda915..bada299825 100644
--- a/evil-common.el
+++ b/evil-common.el
@@ -3020,7 +3020,9 @@ linewise, otherwise it is character wise."
(count (abs (or count 1)))
(objbnd (let ((b (bounds-of-thing-at-point thing)))
(and b (< (point) (cdr b)) b)))
- (bnd (or objbnd (evil-bounds-of-not-thing-at-point thing)))
+ (bnd (or objbnd
+ (evil-bounds-of-not-thing-at-point thing)
+ (cons (point-min) (point-max))))
addcurrent other)
;; check if current object is not selected
(when (or (not beg) (not end)
diff --git a/evil-tests.el b/evil-tests.el
index 34850d76ca..da479386fb 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -6147,6 +6147,10 @@ Line 2"))
(evil-test-buffer
"foo\n[ ]\nbar"
("diw")
+ "foo\n[]\nbar")
+ (evil-test-buffer
+ "foo\n[ ]\nbar"
+ ("daw")
"foo\n[]\nbar")))
(ert-deftest evil-test-word-objects-cjk ()