[elpa] externals/ace-window 8969616 68/92: Add execute-command-other-window

[Stefan Monnier]

branch: externals/ace-window
commit 896961694495afe22a87eb5fed8f794b0087fbde
Author: Nick Drozd <nicholasdrozd@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    Add execute-command-other-window
    
    Fixes #160
---
 ace-window.el | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/ace-window.el b/ace-window.el
index bc9a446..bc48edd 100644
--- a/ace-window.el
+++ b/ace-window.el
@@ -162,6 +162,7 @@ Consider changing this if the overlay tends to overlap with 
other things."
     (?j aw-switch-buffer-in-window "Select Buffer")
     (?n aw-flip-window)
     (?u aw-switch-buffer-other-window "Switch Buffer Other Window")
+    (?e aw-execute-command-other-window "Execute Command Other Window")
     (?F aw-split-window-fair "Split Fair Window")
     (?v aw-split-window-vert "Split Vert Window")
     (?b aw-split-window-horz "Split Horz Window")
@@ -763,6 +764,16 @@ Modify `aw-fair-aspect-ratio' to tweak behavior."
       (aw--switch-buffer)
     (aw-flip-window)))
 
+(defun aw-execute-command-other-window (window)
+  "Exectute a command in WINDOW."
+  (aw-switch-to-window window)
+  (unwind-protect
+      (funcall
+       (key-binding
+        (read-key-sequence
+         "Enter key sequence: ")))
+    (aw-flip-window)))
+
 (defun aw--face-rel-height ()
   (let ((h (face-attribute 'aw-leading-char-face :height)))
     (cond