Emacs: Back to vterm

This commit is contained in:
Joseph Ferano 2024-08-01 06:29:48 +07:00
parent 0f0582c184
commit c644a4346d

View File

@ -156,16 +156,16 @@ Finish up
#+END_SRC #+END_SRC
** Package Management ** Package Management
#+begin_src emacs-lisp #+begin_src emacs-lisp
;; Also read: <https://protesilaos.com/codelog/2022-05-13-emacs-elpa-devel/> ;; Also read: <https://protesilaos.com/codelog/2022-05-13-emacs-elpa-devel/>
(setq package-archives (setq package-archives
'(("elpa" . "https://elpa.gnu.org/packages/") '(("elpa" . "https://elpa.gnu.org/packages/")
("elpa-devel" . "https://elpa.gnu.org/devel/") ("elpa-devel" . "https://elpa.gnu.org/devel/")
("nongnu" . "https://elpa.nongnu.org/nongnu/") ("nongnu" . "https://elpa.nongnu.org/nongnu/")
("melpa" . "https://melpa.org/packages/"))) ("melpa" . "https://melpa.org/packages/")))
;; Proof-of-concept to install a list of packages ;; Proof-of-concept to install a list of packages
(mapc (mapc
(lambda (package) (lambda (package)
(unless (package-installed-p package) (unless (package-installed-p package)
(package-install package))) (package-install package)))
@ -204,7 +204,7 @@ Finish up
consult-eglot consult-eglot
all-the-icons-completion all-the-icons-completion
helpful helpful
;; vterm vterm
eat eat
;; Enhancements ;; Enhancements
olivetti olivetti
@ -255,14 +255,14 @@ Finish up
disaster disaster
magit)) magit))
(setopt package-vc-selected-packages (setopt package-vc-selected-packages
'((dotenv :url "https://github.com/pkulev/dotenv.el") '((dotenv :url "https://github.com/pkulev/dotenv.el")
(indent-bars :url "https://github.com/jdtsmith/indent-bars") (indent-bars :url "https://github.com/jdtsmith/indent-bars")
(doom-themes :url "https://github.com/JosephFerano/doom-themes") (doom-themes :url "https://github.com/JosephFerano/doom-themes")
(org-timeblock :url "https://github.com/ichernyshovvv/org-timeblock") (org-timeblock :url "https://github.com/ichernyshovvv/org-timeblock")
(dape :url "https://github.com/svaante/dape") (dape :url "https://github.com/svaante/dape")
(app-launcher :url "https://github.com/SebastienWae/app-launcher"))) (app-launcher :url "https://github.com/SebastienWae/app-launcher")))
(package-initialize) (package-initialize)
#+end_src #+end_src
** COMMENT Benchmarking ** COMMENT Benchmarking
@ -894,8 +894,10 @@ Fill region is great, except when you don't need it...
(kbd "SPC br") 'joe/revert-buffer-no-confirm (kbd "SPC br") 'joe/revert-buffer-no-confirm
(kbd "SPC gg") 'magit-status (kbd "SPC gg") 'magit-status
(kbd "SPC gc") 'magit-clone (kbd "SPC gc") 'magit-clone
(kbd "SPC ss") 'eat ;; (kbd "SPC ss") 'eat
(kbd "SPC sv") 'eat-other-window ;; (kbd "SPC sv") 'eat-other-window
(kbd "SPC ss") 'joe/vterm-here
(kbd "SPC sv") 'vterm-other-window
(kbd "SPC Ba") 'joe/bookmark-set-and-save (kbd "SPC Ba") 'joe/bookmark-set-and-save
(kbd "SPC Bd") 'bookmark-delete (kbd "SPC Bd") 'bookmark-delete
(kbd "SPC mr") 'joe/compile-run (kbd "SPC mr") 'joe/compile-run
@ -1994,7 +1996,7 @@ be kept here commented out in case we want to try it again.
(global-set-key (kbd "C-h C") #'helpful-command) (global-set-key (kbd "C-h C") #'helpful-command)
#+end_src #+end_src
** Terminals/Shells ** Terminals/Shells
*** COMMENT vterm *** vterm
#+begin_src emacs-lisp #+begin_src emacs-lisp
(require 'vterm) (require 'vterm)
(setq vterm-shell "/bin/fish") (setq vterm-shell "/bin/fish")
@ -2026,8 +2028,8 @@ be kept here commented out in case we want to try it again.
(defun joe/vterm-mode-hook () (defun joe/vterm-mode-hook ()
(define-key vterm-mode-map (kbd "C-c C-x") #'vterm-send-C-x) (define-key vterm-mode-map (kbd "C-c C-x") #'vterm-send-C-x)
(when (boundp 'evil-mode) (when (boundp 'evil-mode)
(evil-define-key 'insert vterm-mode-map (kbd "C-f") #'vterm-send-C-f) (evil-define-key 'insert vterm-mode-map (kbd "C-f") (lambda () (interactive) (vterm-send-key (kbd "C-f"))))
(evil-define-key 'insert vterm-mode-map (kbd "C-w") #'vterm-send-C-w) (evil-define-key 'insert vterm-mode-map (kbd "C-w") (lambda () (interactive) (vterm-send-key (kbd "C-w"))))
(evil-define-key 'insert vterm-mode-map (kbd "<delete>") #'vterm-send-delete)) (evil-define-key 'insert vterm-mode-map (kbd "<delete>") #'vterm-send-delete))
(setq-local global-hl-line-mode nil) (setq-local global-hl-line-mode nil)
(setq buffer-face-mode-face '(:family "Fira Code Nerd Font")) (setq buffer-face-mode-face '(:family "Fira Code Nerd Font"))
@ -2079,7 +2081,7 @@ the right frame, I'm going to use the frame's name to close and remove the hook
(add-hook 'delete-frame-functions #'joe/kill-vterm-scratch) (add-hook 'delete-frame-functions #'joe/kill-vterm-scratch)
(add-hook 'kill-buffer-hook #'joe/kill-frame)))) (add-hook 'kill-buffer-hook #'joe/kill-frame))))
#+end_src #+end_src
*** eat *** COMMENT eat
#+begin_src emacs-lisp #+begin_src emacs-lisp
(defun joe/eat-mode-hook () (defun joe/eat-mode-hook ()
(setq-local global-hl-line-mode nil) (setq-local global-hl-line-mode nil)