awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Preserve current directory when splitting eshell

Browse Source 
Fixes #3091
This commit is contained in:
Henrik Lissner
2020-05-11 22:09:17 -04:00
parent 24aabfc8e0
commit de27b2c041
1 changed files with 9 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
modules/term/eshell/autoload/eshell.el
View File

@ -21,13 +21,15 @@
t)) t))
(defun +eshell--bury-buffer (&optional dedicated-p) (defun +eshell--bury-buffer (&optional dedicated-p)
(unless (switch-to-prev-buffer nil 'bury) (let ((directory default-directory))
(switch-to-buffer (doom-fallback-buffer))) (unless (switch-to-prev-buffer nil 'bury)
(when (eq major-mode 'eshell-mode) (switch-to-buffer (doom-fallback-buffer)))
(switch-to-buffer (doom-fallback-buffer))) (when (eq major-mode 'eshell-mode)
(when +eshell-enable-new-shell-on-split (switch-to-buffer (doom-fallback-buffer)))
(when-let (win (get-buffer-window (+eshell/here))) (when +eshell-enable-new-shell-on-split
(set-window-dedicated-p win dedicated-p)))) (let ((default-directory directory))
(when-let (win (get-buffer-window (+eshell/here t)))
(set-window-dedicated-p win dedicated-p))))))
(defun +eshell--setup-window (window &optional flag) (defun +eshell--setup-window (window &optional flag)
(when (window-live-p window) (when (window-live-p window)