327 |
(modify-syntax-entry ?\[ "." reftex-syntax-table-for-bib) |
(modify-syntax-entry ?\[ "." reftex-syntax-table-for-bib) |
328 |
(modify-syntax-entry ?\] "." reftex-syntax-table-for-bib)) |
(modify-syntax-entry ?\] "." reftex-syntax-table-for-bib)) |
329 |
|
|
330 |
|
;; The following definitions are out of place, but I need them here |
331 |
|
;; to make the compilation of reftex-mode not complain. |
332 |
(defvar reftex-auto-view-crossref-timer nil |
(defvar reftex-auto-view-crossref-timer nil |
333 |
"The timer used for auto-view-crossref.") |
"The timer used for auto-view-crossref.") |
334 |
|
(defvar reftex-toc-auto-recenter-timer nil |
335 |
|
"The idle timer used to recenter the toc window.") |
336 |
|
|
337 |
;;;###autoload |
;;;###autoload |
338 |
(defun turn-on-reftex () |
(defun turn-on-reftex () |
385 |
(and reftex-auto-view-crossref |
(and reftex-auto-view-crossref |
386 |
(reftex-toggle-auto-view-crossref)) |
(reftex-toggle-auto-view-crossref)) |
387 |
(put 'reftex-auto-view-crossref 'initialized t)) |
(put 'reftex-auto-view-crossref 'initialized t)) |
388 |
|
(unless (get 'reftex-auto-recenter-toc 'initialized) |
389 |
|
(and reftex-auto-recenter-toc |
390 |
|
(reftex-toggle-auto-toc-recenter)) |
391 |
|
(put 'reftex-auto-recenter-toc 'initialized t)) |
392 |
|
|
393 |
;; Prepare the special syntax tables. |
;; Prepare the special syntax tables. |
394 |
(setq reftex-syntax-table (copy-syntax-table (syntax-table))) |
(setq reftex-syntax-table (copy-syntax-table (syntax-table))) |
703 |
(defvar reftex-callback-fwd t) |
(defvar reftex-callback-fwd t) |
704 |
(defvar reftex-last-toc-master nil |
(defvar reftex-last-toc-master nil |
705 |
"Stores the name of the tex file that `reftex-toc' was last run on.") |
"Stores the name of the tex file that `reftex-toc' was last run on.") |
|
(defvar reftex-auto-view-crossref-timer nil |
|
|
"The timer used for auto-view-crossref.") |
|
706 |
;; Marker for return point from recursive edit |
;; Marker for return point from recursive edit |
707 |
(defvar reftex-recursive-edit-marker (make-marker)) |
(defvar reftex-recursive-edit-marker (make-marker)) |
708 |
|
|
1647 |
"Make a fancyref \\Fref reference." t) |
"Make a fancyref \\Fref reference." t) |
1648 |
(autoload 'reftex-show-label-location "reftex-ref") |
(autoload 'reftex-show-label-location "reftex-ref") |
1649 |
(autoload 'reftex-query-label-type "reftex-ref") |
(autoload 'reftex-query-label-type "reftex-ref") |
1650 |
|
(autoload 'reftex-goto-label "reftex-ref" |
1651 |
|
"Prompt for label name and go to that location." t) |
1652 |
|
|
1653 |
;;; ========================================================================= |
;;; ========================================================================= |
1654 |
;;; |
;;; |
1655 |
;;; Table of contents |
;;; Table of contents |
1656 |
|
|
1657 |
(autoload 'reftex-toc "reftex-toc" |
(autoload 'reftex-toc "reftex-toc" |
1658 |
"Show the table of contents for the current document." t) |
"Show the table of contents for the current document." t) |
1659 |
|
(autoload 'reftex-toc-recenter "reftex-toc" |
1660 |
|
"Display the TOC window and highlight line corresponding to current position." t) |
1661 |
|
(autoload 'reftex-toggle-auto-toc-recenter "reftex-toc" t) |
1662 |
|
|
1663 |
|
|
1664 |
;;; ========================================================================= |
;;; ========================================================================= |
2323 |
(if (featurep 'xemacs) (require 'overlay)) |
(if (featurep 'xemacs) (require 'overlay)) |
2324 |
|
|
2325 |
;; We keep a vector with several different overlays to do our highlighting. |
;; We keep a vector with several different overlays to do our highlighting. |
2326 |
(defvar reftex-highlight-overlays [nil nil]) |
(defvar reftex-highlight-overlays [nil nil nil]) |
2327 |
|
|
2328 |
;; Initialize the overlays |
;; Initialize the overlays |
2329 |
(aset reftex-highlight-overlays 0 (make-overlay 1 1)) |
(aset reftex-highlight-overlays 0 (make-overlay 1 1)) |
2332 |
(aset reftex-highlight-overlays 1 (make-overlay 1 1)) |
(aset reftex-highlight-overlays 1 (make-overlay 1 1)) |
2333 |
(overlay-put (aref reftex-highlight-overlays 1) |
(overlay-put (aref reftex-highlight-overlays 1) |
2334 |
'face reftex-cursor-selected-face) |
'face reftex-cursor-selected-face) |
2335 |
|
(aset reftex-highlight-overlays 2 (make-overlay 1 1)) |
2336 |
|
(overlay-put (aref reftex-highlight-overlays 2) |
2337 |
|
'face reftex-cursor-selected-face) |
2338 |
|
|
2339 |
;; Two functions for activating and deactivation highlight overlays |
;; Two functions for activating and deactivation highlight overlays |
2340 |
(defun reftex-highlight (index begin end &optional buffer) |
(defun reftex-highlight (index begin end &optional buffer) |
2357 |
;; The default bindings in the mode map. |
;; The default bindings in the mode map. |
2358 |
(loop for x in |
(loop for x in |
2359 |
'(("\C-c=" . reftex-toc) |
'(("\C-c=" . reftex-toc) |
2360 |
|
("\C-c-" . reftex-toc-recenter) |
2361 |
("\C-c(" . reftex-label) |
("\C-c(" . reftex-label) |
2362 |
("\C-c)" . reftex-reference) |
("\C-c)" . reftex-reference) |
2363 |
("\C-c[" . reftex-citation) |
("\C-c[" . reftex-citation) |
2407 |
"Menu used in RefTeX mode" |
"Menu used in RefTeX mode" |
2408 |
`("Ref" |
`("Ref" |
2409 |
["Table of Contents" reftex-toc t] |
["Table of Contents" reftex-toc t] |
2410 |
|
["Recenter TOC" reftex-toc-recenter t] |
2411 |
"--" |
"--" |
2412 |
["\\label" reftex-label t] |
["\\label" reftex-label t] |
2413 |
["\\ref" reftex-reference t] |
["\\ref" reftex-reference t] |
2429 |
["Entire Document" reftex-parse-all t] |
["Entire Document" reftex-parse-all t] |
2430 |
["Save to File" (reftex-access-parse-file 'write) |
["Save to File" (reftex-access-parse-file 'write) |
2431 |
(> (length (symbol-value reftex-docstruct-symbol)) 0)] |
(> (length (symbol-value reftex-docstruct-symbol)) 0)] |
2432 |
["Restore from File" (reftex-access-parse-file 'restore) t] |
["Restore from File" (reftex-access-parse-file 'restore) t]) |
|
"--" |
|
|
["Reset RefTeX Mode" reftex-reset-mode t]) |
|
2433 |
("Global Actions" |
("Global Actions" |
2434 |
["Search Whole Document" reftex-search-document t] |
["Search Whole Document" reftex-search-document t] |
2435 |
["Replace in Document" reftex-query-replace-document t] |
["Replace in Document" reftex-query-replace-document t] |
2436 |
["Grep on Document" reftex-grep-document t] |
["Grep on Document" reftex-grep-document t] |
2437 |
"--" |
"--" |
2438 |
|
["Goto Label" reftex-goto-label t] |
2439 |
["Find Duplicate Labels" reftex-find-duplicate-labels t] |
["Find Duplicate Labels" reftex-find-duplicate-labels t] |
2440 |
["Change Label and Refs" reftex-change-label t] |
["Change Label and Refs" reftex-change-label t] |
2441 |
["Renumber Simple Labels" reftex-renumber-simple-labels t] |
["Renumber Simple Labels" reftex-renumber-simple-labels t] |
2453 |
(setq reftex-save-parse-info (not reftex-save-parse-info)) |
(setq reftex-save-parse-info (not reftex-save-parse-info)) |
2454 |
:style toggle :selected reftex-save-parse-info] |
:style toggle :selected reftex-save-parse-info] |
2455 |
"--" |
"--" |
2456 |
|
"TOC RECENTER" |
2457 |
|
["Automatic Recenter" reftex-toggle-auto-toc-recenter |
2458 |
|
:style toggle :selected reftex-toc-auto-recenter-timer] |
2459 |
|
"--" |
2460 |
"CROSSREF INFO" |
"CROSSREF INFO" |
2461 |
["Automatic Info" reftex-toggle-auto-view-crossref |
["Automatic Info" reftex-toggle-auto-view-crossref |
2462 |
:style toggle :selected reftex-auto-view-crossref-timer] |
:style toggle :selected reftex-auto-view-crossref-timer] |
2510 |
(list 'quote 'reftex-index-macros-style))))) |
(list 'quote 'reftex-index-macros-style))))) |
2511 |
reftex-index-macros-builtin)) |
reftex-index-macros-builtin)) |
2512 |
"--" |
"--" |
2513 |
|
["Reset RefTeX Mode" reftex-reset-mode t] |
2514 |
|
"--" |
2515 |
("Customize" |
("Customize" |
2516 |
["Browse RefTeX Group" reftex-customize t] |
["Browse RefTeX Group" reftex-customize t] |
2517 |
"--" |
"--" |