;ELC ;;; Compiled ;;; in Emacs version 27.1 ;;; 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 ./01 \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\3444\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\2058r\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]GGU\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\242rq\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#\2062p!\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)