(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
(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.