diff options
Diffstat (limited to 'lisp/+eshell.el')
-rw-r--r-- | lisp/+eshell.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/+eshell.el b/lisp/+eshell.el index d49358d..d70bed7 100644 --- a/lisp/+eshell.el +++ b/lisp/+eshell.el | |||
@@ -29,7 +29,12 @@ any directory proferred by `consult-dir'." | |||
29 | "Delete the character to the right, or quit eshell on an empty line." | 29 | "Delete the character to the right, or quit eshell on an empty line." |
30 | (interactive "p") | 30 | (interactive "p") |
31 | (if (and (eolp) (looking-back eshell-prompt-regexp)) | 31 | (if (and (eolp) (looking-back eshell-prompt-regexp)) |
32 | (eshell-life-is-too-much) | 32 | (progn (eshell-life-is-too-much) |
33 | (when (and (<= 1 (count-windows)) | ||
34 | ;; I'm guessing the extra frame is for the server? | ||
35 | (> (length (frame-list)) 2) | ||
36 | server-process) | ||
37 | (delete-frame))) | ||
33 | (delete-forward-char arg))) | 38 | (delete-forward-char arg))) |
34 | 39 | ||
35 | ;;; Insert previous arguments | 40 | ;;; Insert previous arguments |