config/emacs
config/emacs
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

More convenient terminal start

Browse Source
This commit is contained in:
Wojciech Kozlowski 2019-12-15 16:03:52 +01:00
parent b0817e45b3
commit 0ec1a3b89c
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
modules/terminal.el
View File

@ -108,7 +108,8 @@
(defun x-vterm-setup ()
(define-key vterm-mode-map
[remap whole-line-or-region-yank] 'vterm-yank))
[remap whole-line-or-region-yank] 'vterm-yank)
(define-key vterm-mode-map (kbd "C-S-v") 'vterm-yank))
(defun x-vterm-recycle ()
"Kill current buffer and start a vterm in it."
@ -117,6 +118,13 @@
(let ((default-directory working-directory))
(vterm))))
(defun x-vterm-other-window ()
"Start vterm in other window unless in initial buffer."
(interactive)
(if (equal major-mode 'init-buffer-mode)
(vterm)
(vterm-other-window)))
(defun visit-vterm ()
"Open or switch to active vterm.
If current buffer is a vterm:
@ -141,10 +149,12 @@
(buffer-list))))
(if anon-term
(progn
(switch-to-buffer-other-window anon-term)
(if (equal major-mode 'init-buffer-mode)
(switch-to-buffer anon-term)
(switch-to-buffer-other-window anon-term))
(unless (term-check-proc (buffer-name))
(x-vterm-recycle)))
(vterm-other-window)))))
(x-vterm-other-window)))))
:hook
(vterm-mode . x-vterm-setup)