# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1172258485 0
# Node ID 47b27cdb3ec23b6b50fd396b28f9435daebc68fa
# Parent  4a7eb3370da0f0073705b68c4fbd4b689a701384
(comint-read-input-ring): Use comint-input-ring-size from the comint buffer
instead of the temporary one.

diff -r 4a7eb3370da0 -r 47b27cdb3ec2 lisp/comint.el
--- a/lisp/comint.el	Fri Feb 23 19:13:40 2007 +0000
+++ b/lisp/comint.el	Fri Feb 23 19:21:25 2007 +0000
@@ -896,7 +896,7 @@
 		 ;; Watch for those date stamps in history files!
 		 (goto-char (point-max))
 		 (let (start end history)
-		   (while (and (< count comint-input-ring-size)
+		   (while (and (< count size)
 			       (re-search-backward comint-input-ring-separator nil t)
 			       (setq end (match-beginning 0)))
 		     (if (re-search-backward comint-input-ring-separator nil t)