(shell-mode): Pass t to comint-read-input-ring.

diff --git a/lisp/shell.el b/lisp/shell.el
index b4a65ed4f2ed7f7a6fba60f0e2bc9f4e3cde75c7..2110dea3582b49b9e512e5a141b48e55bf4cf335 100644 (file)
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -68,7 +68,7 @@
 ;;; m-R     comint-previous-matching-input-from-input -"- matching input
 ;;; m-s     comint-next-matching-input      Next input that matches
 ;;; m-S     comint-next-matching-input-from-input     -"- matching input
-;;; m-c-r   comint-previous-input-matching  Search backwards in input history
+;;; m-c-l   comint-show-output             Show last batch of process output
 ;;; return  comint-send-input
 ;;; c-a     comint-bol                      Beginning of line; skip prompt
 ;;; c-d            comint-delchar-or-maybe-eof     Delete char unless at end of buff.
@@ -301,7 +301,7 @@ cause the window to scroll to the end of the buffer."
                    ((string-match "ksh$" shell) "~/.sh_history")
                    (t "~/.history")))))
   (run-hooks 'shell-mode-hook)
-  (comint-read-input-ring)
+  (comint-read-input-ring t)
   (shell-dirstack-message))
 \f
 ;;;###autoload