[nongnu] elpa/meow 1994d6b614: In `meow-reverse`, run `C-x C-x` instead of running `exchange-point-and-mark` directly.

[ELPA Syncer]

branch: elpa/meow
commit 1994d6b614e31dc226a24ec872e9c8d982cb7418
Author: okamsn <okamsn@users.noreply.github.com>
Commit: esrh <16175276+eshrh@users.noreply.github.com>

    In `meow-reverse`, run `C-x C-x` instead of running 
`exchange-point-and-mark` directly.
    
    - Add `meow--kbd-exchange-point-and-mark` with value "C-x C-x".
    - Change `meow-reverse` to run this macro via `meow--execute-kbd-macro`.
    
    This change supports using `rectangle-exchange-point-and-mark` (`C-x C-x`) 
in
    `rectangle-mark-mode`.
---
 meow-command.el | 2 +-
 meow-var.el     | 3 +++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/meow-command.el b/meow-command.el
index fbff92812f..04ba703d08 100644
--- a/meow-command.el
+++ b/meow-command.el
@@ -128,7 +128,7 @@ The direction of selection is MARK -> POS."
 This command supports `meow-selection-command-fallback'."
   (interactive)
   (meow--with-selection-fallback
-   (exchange-point-and-mark)
+   (meow--execute-kbd-macro meow--kbd-exchange-point-and-mark)
    (if (member last-command
                '(meow-visit meow-search meow-mark-symbol meow-mark-word))
        (meow--highlight-regexp-in-buffer (car regexp-search-ring))
diff --git a/meow-var.el b/meow-var.el
index 33f112555a..7466a3fc9c 100644
--- a/meow-var.el
+++ b/meow-var.el
@@ -392,6 +392,9 @@ Use (setq meow-keypad-describe-keymap-function 'nil) to 
disable popup.")
 (defvar meow--kbd-kill-region "C-w"
   "KBD macro for command `kill-region'.")
 
+(defvar meow--kbd-exchange-point-and-mark "C-x C-x"
+  "KBD macro for command `exchange-point-and-mark'.")
+
 (defvar meow--kbd-back-to-indentation "M-m"
   "KBD macro for command `back-to-indentation'.")