emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/anzu 97976620ae 222/288: Merge pull request #64 from akich


From: ELPA Syncer
Subject: [nongnu] elpa/anzu 97976620ae 222/288: Merge pull request #64 from akicho8/fix-region-word-replace
Date: Thu, 6 Jan 2022 03:58:54 -0500 (EST)

branch: elpa/anzu
commit 97976620aedf664a54ce6e98a278bed41aacaaa6
Merge: 31f70860ef d6ffd23cb5
Author: Syohei YOSHIDA <syohex@gmail.com>
Commit: Syohei YOSHIDA <syohex@gmail.com>

    Merge pull request #64 from akicho8/fix-region-word-replace
    
    Fix word replace in region
---
 anzu.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/anzu.el b/anzu.el
index 44a9f0e607..dc31378a24 100644
--- a/anzu.el
+++ b/anzu.el
@@ -661,9 +661,9 @@
       (point-max))))
 
 (defun anzu--region-begin (use-region thing backward)
-  (cond (current-prefix-arg (line-beginning-position))
+  (cond (use-region (region-beginning))
+        (current-prefix-arg (line-beginning-position))
         (thing (anzu--thing-begin thing))
-        (use-region (region-beginning))
         (backward (point-min))
         (t (point))))
 
@@ -673,10 +673,10 @@
     (line-end-position)))
 
 (defun anzu--region-end (use-region thing)
-  (cond (current-prefix-arg
+  (cond (use-region (region-end))
+        (current-prefix-arg
          (anzu--line-end-position (prefix-numeric-value current-prefix-arg)))
         (thing (anzu--thing-end thing))
-        (use-region (region-end))
         (t (point-max))))
 
 (defun anzu--begin-thing (at-cursor thing)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]