summaryrefslogtreecommitdiff
path: root/lisp/textmodes/reftex.el
diff options
context:
space:
mode:
authorCarsten Dominik <dominik@science.uva.nl>1999-09-24 09:55:00 +0000
committerCarsten Dominik <dominik@science.uva.nl>1999-09-24 09:55:00 +0000
commit48ffe14fdd981954fe18cb6fb174eaf5005dd920 (patch)
treeb66e298cac69a41cd8f5aa4117b083141dc090fa /lisp/textmodes/reftex.el
parent09308e63638e0a3d667622a5220da5e23b5482fc (diff)
downloademacs-48ffe14fdd981954fe18cb6fb174eaf5005dd920.tar.gz
Version number change
Diffstat (limited to 'lisp/textmodes/reftex.el')
-rw-r--r--lisp/textmodes/reftex.el9
1 files changed, 9 insertions, 0 deletions
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.