From 3293c256c1887d5a0860295e5bf28fa384dd0980 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 23 Mar 2023 07:40:38 +0200 Subject: emacs: Add thanos/vterm-map Add my custom keymap for vterm/multi-vterm functions --- .emacs.d/init.el | 7 +++++++ emacs.org | 12 ++++++++++-- 2 files changed, 17 insertions(+), 2 deletions(-) diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 5dfc5d8..24b1906 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -327,6 +327,13 @@ Contains the list of packages that need to be installed.") :config (setq multi-vterm-dedicated-window-height 25)) +(defvar thanos/vterm-map (make-sparse-keymap)) +(define-prefix-command 'thanos/vterm-map) +(define-key global-map (kbd "C-c v") 'thanos/vterm-map) +(define-key thanos/vterm-map (kbd "n") 'multi-vterm-next) +(define-key thanos/vterm-map (kbd "p") 'multi-vterm-prev) +(define-key thanos/vterm-map (kbd "d") 'multi-vterm-dedicated-open) + (use-package eshell :ensure nil :bind (("C-c e" . 'eshell)) diff --git a/emacs.org b/emacs.org index f80f9ca..3171e84 100755 --- a/emacs.org +++ b/emacs.org @@ -151,13 +151,12 @@ Set our ~package-archives~, and install our packages (unless (package-installed-p 'use-package) (package-install 'use-package)) - + ;; set and load custom.el (setq custom-file (concat user-emacs-directory "custom.el")) (load custom-file 'noerror) #+end_src - * UI Settings ** Basic UI Fonts and basic appearance settings @@ -415,6 +414,15 @@ Hook with ~dired-mode~ :config (setq multi-vterm-dedicated-window-height 25)) #+end_src +*** Keys +#+begin_src emacs-lisp + (defvar thanos/vterm-map (make-sparse-keymap)) + (define-prefix-command 'thanos/vterm-map) + (define-key global-map (kbd "C-c v") 'thanos/vterm-map) + (define-key thanos/vterm-map (kbd "n") 'multi-vterm-next) + (define-key thanos/vterm-map (kbd "p") 'multi-vterm-prev) + (define-key thanos/vterm-map (kbd "d") 'multi-vterm-dedicated-open) +#+end_src ** Eshell #+begin_src emacs-lisp (use-package eshell -- cgit v1.2.3