diff options
| author | Richard M. Stallman | 2004-12-30 01:47:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-12-30 01:47:35 +0000 |
| commit | de653a636e5a420096829e393d6cc40f5bc545ac (patch) | |
| tree | 266d9fb76885377d3f285e352987ec3e78651a70 | |
| parent | 188577ceca213861faca70fdf63e3f31f18c1d75 (diff) | |
| download | emacs-de653a636e5a420096829e393d6cc40f5bc545ac.tar.gz emacs-de653a636e5a420096829e393d6cc40f5bc545ac.zip | |
(eshell-previous-matching-input):
Start the deletion from the end of the output.
| -rw-r--r-- | lisp/eshell/em-hist.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index f4bfea798e0..573d06337db 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el | |||
| @@ -840,7 +840,7 @@ If N is negative, find the next or Nth next match." | |||
| 840 | (unless (minibuffer-window-active-p (selected-window)) | 840 | (unless (minibuffer-window-active-p (selected-window)) |
| 841 | (message "History item: %d" (- (ring-length eshell-history-ring) pos))) | 841 | (message "History item: %d" (- (ring-length eshell-history-ring) pos))) |
| 842 | ;; Can't use kill-region as it sets this-command | 842 | ;; Can't use kill-region as it sets this-command |
| 843 | (delete-region (save-excursion (eshell-bol) (point)) (point)) | 843 | (delete-region eshell-last-output-end (point)) |
| 844 | (insert-and-inherit (eshell-get-history pos))))) | 844 | (insert-and-inherit (eshell-get-history pos))))) |
| 845 | 845 | ||
| 846 | (defun eshell-next-matching-input (regexp arg) | 846 | (defun eshell-next-matching-input (regexp arg) |