[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex.el
From: |
Carsten Dominik |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex.el |
Date: |
Mon, 22 Jul 2002 06:36:27 -0400 |
Index: emacs/lisp/textmodes/reftex.el
diff -c emacs/lisp/textmodes/reftex.el:1.40 emacs/lisp/textmodes/reftex.el:1.41
*** emacs/lisp/textmodes/reftex.el:1.40 Mon Jul 16 03:46:48 2001
--- emacs/lisp/textmodes/reftex.el Mon Jul 22 06:36:26 2002
***************
*** 1,8 ****
;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
! ;; Author: Carsten Dominik <address@hidden>
! ;; Version: 4.16
;; Keywords: tex
;; This file is part of GNU Emacs.
--- 1,8 ----
;;; reftex.el --- minor mode for doing \label, \ref, \cite, \index in LaTeX
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
! ;; Author: Carsten Dominik <address@hidden>
! ;; Version: 4.17
;; Keywords: tex
;; This file is part of GNU Emacs.
***************
*** 300,306 ****
;;; Define the formal stuff for a minor mode named RefTeX.
;;;
! (defconst reftex-version "RefTeX version 4.16"
"Version string for RefTeX.")
(defvar reftex-mode nil
--- 300,306 ----
;;; Define the formal stuff for a minor mode named RefTeX.
;;;
! (defconst reftex-version "RefTeX version 4.17"
"Version string for RefTeX.")
(defvar reftex-mode nil
***************
*** 312,317 ****
--- 312,318 ----
(defvar reftex-mode-menu nil)
(defvar reftex-syntax-table nil)
+ (defvar reftex-syntax-table-for-bib nil)
(defvar reftex-auto-view-crossref-timer nil
"The timer used for auto-view-crossref.")
***************
*** 371,376 ****
--- 372,383 ----
(setq reftex-syntax-table (copy-syntax-table (syntax-table)))
(modify-syntax-entry ?\( "." reftex-syntax-table)
(modify-syntax-entry ?\) "." reftex-syntax-table))
+ (unless reftex-syntax-table-for-bib
+ (setq reftex-syntax-table-for-bib (copy-syntax-table
reftex-syntax-table))
+ (modify-syntax-entry ?\' "." reftex-syntax-table-for-bib)
+ (modify-syntax-entry ?\" "." reftex-syntax-table-for-bib)
+ (modify-syntax-entry ?\[ "." reftex-syntax-table-for-bib)
+ (modify-syntax-entry ?\] "." reftex-syntax-table-for-bib))
(run-hooks 'reftex-mode-hook))
;; Mode was turned off
(easy-menu-remove reftex-mode-menu)))
***************
*** 610,658 ****
;; The following constants are derived from `reftex-label-alist'.
;; Prompt used for label type queries directed to the user.
! (defconst reftex-type-query-prompt nil)
;; Help string for label type queries.
! (defconst reftex-type-query-help nil)
;; Alist relating label type to reference format.
! (defconst reftex-typekey-to-format-alist nil)
;; Alist relating label type to label prefix.
! (defconst reftex-typekey-to-prefix-alist nil)
;; Alist relating environments or macros to label type and context regexp.
! (defconst reftex-env-or-mac-alist nil)
;; List of special environment parser functions
! (defconst reftex-special-env-parsers nil)
;; List of macros carrying a label.
! (defconst reftex-label-mac-list nil)
;; List of environments carrying a label.
! (defconst reftex-label-env-list nil)
;; List of all typekey letters in use.
! (defconst reftex-typekey-list nil)
;; Alist relating magic words to a label type.
! (defconst reftex-words-to-typekey-alist nil)
;; The last list-of-labels entry used in a reference.
(defvar reftex-last-used-reference (list nil nil nil nil))
;; Alist relating index macros to other info.
! (defconst reftex-key-to-index-macro-alist nil)
;; Prompt for index macro queries
! (defconst reftex-query-index-macro-prompt nil)
;; Help string for index macro queries
! (defconst reftex-query-index-macro-help nil)
;; The message when follow-mode is suspended
! (defconst reftex-no-follow-message
"No follow-mode into unvisited file. Press SPC to visit it.")
! (defconst reftex-no-info-message
"%s: info not available, use `\\[reftex-view-crossref]' to get it.")
;; Global variables used for communication between functions.
--- 617,665 ----
;; The following constants are derived from `reftex-label-alist'.
;; Prompt used for label type queries directed to the user.
! (defvar reftex-type-query-prompt nil)
;; Help string for label type queries.
! (defvar reftex-type-query-help nil)
;; Alist relating label type to reference format.
! (defvar reftex-typekey-to-format-alist nil)
;; Alist relating label type to label prefix.
! (defvar reftex-typekey-to-prefix-alist nil)
;; Alist relating environments or macros to label type and context regexp.
! (defvar reftex-env-or-mac-alist nil)
;; List of special environment parser functions
! (defvar reftex-special-env-parsers nil)
;; List of macros carrying a label.
! (defvar reftex-label-mac-list nil)
;; List of environments carrying a label.
! (defvar reftex-label-env-list nil)
;; List of all typekey letters in use.
! (defvar reftex-typekey-list nil)
;; Alist relating magic words to a label type.
! (defvar reftex-words-to-typekey-alist nil)
;; The last list-of-labels entry used in a reference.
(defvar reftex-last-used-reference (list nil nil nil nil))
;; Alist relating index macros to other info.
! (defvar reftex-key-to-index-macro-alist nil)
;; Prompt for index macro queries
! (defvar reftex-query-index-macro-prompt nil)
;; Help string for index macro queries
! (defvar reftex-query-index-macro-help nil)
;; The message when follow-mode is suspended
! (defvar reftex-no-follow-message
"No follow-mode into unvisited file. Press SPC to visit it.")
! (defvar reftex-no-info-message
"%s: info not available, use `\\[reftex-view-crossref]' to get it.")
;; Global variables used for communication between functions.
***************
*** 1092,1100 ****
reftex-section-levels))
;; Calculate the regular expressions
! (let* ((wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
(label-re "\\\\label{\\([^}]*\\)}")
! (include-re (concat wbol "\\\\\\(include\\|input\\)[{ \t]+\\([^}
\t\n\r]+\\)"))
(section-re
(concat wbol "\\\\\\("
(mapconcat (lambda (x) (regexp-quote (car x)))
--- 1099,1113 ----
reftex-section-levels))
;; Calculate the regular expressions
! (let* (
! ; (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
! (wbol "\\(\\`\\|[\n\r]\\)[ \t]*")
(label-re "\\\\label{\\([^}]*\\)}")
! (include-re (concat wbol
! "\\\\\\("
! (mapconcat 'identity
! reftex-include-file-commands "\\|")
! "\\)[{ \t]+\\([^} \t\n\r]+\\)"))
(section-re
(concat wbol "\\\\\\("
(mapconcat (lambda (x) (regexp-quote (car x)))
- [Emacs-diffs] Changes to emacs/lisp/textmodes/reftex.el,
Carsten Dominik <=