[nongnu] elpa/helm 3c64aa842a: Use helm-make-command-from-action in last remaining places

[ELPA Syncer]

branch: elpa/helm
commit 3c64aa842a7d382460cacc9d6fbe0e39d012b4f5
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Use helm-make-command-from-action in last remaining places
---
 helm-comint.el | 16 ++++++----------
 helm-eshell.el | 16 ++++++----------
 2 files changed, 12 insertions(+), 20 deletions(-)

diff --git a/helm-comint.el b/helm-comint.el
index e7dff8d358..c81805bde7 100644
--- a/helm-comint.el
+++ b/helm-comint.el
@@ -149,17 +149,13 @@ See `helm-comint-prompts-list'."
 (defun helm-comint-prompts-goto-other-frame (candidate)
   (helm-comint-prompts-goto candidate 'switch-to-buffer-other-frame))
 
-(defun helm-comint-prompts-other-window ()
-  (interactive)
-  (with-helm-alive-p
-    (helm-exit-and-execute-action 'helm-comint-prompts-goto-other-window)))
-(put 'helm-comint-prompts-other-window 'helm-only t)
+(helm-make-command-from-action helm-comint-prompts-other-window
+    "Switch to comint prompt in other window."
+  'helm-comint-prompts-goto-other-window)
 
-(defun helm-comint-prompts-other-frame ()
-  (interactive)
-  (with-helm-alive-p
-    (helm-exit-and-execute-action 'helm-comint-prompts-goto-other-frame)))
-(put 'helm-comint-prompts-other-frame 'helm-only t)
+(helm-make-command-from-action helm-comint-prompts-other-frame
+    "Switch to comint prompt in other frame."
+  'helm-comint-prompts-goto-other-frame)
 
 ;;;###autoload
 (defun helm-comint-prompts ()
diff --git a/helm-eshell.el b/helm-eshell.el
index c41b19132c..9d7ae3b247 100644
--- a/helm-eshell.el
+++ b/helm-eshell.el
@@ -452,17 +452,13 @@ See `helm-eshell-prompts-list'."
 (defun helm-eshell-prompts-goto-other-frame (candidate)
   (helm-eshell-prompts-goto candidate 'switch-to-buffer-other-frame))
 
-(defun helm-eshell-prompts-other-window ()
-  (interactive)
-  (with-helm-alive-p
-    (helm-exit-and-execute-action 'helm-eshell-prompts-goto-other-window)))
-(put 'helm-eshell-prompts-other-window 'helm-only t)
+(helm-make-command-from-action helm-eshell-prompts-other-window
+    "Switch to eshell prompt in other window."
+  'helm-eshell-prompts-goto-other-window)
 
-(defun helm-eshell-prompts-other-frame ()
-  (interactive)
-  (with-helm-alive-p
-    (helm-exit-and-execute-action 'helm-eshell-prompts-goto-other-frame)))
-(put 'helm-eshell-prompts-other-frame 'helm-only t)
+(helm-make-command-from-action helm-eshell-prompts-other-frame
+    "Switch to eshell prompt in other frame."
+  'helm-eshell-prompts-goto-other-frame)
 
 ;;;###autoload
 (defun helm-eshell-prompts ()