[nongnu] elpa/evil-escape a7714e61b2 112/133: set `this-original-command`

[ELPA Syncer]

branch: elpa/evil-escape
commit a7714e61b2cf840e4feb7cf0a8b76d43436b29a7
Author: Daniel Mijares <daniel.j.mijares@gmail.com>
Commit: Daniel Mijares <daniel.j.mijares@gmail.com>

    set `this-original-command`
    
    Should be the same value as `this-command` as no remapping has occurred.
---
 evil-escape.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/evil-escape.el b/evil-escape.el
index ed4d6996a7..a62377fdc8 100644
--- a/evil-escape.el
+++ b/evil-escape.el
@@ -187,7 +187,10 @@ with a key sequence."
                           (equal (this-command-keys) (evil-escape--second-key))
                           (char-equal evt fkey))))
             (evil-repeat-stop)
-            (when (evil-escape-func) (setq this-command (evil-escape-func))))
+            (let ((esc-fun (evil-escape-func)))
+              (when esc-fun
+                (setq this-command esc-fun)
+                (setq this-original-command esc-fun))))
            ((null evt))
            (t (setq unread-command-events
                     (append unread-command-events (list evt)))))))))