[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex-auc.el
From: |
Romain Francoise |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex-auc.el |
Date: |
Sat, 24 Sep 2005 09:44:33 -0400 |
Index: emacs/lisp/textmodes/reftex-auc.el
diff -c emacs/lisp/textmodes/reftex-auc.el:1.22
emacs/lisp/textmodes/reftex-auc.el:1.23
*** emacs/lisp/textmodes/reftex-auc.el:1.22 Wed Sep 21 11:40:14 2005
--- emacs/lisp/textmodes/reftex-auc.el Sat Sep 24 13:43:58 2005
***************
*** 67,74 ****
(setq items (list (or (reftex-citation t) ""))))
(t
(setq prompt (concat (if optional "(Optional) " "")
! (if prompt prompt "Add key")
! ": (default none) "))
(setq items (multi-prompt "," t prompt (LaTeX-bibitem-list)))))
(apply 'LaTeX-add-bibitems items)
(TeX-argument-insert (mapconcat 'identity items ",") optional)))
--- 67,74 ----
(setq items (list (or (reftex-citation t) ""))))
(t
(setq prompt (concat (if optional "(Optional) " "")
! (if prompt prompt "Add key")
! " (default none): "))
(setq items (multi-prompt "," t prompt (LaTeX-bibitem-list)))))
(apply 'LaTeX-add-bibitems items)
(TeX-argument-insert (mapconcat 'identity items ",") optional)))
***************
*** 79,86 ****
This is the name of an index, not the entry."
(let (tag taglist)
(setq prompt (concat (if optional "(Optional) " "")
! (if prompt prompt "Index tag")
! ": (default none) "))
(if (and reftex-support-index (reftex-plug-flag 4))
;; Use RefTeX completion
(progn
--- 79,86 ----
This is the name of an index, not the entry."
(let (tag taglist)
(setq prompt (concat (if optional "(Optional) " "")
! (if prompt prompt "Index tag")
! " (default none): "))
(if (and reftex-support-index (reftex-plug-flag 4))
;; Use RefTeX completion
(progn