blob: e7e37e650b765895c9fe1a09c03b370f97713429 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
(require 'eshell)
(defun eshell-other-window (&optional noselect)
"Create an interactive Eshell buffer in another window."
(interactive)
(with-current-buffer (get-buffer-create eshell-buffer-name)
(unless (eq major-mode 'eshell-mode)
(eshell-mode)))
(let ((current-window (selected-window)))
(switch-to-buffer-other-window eshell-buffer-name)
(when noselect
(select-window current-window))))
(global-set-key (kbd "C-c k") 'eshell-other-window)
(provide 'init-eshell)
|
