about summary refs log tree commit diff stats
path: root/lisp/+eshell.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/+eshell.el')
-rw-r--r--lisp/+eshell.el7
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