aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/comint.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/comint.el b/lisp/comint.el
index fff0f077246..ec115ba2c79 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -828,7 +828,7 @@ If N is negative, find the previous or Nth previous match."
828 "Search backwards through input history for match for current input. 828 "Search backwards through input history for match for current input.
829\(Previous history elements are earlier commands.) 829\(Previous history elements are earlier commands.)
830With prefix argument N, search for Nth previous match. 830With prefix argument N, search for Nth previous match.
831If N is negative, find the next or Nth next match." 831If N is negative, search forwards for the -Nth following match."
832 (interactive "p") 832 (interactive "p")
833 (if (not (memq last-command '(comint-previous-matching-input-from-input 833 (if (not (memq last-command '(comint-previous-matching-input-from-input
834 comint-next-matching-input-from-input))) 834 comint-next-matching-input-from-input)))
@@ -844,9 +844,9 @@ If N is negative, find the next or Nth next match."
844 844
845(defun comint-next-matching-input-from-input (arg) 845(defun comint-next-matching-input-from-input (arg)
846 "Search forwards through input history for match for current input. 846 "Search forwards through input history for match for current input.
847\(Previous history elements are earlier commands.) 847\(Following history elements are more recent commands.)
848With prefix argument N, search for Nth previous match. 848With prefix argument N, search for Nth following match.
849If N is negative, find the next or Nth next match." 849If N is negative, search backwards for the -Nth previous match."
850 (interactive "p") 850 (interactive "p")
851 (comint-previous-matching-input-from-input (- arg))) 851 (comint-previous-matching-input-from-input (- arg)))
852 852