1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-31 20:02:42 +00:00

Update to RefTeX 4.15, see ChangeLog for details

This commit is contained in:
Carsten Dominik 2000-12-10 11:00:45 +00:00
parent 4efa209f84
commit 11b4a0d232
11 changed files with 24 additions and 15 deletions

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.
@ -36,7 +36,7 @@ The TAGS file is also immediately visited with `visit-tags-table'."
(files (reftex-all-document-files))
(cmd (format "etags %s" (mapconcat 'identity files " "))))
(save-excursion
(set-buffer (reftex-get-buffer-visiting master))
(set-buffer (reftex-get-file-buffer-force master))
(message "Running etags to create TAGS file...")
(shell-command cmd)
(visit-tags-table "TAGS"))))

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.
@ -113,7 +113,7 @@ During a selection process, these are the local bindings.
;; BUF is the buffer which has the correct docstruct-symbol.
;; LABELS non-nil means to include labels into the list.
;; When a string, indicates the label type to include
;; FILES non-nil menas to display file boundaries.
;; FILES non-nil means to display file boundaries.
;; CONTEXT non-nil means to include label context.
;; COUNTER means to count the labels.
;; SHOW-COMMENTED means to include also labels which are commented out.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.
@ -598,7 +598,7 @@ With prefix arg 1, restrict index to the section at point."
["External Document TOC " reftex-toc-external t]
"--"
("Update"
["Rebuild *toc* Buffer" revert-buffer t]
["Rebuilt *toc* Buffer" revert-buffer t]
["Rescan One File" reftex-toc-rescan reftex-enable-partial-scans]
["Rescan Entire Document" reftex-toc-Rescan t])
("Options"

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;;
;; This file is part of GNU Emacs.

View File

@ -2,7 +2,7 @@
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl>
;; Version: 4.14
;; Version: 4.15
;; Keywords: tex
;; This file is part of GNU Emacs.
@ -300,7 +300,7 @@
;;; Define the formal stuff for a minor mode named RefTeX.
;;;
(defconst reftex-version "RefTeX version 4.14"
(defconst reftex-version "RefTeX version 4.15"
"Version string for RefTeX.")
(defvar reftex-mode nil
@ -506,6 +506,7 @@ on the menu bar.
(condition-case nil
(TeX-master-file t)
(error (buffer-file-name))))
((fboundp 'tex-main-file) (tex-main-file)) ; Emacs LaTeX mode
((boundp 'TeX-master) ; The variable is defined - lets use it.
(cond
((eq TeX-master t)
@ -1209,6 +1210,14 @@ This enforces rescanning the buffer on next use."
;; Scan whatever was required by the caller.
(reftex-do-parse rescan file))))
(defun reftex-scanning-info-available-p ()
"Is the scanning info about the current document available?"
(unless reftex-docstruct-symbol
(reftex-tie-multifile-symbols))
(and (symbolp reftex-docstruct-symbol)
(symbol-value reftex-docstruct-symbol)
t))
(defun reftex-silence-toc-markers (list n)
;; Set all toc markers in the first N entries in list to nil
(while (and list (> (decf n) -1))