aboutsummaryrefslogtreecommitdiff
path: root/evil-types.el
diff options
context:
space:
mode:
authorAxel Forsman <axelsfor@gmail.com>2023-01-14 11:56:17 +0100
committerAxel Forsman <axelsfor@gmail.com>2023-01-14 20:57:54 +0100
commit29a5d464e973b66abae20e6c4b402a366547c7a5 (patch)
treed6ed74a74b6df31a5e1b5a6f95329c5698010dc0 /evil-types.el
parent00bd29715028b06384435f053a36b6e994f1d1d7 (diff)
Use original state for populating shortcut map
Changing to Operator-pending state before executing (evil-extract-count (this-command-keys)) can give the wrong result since the actual binding used to invoke the operator may not be present in the new state. Resolves #1073
Diffstat (limited to 'evil-types.el')
-rw-r--r--evil-types.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/evil-types.el b/evil-types.el
index 276cdbb..47b064e 100644
--- a/evil-types.el
+++ b/evil-types.el
@@ -305,11 +305,14 @@ directly."
(evil-define-interactive-code "<r>"
"Untyped motion range (BEG END)."
- (evil-operator-range))
+ (let ((range (evil-operator-range)))
+ (setcdr (cdr range) nil)
+ range))
(evil-define-interactive-code "<R>"
"Typed motion range (BEG END TYPE)."
- (evil-operator-range t))
+ (let ((range (evil-operator-range)))
+ (list (car range) (cadr range) (evil-type range))))
(evil-define-interactive-code "<v>"
"Typed motion range of visual range(BEG END TYPE).