From 48ffe14fdd981954fe18cb6fb174eaf5005dd920 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 24 Sep 1999 09:55:00 +0000 Subject: [PATCH] Version number change --- lisp/textmodes/reftex-index.el | 1 + lisp/textmodes/reftex.el | 9 +++++++++ 2 files changed, 10 insertions(+) diff --git a/lisp/textmodes/reftex-index.el b/lisp/textmodes/reftex-index.el index 05c07bcaba0..6936cf73fb0 100644 --- a/lisp/textmodes/reftex-index.el +++ b/lisp/textmodes/reftex-index.el @@ -9,6 +9,7 @@ (defvar mark-active) (defvar zmacs-regions) +(defvar transient-mark-mode) (defun reftex-index-selection-or-word (&optional arg) "Put selection or the word near point into the default index macro. This uses the information in `reftex-index-default-macro' to make an index diff --git a/lisp/textmodes/reftex.el b/lisp/textmodes/reftex.el index dcc6093ac0c..1ffa99df40f 100644 --- a/lisp/textmodes/reftex.el +++ b/lisp/textmodes/reftex.el @@ -1995,6 +1995,15 @@ When DIE is non-nil, throw an error if file not found." (setq list (cdr list))) (nreverse rtn))) +(defun reftex-uniquify (list) + ;; Return a list of all elements in LIST, but each only once + (let (new elm) + (while list + (setq elm (pop list)) + (unless (member elm new) + (push elm new))) + (nreverse new))) + (defun reftex-uniquify-by-car (alist &optional keep-list) ;; Return a list of all elements in ALIST, but each car only once. ;; Elements of KEEP-LIST are not removed even if duplicate. -- 2.39.5