[AUCTeX-diffs] Changes to reftex/lisp/reftex-vars.el,v

[Ralf Angeli]

CVSROOT:        /sources/auctex
Module name:    reftex
Changes by:     Ralf Angeli <angeli>    08/02/17 17:18:46

Index: reftex-vars.el
===================================================================
RCS file: /sources/auctex/reftex/lisp/reftex-vars.el,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- reftex-vars.el      27 Jan 2008 17:40:36 -0000      1.46
+++ reftex-vars.el      17 Feb 2008 17:18:46 -0000      1.47
@@ -1005,9 +1005,13 @@
 in the list have to match the respective reference style names
 used in the variable `reftex-ref-style-alist'."
   :group 'reftex-referencing-labels
-  :type `(repeat (choice ,@(delete-dups (mapcar (lambda (elt)
-                                                 (list 'const (nth 1 elt)))
-                                               reftex-ref-style-alist)))))
+  :type `(repeat (choice ,@(let (list item)
+                            (dolist (elt reftex-ref-style-alist)
+                              (setq item (list 'const (nth 1 elt))) 
+                              (unless (member item list)
+                                (add-to-list 'list item t)))
+                            list))))
+
 ;; Compatibility with obsolote variables.
 (when reftex-vref-is-default
   (add-to-list 'reftex-ref-style-active-list "Varioref"))
@@ -1032,14 +1036,17 @@
 
 (defcustom reftex-format-ref-function nil
   "Function which produces the string to insert as a reference.
-Normally should be nil, because the format to insert a reference can 
-already be specified in `reftex-label-alist'.
-This hook also is used by the special commands to insert `\\vref' and `\\fref'
-references, so even if you set this, your setting will be ignored by
-the special commands.
-The function will be called with two arguments, the LABEL and the DEFAULT
-FORMAT, which normally is `~\\ref{%s}'.  The function should return the
-string to insert into the buffer."
+Normally should be nil, because the format to insert a reference
+can already be specified in `reftex-label-alist'.
+
+This hook also is used by the special commands to insert
+e.g. `\\vref' and `\\fref' references, so even if you set this,
+your setting will be ignored by the special commands.
+
+The function will be called with three arguments, the LABEL, the
+DEFAULT FORMAT, which normally is `~\\ref{%s}' and the REFERENCE
+STYLE.  The function should return the string to insert into the
+buffer."
   :group 'reftex-referencing-labels
   :type '(choice (const nil) function))