emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

tools/eshell: bugfix + minor refactor

Browse source 
+ Change default name for (doom) eshell buffers
+ Fix eshell splitting commands (referring to incorrect subcommand)
+ Correct aliases (using wrong commands)
+ +eshell/run => +eshell/open
+ +eshell/popup => +eshell/open-popup
+ +eshell/tab => +eshell/open-workspace
+ +eshell/prompt => +eshell-prompt (conform to naming convention)
This commit is contained in:
Henrik Lissner 2017-09-27 12:42:24 +02:00
parent e8ff048c9b
commit 0479ac3b88
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 60 additions and 59 deletions
Download patch file Download diff file Expand all files Collapse all files

67
modules/tools/eshell/config.el
View file

@ -3,14 +3,12 @@
;; This is highly experimental. I don't use eshell often, so this may need work.
;; see:
;; + `+eshell/run': open in current buffer
;; + `+eshell/tab': open in separate tab (requires :feature workspaces)
;; + `+eshell/popup': open in a popup
(defvar +eshell-buffers '()
"TODO")
;; + `+eshell/open': open in current buffer
;; + `+eshell/open-popup': open in a popup
;; + `+eshell/open-workspace': open in separate tab (requires :feature workspaces)
(def-package! eshell ; built-in
:commands eshell-mode
:init
(setq eshell-directory-name (concat doom-cache-dir "/eshell")
eshell-scroll-to-bottom-on-input 'all
@ -19,7 +17,7 @@
eshell-kill-processes-on-exit t
;; em-prompt
eshell-prompt-regexp "^.* λ "
eshell-prompt-function #'+eshell/prompt
eshell-prompt-function #'+eshell-prompt
;; em-glob
eshell-glob-case-insensitive t
eshell-error-if-no-glob t
@ -27,17 +25,20 @@
eshell-aliases-file (concat doom-local-dir ".eshell-aliases"))
:config
(set! :popup "^\\*eshell:popup\\*$" :regexp t :size 25)
(set! :evil-state 'eshell-mode 'insert)
;; Keep track of open eshell buffers
(add-hook 'eshell-mode-hook #'+eshell|init)
(add-hook 'eshell-exit-hook #'+eshell|cleanup)
(after! em-term
;; Visual commands require a proper terminal. Eshell can't handle that, so it
;; delegates these commands to a term buffer.
(nconc eshell-visual-commands '("tmux" "htop" "bash" "zsh" "fish" "vim" "nvim"))
(setq eshell-visual-subcommands '(("git" "log" "l" "diff" "show"))))
(defun +eshell|keymap-setup ()
"Setup eshell keybindings. This must be done in a hook because eshell
(defun +eshell|init-keymap ()
"Setup eshell keybindings. This must be done in a hook because eshell-mode
redefines its keys every time `eshell-mode' is enabled."
(map! :map eshell-mode-map
:n "i" #'+eshell/evil-prepend-maybe
@ -48,37 +49,23 @@ redefines its keys every time `eshell-mode' is enabled."
:n "R" #'+eshell/evil-replace-state-maybe
:n "c" #'+eshell/evil-change
:n "C" #'+eshell/evil-change-line
:i "<tab>" #'eshell-pcomplete
:i "C-u" #'eshell-kill-input
:i [tab] #'eshell-pcomplete
:i "SPC" #'self-insert-command
:i "C-u" #'eshell-kill-input
:i "C-a" #'eshell-bol
:i "C-d" #'+eshell/quit-or-delete-char
:i "C-k" #'kill-line
:i "C-p" #'eshell-previous-input
:i "<up>" #'eshell-previous-input
:i "C-n" #'eshell-previous-input
:i "<down>" #'eshell-previous-input
:i "C-n" #'eshell-next-input
:i "<down>" #'eshell-next-input
:m "<return>" #'+eshell/evil-append
:n [remap evil-window-split] #'+eshell/split
:n [remap evil-window-vsplit] #'+eshell/vsplit
:n [remap evil-record-macro] #'eshell-life-is-too-much
[remap doom/close-window-or-tab] #'eshell-life-is-too-much))
(add-hook 'eshell-mode-hook #'+eshell|keymap-setup)
(defun +eshell|cleanup ()
"Close window (or workspace) on quit."
(setq +eshell-buffers (delete (current-buffer) +eshell-buffers))
(cond ((doom-popup-p)
(delete-window))
((and (featurep! :feature workspaces)
(string= "eshell" (+workspace-current-name)))
(+workspace/close-window-or-workspace))))
(add-hook 'eshell-exit-hook #'+eshell|cleanup)
(defun +eshell|init ()
"Keep track of eshell buffers."
(add-to-list '+eshell-buffers (current-buffer)))
(add-hook 'eshell-mode-hook #'+eshell|init)
:n [remap evil-window-split] #'+eshell/split
:n [remap evil-window-vsplit] #'+eshell/vsplit
:n [remap evil-record-macro] #'eshell-life-is-too-much
[remap kill-this-buffer] #'eshell-life-is-too-much
[remap +workspace/close-window-or-workspace] #'eshell-life-is-too-much))
(add-hook 'eshell-mode-hook #'+eshell|init-keymap)
(add-hook! eshell-mode
(add-hook 'evil-insert-state-exit-hook #'hl-line-mode nil t)
@ -91,15 +78,5 @@ redefines its keys every time `eshell-mode' is enabled."
("ll" "ls -l")
("la" "ls -la")
("g" "hub")
("gs" "hub status --oneline .")
("gss" "hub status --oneline")))
;; Custom commands
;; (defun eshell/e (file)
;; (eshell-eval (cond ((doom/popup-p)
;; (doom/popup-save (find-file file))
;; 0)
;; (t (find-file file)
;; 0))))
)
("gs" "hub status --short ."))))