diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index db5fddb2aa..ed5c864eda 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el @@ -999,6 +999,14 @@ eshell-handle-control-codes (beep)) ((eq char ?\C-h) (delete-region (1- (point)) (1+ (point)))) + ((and (eq char ?\) + (memq (char-after (1+ (point))) + '(?\8))) + (let ((end (1+ (point)))) + (beginning-of-line) + (delete-region (point) end) + (delete-char 1)) + (forward-char)) (t (forward-char)))))))