diff options
| -rw-r--r-- | helm-buffers.el | 7 | ||||
| -rw-r--r-- | helm-types.el | 2 |
2 files changed, 7 insertions, 2 deletions
diff --git a/helm-buffers.el b/helm-buffers.el index 79efe0c5..313fa87c 100644 --- a/helm-buffers.el +++ b/helm-buffers.el @@ -947,12 +947,17 @@ If REGEXP-FLAG is given use `query-replace-regexp'." (helm-exit-and-execute-action 'switch-to-buffer-other-frame))) (put 'helm-buffer-switch-other-frame 'helm-only t) +(defun helm-buffers-switch-to-buffer-other-tab (_candidate) + (let ((bufs (helm-marked-candidates))) + (cl-loop for buf in bufs + do (switch-to-buffer-other-tab buf)))) + (defun helm-buffers-switch-to-buffer-new-tab () "Run switch to buffer in other tab action from `helm-source-buffers-list'." (interactive) (cl-assert (fboundp 'tab-bar-mode) nil "Tab-bar-mode not available") (with-helm-alive-p - (helm-exit-and-execute-action 'switch-to-buffer-other-tab))) + (helm-exit-and-execute-action 'helm-buffers-switch-to-buffer-other-tab))) (put 'helm-buffers-switch-to-buffer-new-tab 'helm-only t) (defun helm-buffer-switch-buffers (_candidate) diff --git a/helm-types.el b/helm-types.el index 1406db02..cef1c64c 100644 --- a/helm-types.el +++ b/helm-types.el @@ -173,7 +173,7 @@ 'switch-to-buffer-other-frame (lambda () (and (fboundp 'tab-bar-mode) "Switch to buffer other tab `C-c C-t'")) - 'switch-to-buffer-other-tab + 'helm-buffers-switch-to-buffer-other-tab "Switch to buffer at line number" 'helm-switch-to-buffer-at-linum "Browse project `C-x C-d'" |