Mercurial > emacs
changeset 888:44ce50dadb7f
entered into RCS
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 28 Jul 1992 02:14:03 +0000 |
parents | 72870fa245ce |
children | b2fef2e0c761 |
files | lisp/=isearch-old.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/=isearch-old.el Mon Jul 27 21:23:12 1992 +0000 +++ b/lisp/=isearch-old.el Tue Jul 28 02:14:03 1992 +0000 @@ -449,7 +449,7 @@ (setq regexp-search-ring (cons (cons search-string uppercase-flag) regexp-search-ring) regexp-search-ring-yank-pointer regexp-search-ring) - (if (> (length regexp-search-ring) regexp-search-ring-max) + (if (> (length regexp-search-ring) search-ring-max) (setcdr (nthcdr (1- search-ring-max) regexp-search-ring) nil))) (if (not (member search-string search-ring)) (progn