[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: |
Thien-Thi Nguyen |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex-auc.el |
Date: |
Sat, 06 Aug 2005 13:41:30 -0400 |
Index: emacs/lisp/textmodes/reftex-auc.el
diff -c emacs/lisp/textmodes/reftex-auc.el:1.19
emacs/lisp/textmodes/reftex-auc.el:1.20
*** emacs/lisp/textmodes/reftex-auc.el:1.19 Mon Jul 4 16:45:00 2005
--- emacs/lisp/textmodes/reftex-auc.el Sat Aug 6 17:41:15 2005
***************
*** 1,6 ****
;;; reftex-auc.el --- RefTeX's interface to AUCTeX
! ;; Copyright (c) 1997, 1998, 1999, 2000, 2003, 2004, 2005
! ;; Free Software Foundation, Inc.
;; Author: Carsten Dominik <address@hidden>
;; Version: 4.28
--- 1,7 ----
;;; reftex-auc.el --- RefTeX's interface to AUCTeX
!
! ;; Copyright (C) 1997, 1998, 1999, 2000, 2002, 2003, 2004,
! ;; 2005 Free Software Foundation, Inc.
;; Author: Carsten Dominik <address@hidden>
;; Version: 4.28
***************
*** 75,81 ****
(defun reftex-arg-index-tag (optional &optional prompt &rest args)
! "Prompt for an index tag with completion.
This is the name of an index, not the entry."
(let (tag taglist)
(setq prompt (concat (if optional "(Optional) " "")
--- 76,82 ----
(defun reftex-arg-index-tag (optional &optional prompt &rest args)
! "Prompt for an index tag with completion.
This is the name of an index, not the entry."
(let (tag taglist)
(setq prompt (concat (if optional "(Optional) " "")
***************
*** 85,92 ****
;; Use RefTeX completion
(progn
(reftex-access-scan-info nil)
! (setq taglist
! (cdr (assoc 'index-tags
(symbol-value reftex-docstruct-symbol)))
tag (completing-read prompt (mapcar 'list taglist))))
;; Just ask like AUCTeX does.
--- 86,93 ----
;; Use RefTeX completion
(progn
(reftex-access-scan-info nil)
! (setq taglist
! (cdr (assoc 'index-tags
(symbol-value reftex-docstruct-symbol)))
tag (completing-read prompt (mapcar 'list taglist))))
;; Just ask like AUCTeX does.
***************
*** 131,137 ****
;; Replace AUCTeX functions with RefTeX functions.
;; Which functions are replaced is controlled by the variable
;; `reftex-plug-into-AUCTeX'.
!
(if (reftex-plug-flag 0)
(setq LaTeX-label-function 'reftex-label)
(setq LaTeX-label-function nil))
--- 132,138 ----
;; Replace AUCTeX functions with RefTeX functions.
;; Which functions are replaced is controlled by the variable
;; `reftex-plug-into-AUCTeX'.
!
(if (reftex-plug-flag 0)
(setq LaTeX-label-function 'reftex-label)
(setq LaTeX-label-function nil))
***************
*** 143,153 ****
(and (reftex-plug-flag 3)
(fboundp 'TeX-arg-cite)
(fset 'TeX-arg-cite 'reftex-arg-cite))
!
! (and (reftex-plug-flag 4)
(fboundp 'TeX-arg-index-tag)
(fset 'TeX-arg-index-tag 'reftex-arg-index-tag))
! (and (reftex-plug-flag 4)
(fboundp 'TeX-arg-index)
(fset 'TeX-arg-index 'reftex-arg-index)))
--- 144,154 ----
(and (reftex-plug-flag 3)
(fboundp 'TeX-arg-cite)
(fset 'TeX-arg-cite 'reftex-arg-cite))
!
! (and (reftex-plug-flag 4)
(fboundp 'TeX-arg-index-tag)
(fset 'TeX-arg-index-tag 'reftex-arg-index-tag))
! (and (reftex-plug-flag 4)
(fboundp 'TeX-arg-index)
(fset 'TeX-arg-index 'reftex-arg-index)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/textmodes/reftex-auc.el,
Thien-Thi Nguyen <=