diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-06-04 10:48:16 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-06-04 10:48:16 +0200 |
commit | 6d1d048d65d35c217e9d505ebe3e76a202553c97 (patch) | |
tree | 973d2c6d77d0e938f2de82444a130f9a2a17bbb6 | |
parent | b516887283ce77cf3c0977154f713ef485e3e8a9 (diff) | |
download | emacs-6d1d048d65d35c217e9d505ebe3e76a202553c97.tar.gz emacs-6d1d048d65d35c217e9d505ebe3e76a202553c97.tar.bz2 emacs-6d1d048d65d35c217e9d505ebe3e76a202553c97.zip |
Revert "Make the `i' command in Info-mode remove duplicate matches"
This reverts commit 089e0c4c55dcf72f9cf2f6f04b8a52fc7355499c.
There were no duplicate entries -- there were two entries
for different things that referred to the same line.
-rw-r--r-- | lisp/info.el | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/lisp/info.el b/lisp/info.el index 83a9bfbc235..cdf339ff6fb 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -3375,13 +3375,7 @@ Give an empty topic name to go to the Index node itself." (setq exact (cons found exact) matches (delq found matches))) (setq Info-history-list ohist-list) - (setq Info-index-alternatives - ;; Weed out index entries that refer to the same line. - (seq-uniq - (nconc exact (nreverse matches)) - (lambda (m1 m2) - (and (equal (nth 1 m1) (nth 1 m2)) - (equal (nth 3 m1) (nth 3 m2)))))) + (setq Info-index-alternatives (nconc exact (nreverse matches))) (Info-index-next 0))))) (defun Info-index-next (num) |