diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-07-28 02:14:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-07-28 02:14:03 +0000 |
| commit | 88ab04fb2bef39a3ec94f3d1c6f637fdcd53626b (patch) | |
| tree | e95622d0fc5540dc4f1455104e0c62b448f75515 /lisp/=isearch-old.el | |
| parent | 640fb248bf2ef13001a3fc98710ae9acb8f34f97 (diff) | |
| download | emacs-88ab04fb2bef39a3ec94f3d1c6f637fdcd53626b.tar.gz | |
entered into RCS
Diffstat (limited to 'lisp/=isearch-old.el')
| -rw-r--r-- | lisp/=isearch-old.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/=isearch-old.el b/lisp/=isearch-old.el index a030ba4f4c9..ee7a1b04476 100644 --- a/lisp/=isearch-old.el +++ b/lisp/=isearch-old.el @@ -449,7 +449,7 @@ is treated as a regexp. See \\[isearch-forward] for more info." (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 |