From: Dan Nicolaescu <dann@ics.uci.edu>
Cc: Emacs-Devel <emacs-devel@gnu.org>
Subject: Re: should search ring contain duplicates?
Date: Wed, 3 May 2006 00:27:02 -0700 [thread overview]
Message-ID: <200605030727.k437R2Wx009975@amrm2.ics.uci.edu> (raw)
In-Reply-To: <MEEKKIABFKKDFJMPIOEBIEBLDBAA.drew.adams@oracle.com> (Drew Adams's message of "Tue, 2 May 2006 17:54:36 -0700")
"Drew Adams" <drew.adams@oracle.com> writes:
> Each successful incremental search adds the search string to the search ring
> (as the most recent entry), even if it is already in the ring past the first
> entry. Nothing prevents the ring from containing multiple copies of the same
> string, which seems wasteful (and useless). At the limit, the search ring,
> regardless of its length, might contain as few as two different search
> strings.
>
> Shouldn't `isearch-update-ring' (in isearch.el) add the latest search string
> at the front of the ring but remove it elsewhere in the ring? The result
> would be a more useful ring.
`isearch-update-ring' could at least do that when
history-delete-duplicates is t.
Something like this could help: [completely untested]
(defun isearch-update-ring (string &optional regexp)
"Add STRING to the beginning of the search ring.
REGEXP says which ring to use."
(if regexp
(if (or (null regexp-search-ring)
(not (string= string (car regexp-search-ring))))
(progn
(when history-delete-duplicates
(setq regexp-search-ring (delete string regexp-search-ring)))
(push string regexp-search-ring)
(if (> (length regexp-search-ring) regexp-search-ring-max)
(setcdr (nthcdr (1- search-ring-max) regexp-search-ring)
nil))))
(if (or (null search-ring)
(not (string= string (car search-ring))))
(progn
(when history-delete-duplicates
(setq search-ring (delete string search-ring)))
(push string search-ring)
(if (> (length search-ring) search-ring-max)
(setcdr (nthcdr (1- search-ring-max) search-ring) nil))))))
next prev parent reply other threads:[~2006-05-03 7:27 UTC|newest]
Thread overview: 80+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-05-03 0:54 should search ring contain duplicates? Drew Adams
2006-05-03 7:27 ` Dan Nicolaescu [this message]
2006-05-03 8:26 ` Kim F. Storm
2006-05-03 12:48 ` Juri Linkov
2006-05-03 13:53 ` Kim F. Storm
2006-05-04 10:12 ` Kim F. Storm
2006-05-04 10:29 ` David Kastrup
2006-05-04 12:00 ` Stefan Monnier
2006-05-04 12:19 ` Kim F. Storm
2006-05-04 12:25 ` David Kastrup
2006-05-05 22:14 ` Richard Stallman
2006-05-05 23:55 ` Kim F. Storm
2006-05-06 8:00 ` Eli Zaretskii
2006-05-06 23:36 ` Richard Stallman
2006-05-07 20:41 ` Kim F. Storm
2006-05-04 16:05 ` Stuart D. Herring
2006-05-04 16:23 ` David Kastrup
2006-05-04 16:36 ` Stuart D. Herring
2006-05-04 21:55 ` Kim F. Storm
2006-05-03 15:04 ` query-replace in isearch (was Re: should search ring contain duplicates?) Dan Nicolaescu
2006-05-03 20:27 ` query-replace in isearch Juri Linkov
2006-05-03 20:43 ` query-replace in isearch (was Re: should search ring contain duplicates?) Richard Stallman
2006-05-11 3:45 ` Richard Stallman
2006-05-11 11:57 ` Juri Linkov
2006-05-11 14:10 ` Kim F. Storm
2006-05-11 21:52 ` Juri Linkov
2006-05-19 3:05 ` Juri Linkov
2006-05-20 22:39 ` Kim F. Storm
2006-05-21 4:27 ` Juri Linkov
2006-05-21 0:55 ` Richard Stallman
2006-05-23 5:17 ` Juri Linkov
2006-05-24 2:18 ` Richard Stallman
2006-05-25 22:47 ` Juri Linkov
2006-05-29 6:39 ` Richard Stallman
2006-05-30 9:28 ` Juri Linkov
2006-05-31 0:40 ` Richard Stallman
2006-05-12 4:15 ` Richard Stallman
2006-05-12 11:14 ` Juri Linkov
2006-05-13 4:52 ` Richard Stallman
2006-05-13 23:13 ` Kim F. Storm
2006-05-14 15:09 ` Richard Stallman
2006-05-14 20:52 ` Kim F. Storm
2006-05-09 20:47 ` should search ring contain duplicates? Juri Linkov
2006-05-10 9:34 ` Kim F. Storm
2006-05-10 22:55 ` Juri Linkov
2006-05-11 10:08 ` Kim F. Storm
2006-05-14 23:29 ` Richard Stallman
2006-05-15 9:54 ` Kim F. Storm
2006-05-16 4:29 ` Richard Stallman
2006-05-16 11:07 ` Kim F. Storm
2006-05-11 11:59 ` C-f in isearch minibuffer (was: should search ring contain duplicates?) Juri Linkov
2006-05-11 14:04 ` C-f in isearch minibuffer Miles Bader
2006-05-11 21:52 ` Juri Linkov
2006-05-12 4:15 ` C-f in isearch minibuffer (was: should search ring contain duplicates?) Richard Stallman
2006-05-12 11:12 ` C-f in isearch minibuffer Juri Linkov
2006-05-13 4:52 ` Richard Stallman
2006-05-03 14:18 ` should search ring contain duplicates? Stefan Monnier
2006-05-03 14:25 ` Kim F. Storm
2006-05-03 14:40 ` Drew Adams
2006-05-03 15:54 ` Drew Adams
2006-05-03 20:27 ` Juri Linkov
2006-05-03 23:08 ` Drew Adams
2006-05-04 14:17 ` Richard Stallman
2006-05-04 15:07 ` Kim F. Storm
2006-05-04 22:44 ` Kim F. Storm
2006-05-05 19:05 ` Richard Stallman
2006-05-05 19:14 ` Drew Adams
2006-05-05 19:25 ` David Kastrup
2006-05-05 20:09 ` Drew Adams
2006-05-06 14:25 ` Richard Stallman
2006-05-05 23:22 ` Juri Linkov
2006-05-05 23:32 ` Kim F. Storm
2006-05-06 2:05 ` Drew Adams
2006-05-03 14:43 ` Dan Nicolaescu
2006-05-04 19:41 ` Richard Stallman
2006-05-03 20:42 ` Richard Stallman
2006-05-03 22:41 ` Dan Nicolaescu
2006-05-04 19:41 ` Richard Stallman
-- strict thread matches above, loose matches on Subject: below --
2006-05-14 23:29 Richard Stallman
2006-05-14 23:46 ` Drew Adams
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=200605030727.k437R2Wx009975@amrm2.ics.uci.edu \
--to=dann@ics.uci.edu \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.