diff options
| author | Case Duckworth | 2022-01-31 00:54:53 -0600 |
|---|---|---|
| committer | Case Duckworth | 2022-01-31 00:54:53 -0600 |
| commit | 195618bcf36a4ee2fe6f038d6d27936f1c1f22df (patch) | |
| tree | 7235485f19743eed5e13157beafe941f42801490 /lisp/+eshell.el | |
| parent | Add secret-source as an auth-source (diff) | |
| download | emacs-195618bcf36a4ee2fe6f038d6d27936f1c1f22df.tar.gz emacs-195618bcf36a4ee2fe6f038d6d27936f1c1f22df.zip | |
Random stuff
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 |