Current File : //usr/local/share/emacs/27.2/lisp/textmodes/reftex-dcr.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'reftex)
#@914 View cross reference of macro at point. Point must be on the KEY
argument. When at a `\ref' macro, show corresponding `\label'
definition, also in external documents (`xr'). When on a label, show
a locations where KEY is referenced. Subsequent calls find additional
locations. When on a `\cite', show the associated `\bibitem' macro or
the BibTeX database entry. When on a `\bibitem', show a `\cite' macro
which uses this KEY. When on an `\index', show other locations marked
by the same index entry.
To define additional cross referencing items, use the option
`reftex-view-crossref-extra'. See also `reftex-view-crossref-from-bibtex'.
With one or two C-u prefixes, enforce rescanning of the document.
With argument 2, select the window showing the cross reference.
AUTO-HOW is only for the automatic crossref display and is handed through
to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'.
(defalias 'reftex-view-crossref #[(&optional arg auto-how fail-quietly) "\306\307!@\310\311!\312\203 \313 \203 \206\314\315!\202p\316\317\"\2031 \320
!#\202\365 \316\321\"\203B \322
!#\202\365 !\204\365 \323\232\204T \"\235\203h \324
!\210\325\326#\327 !\"\330\312\211$\202\365 \331\232\203\202 \324
!\210\325\326$\327 !\"\330\312\211$\202\365 %\235\203\235 \324
!\210\325\326&\327 !\"\332\312\211$\202\365 \324
!\210\3332\364 '\312\211\211\211 ( ) * + ,,\211A,\242\211+\203\357 +@*+A@)\334+8(\316*\"\203\265 \325\326) \"(\312\211$\335\333\336\"\210\202\265 -\314\315!0\210
\334=\205\337\n!\205\340\n!+\207" [macro key dw fail-quietly reftex-call-back-to-this-buffer arg reftex-what-macro-safe 1 reftex-this-word "^{}%\n
, " nil reftex-in-comment error "Not on a crossref macro argument" string-match "\\`\\\\cite\\|cite\\([s*]\\|texts?\\)?\\'\\|bibentry" reftex-view-cr-cite "\\`\\\\ref\\|ref\\(range\\|s\\)?\\*?\\'" reftex-view-cr-ref "\\label" reftex-access-scan-info reftex-view-regexp-match format regexp-quote 4 "\\bibitem" 3 exit 2 throw t windowp select-window auto-how reftex-macros-with-labels reftex-find-reference-format reftex-find-citation-regexp-format reftex-macros-with-index reftex-find-index-entry-regexp-format reftex-view-crossref-extra group action mre entry list] 5 (#$ . 427) "P"])
(defalias 'reftex-view-cr-cite #[(arg key how) "\306\206 !\210\n\307=\203 \310\311\312\313 #\210\314\211\211`\315 \314\316 . / 0 1 \317\267\202L \314/\320 1\202c \321/\322\323\324\325\3262J\"\"!1\202c \203[ \314/\327 1\202c \n\204c \330\331!\210\n\332=\203t \33331/#\202\343 \n\307=\204\210 \33431\314\321/%\210\202\312 \3351\232 \33431\314\321/%0\202\250 \210.b\210\336\3373\"\210\330\340!\210\341\342`\343/!\"]0\344 4\345\346 0ZS!\210\347\350!\210)\351\352\353\"\210\351\352\354\"\210\315 \355
!\210.b\210\344\232\205\343 \355\f!.\207" [arg current-prefix-arg how bibtype pop-win win reftex-access-scan-info tmp-window put reftex-auto-view-crossref last-window-conf current-window-configuration nil selected-window reftex-bib-or-thebib #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (bib 47 thebib 57)) reftex-get-bibfile-list t reftex-uniquify mapcar cdr reftex-all-assq thebib reftex-default-bibliography error "Cannot display crossref" echo reftex-echo-cite reftex-pop-to-bibtex-entry (error) message "cite: no such citation key %s" "" 1 count-lines reftex-end-of-bib-entry 2 shrink-window window-height recenter 0 add-hook pre-command-hook reftex-restore-window-conf reftex-highlight-shall-die select-window pos item size files reftex-docstruct-symbol key window-min-height] 7])
(defalias 'reftex-view-cr-ref #[(arg label how) "\306\206 !\210\n\307=\203 \310\311\312\313 #\210\314\315 J\" \316\f8 \314, J\" -\317 .\320 /` 0-\204{ ,;\203{
\203{ \321
,\"\203{ \212\322 1\323\216\324\314\325\326,\"\fA@\"A!\206d \327\330,\"q\210*\331,\326\225\",\306 \210\314, J\"-)\n\332=\203\214 \333,- J#\202\346 \313 2\3341\240 \335-\336\320\336\211%0\202\261 \210\3372!\210\340\341,\"\210\327\341,\"\210)\342\343\344\"\210\n\307=\203\317 \345\346 \347ZS!\210\350\351!\210\342\343\352\"\210\317 /\353.!\2100b\210\316\232\205\346 \353/!.\207" [arg current-prefix-arg how reftex-docstruct-symbol xr-data xr-re reftex-access-scan-info tmp-window put reftex-auto-view-crossref last-window-conf current-window-configuration assoc xr 2 selected-window nil string-match match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] reftex-get-file-buffer-force match-string 1 error "Problem with external label %s" substring echo reftex-echo-ref (error) reftex-show-label-location t set-window-configuration message "ref: Label %s not found" add-hook pre-command-hook reftex-highlight-shall-die shrink-window window-height 9 recenter (4) reftex-restore-window-conf select-window label entry win pop-win pos save-match-data-internal window-conf] 6])
#@321 View cross reference of \ref or \cite macro where you click.
If the macro at point is a \ref, show the corresponding label definition.
If it is a \cite, show the BibTeX database entry.
If there is no such macro at point, search forward to find one.
With argument, actually select the window showing the cross reference.
(defalias 'reftex-mouse-view-crossref #[(ev) "\302!\210\303 !\207" [ev current-prefix-arg mouse-set-point reftex-view-crossref] 2 (#$ . 5369) "e"])
(defalias 'reftex-view-crossref-when-idle #[nil "\205G \304=\204 \305 ?\205G \n\306>?\205G \212\307\310\311\312#\210\313\314!)\205G \3151E \311 \316\267\202A \317\320\321\322#\202B \317\320\323\322#\202B \311)0\207\210\311\207" [reftex-mode reftex-auto-view-crossref last-command current-prefix-arg window current-message (reftex-view-crossref reftex-mouse-view-crossref) search-backward "\\" nil t looking-at "\\\\[a-zA-Z]*\\(cite\\|ref\\|bibentry\\)" (error) #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 49 window 57)) reftex-view-crossref -1 echo quiet tmp-window] 4])
(defalias 'reftex-restore-window-conf #[nil "\300\301\302N!\210\303\301\302\304#\210\305\306\307\"\207" [set-window-configuration reftex-auto-view-crossref last-window-conf put nil remove-hook pre-command-hook reftex-restore-window-conf] 4])
(defalias 'reftex-echo-ref #[(label entry docstruct) "\204 \305\306\307\310 \311\"!\"\207\n\204 \305\312 \"\207\313\n8;\203( \305\314\nA@\313\n8#\210\315\316!\211 \2058 r\fq\210\317\320!))\207" [docstruct reftex-no-info-message entry label buf message "%s" substitute-command-keys format "ref" "ref: unknown label: %s" 2 "ref(%s): %s" get-buffer " *Echo Area*" run-hooks reftex-display-copied-context-hook] 7])
(defalias 'reftex-echo-cite #[(key files item) "\306J\236\307\n A\"\310\211 \310 \203% \203% A\202\201 \2040 \311 ! \3121E \212\313\n \310\211!\314&)0\202i \210 \203] G GU\203] \315\316\n\"\210\202h \315\317\320\321\"\322\"!\"\210\310\211\203\201 !\203z \323\f!\202\201 \324\325\f!\"
\203\220
\326\232\204\220 \315\327
\"\210\330\331!\211 \205\242 r q\210\332\333!).\207" [reftex-docstruct-symbol cache key cache-entry entry string bibview-cache assoc nil reftex-visited-files (error) reftex-pop-to-bibtex-entry t message "cite: no such database entry: %s" "%s" substitute-command-keys format "cite" reftex-nicify-text reftex-make-cite-echo-string reftex-parse-bibtex-entry "" "cite: %s" get-buffer " *Echo Area*" run-hooks reftex-display-copied-context-hook buf files all-files reftex-cache-cite-echo reftex-revisit-to-echo item reftex-no-info-message] 8])
#@141 Non-nil means use the idle timers in XEmacs for crossref display.
Currently, idle timer restart is broken and we use the post-command-hook.
(defvar reftex-use-itimer-in-xemacs nil (#$ . 8013))
#@181 Toggle the automatic display of crossref information in the echo area.
When active, leaving point idle in the argument of a \ref or \cite macro
will display info in the echo area.
(defalias 'reftex-toggle-auto-view-crossref #[nil "\203 \303!\210\304\305\306!\207\307 \310\311#\n\204 \310\305\312!\207" [reftex-auto-view-crossref-timer reftex-idle-time reftex-auto-view-crossref cancel-timer nil message "Automatic display of crossref information was turned off" run-with-idle-timer t reftex-view-crossref-when-idle "Automatic display of crossref information was turned on"] 4 (#$ . 8213) nil])
(defalias 'reftex-start-itimer-once #[nil "\300\207" [nil] 1])
#@340 View location in a LaTeX document which cites the BibTeX entry at point.
Since BibTeX files can be used by many LaTeX documents, this function
prompts upon first use for a buffer in RefTeX mode. To reset this
link to a document, call the function with a prefix arg.
Calling this function several times find successive citation locations.
(defalias 'reftex-view-crossref-from-bibtex #[(&optional arg) "\203\n \303\304\305\306#\210\304\305N\211\204( r\307\310\311\306\312\313\314 \"\"\306\315$)\303\304\305 #\210\316 \210\317\320!\203E \321\224b\210\322\323\n\324\325\321!!\"\326 $\202H \327\330!)\207" [arg ref-buffer reftex-find-citation-regexp-format put reftex-bibtex-view-cite-locations :ref-buffer nil completing-read "Reference buffer: " delq mapcar #[(b) "q\210 \205 \302!C\207" [b reftex-mode buffer-name] 2] buffer-list t bibtex-beginning-of-entry looking-at "@[a-zA-Z]+[ \n
]*[{(][ \n
]*\\([^,
\n}]+\\)" 1 reftex-view-regexp-match format regexp-quote match-string 4 error "Cannot find citation key in BibTeX entry"] 8 (#$ . 8884) "P"])
(defalias 'reftex-view-regexp-match #[(re &optional highlight-group new ref-buffer) "\306\307Np D ?\205 \n\232\211 \203 \306\310N\202 \311 \312 \313 \314\211 ! \"\315#\2062 p!\210\3161S \f\203D \317 \211!\202O \320 \210\321 \322 \"\211!0\202W \210\202X \210!\203\202 \323\306\307\n#\210\323\306\310
T\211#\210\324\311$\224$\225#\210\325\326\327\"\210\312 \"\202\221 \323\306\307\314#\210\f\204\221 \330 !\210\331 !\210!\203\245 \332\333
\"\210\"\202\263 \f\203\260 \334\335
\"\202\263 \334\336!.\207" [oldprop re newprop new cont cnt reftex-view-regexp-match :props :cnt 0 selected-window current-window-configuration nil switch-to-buffer-other-window (error) reftex-global-search-continue reftex-access-scan-info reftex-global-search reftex-all-document-files put reftex-highlight add-hook pre-command-hook reftex-highlight-shall-die set-window-configuration select-window message "Match Nr. %s" error "No further matches (total number of matches: %d)" "No matches" current-window window-conf match pop-window ref-buffer highlight-group] 6])
(defvar reftex-global-search-marker (make-marker))
(defalias 'reftex-global-search #[(regexp file-list) "\303\304\305#\210\303\304\306 #\210\n\307\211\223\210\310 \207" [file-list regexp reftex-global-search-marker put reftex-global-search :file-list :regexp nil reftex-global-search-continue] 4])
(defalias 'reftex-global-search-continue #[nil "\306\307N\204\n \310\311!\210\306\307N\306\312N\313\n!\206 \314@!\315\n!\206$ \316 \317 \2040 \310\320 \"\210\321 !\210~\210\fb\210\3222 \323 \317\324#\203O \n`\317\223\210\325\322\324\"\210\211A\210\204] \325\322\317\"\210@\314
!\211\204m \310\326
\"\210\327\306\307#\210\321 !\210~\210\316b\210\202= \203\206 \324\202\216 \n\317\211\223\210\310\330!-\207" [file-list regexp reftex-global-search-marker buf pos file reftex-global-search :file-list error "No global search to continue" :regexp marker-buffer reftex-get-file-buffer-force marker-position 1 nil "No such buffer %s" switch-to-buffer exit re-search-forward t throw "Cannot access file %s" put "All files processed"] 5])
(provide 'reftex-dcr)
Mini Shell