Fix keybindings

This commit is contained in:
Derek Taylor
2024-10-04 12:41:16 -05:00
parent c0a0464b5a
commit 0766a2f17e
2 changed files with 21 additions and 0 deletions

View File

@@ -308,6 +308,7 @@
"e F" '(ediff-files3 :wk "Run ediff on three files")
"e h" '(counsel-esh-history :which-key "Eshell history")
"e l" '(eval-last-sexp :wk "Evaluate elisp expression before point")
"e n" '(eshell-new :wk "Create new eshell buffer")
"e r" '(eval-region :wk "Evaluate elisp in region")
"e R" '(eww-reload :which-key "Reload current page in EWW")
"e s" '(eshell :which-key "Eshell")
@@ -664,10 +665,20 @@
;; Disabling company mode in eshell, because it's annoying.
(setq company-global-modes '(not eshell-mode))
;; Adding a keybinding for 'pcomplete-list' on F9 key.
(add-hook 'eshell-mode-hook
(lambda ()
(define-key eshell-mode-map (kbd "<f9>") #'pcomplete-list)))
;; A function for easily creating multiple buffers of 'eshell'.
;; NOTE: `C-u M-x eshell` would also create new 'eshell' buffers.
(defun eshell-new (name)
"Create new eshell buffer named NAME."
(interactive "sName: ")
(setq name (concat "$" name))
(eshell)
(rename-buffer name))
(use-package eshell-toggle
:custom
(eshell-toggle-size-fraction 3)

View File

@@ -464,6 +464,7 @@ You can use the bindings CTRL plus =/- for zooming in/out. You can also use CTR
"e F" '(ediff-files3 :wk "Run ediff on three files")
"e h" '(counsel-esh-history :which-key "Eshell history")
"e l" '(eval-last-sexp :wk "Evaluate elisp expression before point")
"e n" '(eshell-new :wk "Create new eshell buffer")
"e r" '(eval-region :wk "Evaluate elisp in region")
"e R" '(eww-reload :which-key "Reload current page in EWW")
"e s" '(eshell :which-key "Eshell")
@@ -965,6 +966,15 @@ Eshell is an Emacs 'shell' that is written in Elisp.
(lambda ()
(define-key eshell-mode-map (kbd "<f9>") #'pcomplete-list)))
;; A function for easily creating multiple buffers of 'eshell'.
;; NOTE: `C-u M-x eshell` would also create new 'eshell' buffers.
(defun eshell-new (name)
"Create new eshell buffer named NAME."
(interactive "sName: ")
(setq name (concat "$" name))
(eshell)
(rename-buffer name))
(use-package eshell-toggle
:custom
(eshell-toggle-size-fraction 3)