[nongnu] elpa/helm 0e826d535b 1/2: Switch to marked buffers in other frame

[ELPA Syncer]

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

    Switch to marked buffers in other frame
---
 helm-buffers.el | 8 +++++++-
 helm-types.el   | 2 +-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/helm-buffers.el b/helm-buffers.el
index ccdd778e4d..579baadacd 100644
--- a/helm-buffers.el
+++ b/helm-buffers.el
@@ -960,11 +960,17 @@ If REGEXP-FLAG is given use `query-replace-regexp'."
     (helm-exit-and-execute-action 'helm-buffer-switch-buffers-other-window)))
 (put 'helm-buffer-switch-other-window 'helm-only t)
 
+(defun helm-buffer-switch-to-buffer-other-frame (_candidate)
+  "Display marked buffers in other frame."
+  (let ((bufs (helm-marked-candidates)))
+    (select-frame (make-frame))
+    (helm-window-show-buffers bufs)))
+
 (defun helm-buffer-switch-other-frame ()
   "Run switch to other frame action from `helm-source-buffers-list'."
   (interactive)
   (with-helm-alive-p
-    (helm-exit-and-execute-action 'switch-to-buffer-other-frame)))
+    (helm-exit-and-execute-action 'helm-buffer-switch-to-buffer-other-frame)))
 (put 'helm-buffer-switch-other-frame 'helm-only t)
 
 (defun helm-buffers-switch-to-buffer-other-tab (_candidate)
diff --git a/helm-types.el b/helm-types.el
index 465b186669..b654a0ff52 100644
--- a/helm-types.el
+++ b/helm-types.el
@@ -171,7 +171,7 @@
    "Switch to buffer(s) other window `C-c o'"
    'helm-buffer-switch-buffers-other-window
    "Switch to buffer other frame `C-c C-o'"
-   'switch-to-buffer-other-frame
+   'helm-buffer-switch-to-buffer-other-frame
    (lambda () (and (fboundp 'tab-bar-mode)
                    "Switch to buffer other tab `C-c C-t'"))
    'helm-buffers-switch-to-buffer-other-tab