403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/textmodes/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/textmodes/reftex-toc.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\302\303!\210\304\305\306\307#\210\310\211\2030\211@\305N\203)\306N\204)\311\306\305N#\210A\266\202\202\210\312\305\306\313#\207" [provide reftex-toc require reftex defvaralias reftex-toc-map reftex-toc-mode-map nil (saved-value saved-variable-comment) put make-obsolete-variable "24.1"] 7)
#@31 Keymap used for *toc* buffer.
(defvar reftex-toc-mode-map (byte-code "\301 \302\303\304#\210\302\305\306#\210\307\310\311$\210\307\312\313$\210\302\314\311#\210\302\315\313#\210\302\316\317#\210\302\320\321#\210\302\322\323#\210\302\324\325#\210\302\326\327#\210\302\330\331#\210\302\332\333#\210\302\334\335#\210\302\336\337#\210\302\340\341#\210\302\342\343#\210\302\344\345#\210\302\346\347#\210\302\350\351#\210\302\352\353#\210\302\354\355#\210\302\356\357#\210\302\360\361#\210\302\362\363#\210\302\364\365#\210\302\366\367#\210\302\370\371#\210\302\372\373#\210\302\374\375#\210\302\376\377#\210\201@\201A!\210\201B\201C\201D\201E$\210\207" [global-map make-sparse-keymap define-key [(mouse-2)] reftex-toc-mouse-goto-line-and-hide [follow-link] mouse-face substitute-key-definition next-line reftex-toc-next previous-line reftex-toc-previous "n" "p" "?" reftex-toc-show-help " " reftex-toc-view-line "
" reftex-toc-goto-line-and-hide "	" reftex-toc-goto-line ">" reftex-toc-display-index "r" reftex-toc-rescan "R" reftex-toc-Rescan "q" reftex-toc-quit "k" reftex-toc-quit-and-kill "f" reftex-toc-toggle-follow "a" reftex-toggle-auto-toc-recenter "d" reftex-toc-toggle-dedicated-frame "F" reftex-toc-toggle-file-boundary "i" reftex-toc-toggle-index "l" reftex-toc-toggle-labels "t" reftex-toc-max-level "c" reftex-toc-toggle-context "\245" reftex-toc-rename-label "x" reftex-toc-external "z" reftex-toc-jump "." reftex-toc-show-calling-point "" reftex-toc-next-heading "" reftex-toc-previous-heading ">" reftex-toc-demote "<" reftex-toc-promote (lambda (#1=#:def-tmp-var) (defvar reftex-toc-menu #1# #2="Menu for Table of Contents buffer")) nil easy-menu-do-define reftex-toc-menu #2# ("TOC" ["Show Location" reftex-toc-view-line t] ["Go To Location" reftex-toc-goto-line t] ["Exit & Go To Location" reftex-toc-goto-line-and-hide t] ["Show Calling Point" reftex-toc-show-calling-point t] ["Quit" reftex-toc-quit t] "--" ("Edit" ["Promote" reftex-toc-promote t] ["Demote" reftex-toc-demote t] ["Rename Label" reftex-toc-rename-label t]) "--" ["Index" reftex-toc-display-index t] ["External Document TOC  " reftex-toc-external t] "--" ("Update" ["Rebuilt *toc* Buffer" revert-buffer t] ["Rescan One File" reftex-toc-rescan reftex-enable-partial-scans] ["Rescan Entire Document" reftex-toc-Rescan t]) ("Options" "TOC Items" ["File Boundaries" reftex-toc-toggle-file-boundary :style toggle :selected reftex-toc-include-file-boundaries] ["Labels" reftex-toc-toggle-labels :style toggle :selected reftex-toc-include-labels] ["Index Entries" reftex-toc-toggle-index :style toggle :selected reftex-toc-include-index-entries] ["Context" reftex-toc-toggle-context :style toggle :selected reftex-toc-include-context] "--" ["Follow Mode" reftex-toc-toggle-follow :style toggle :selected reftex-toc-follow-mode] ["Auto Recenter" reftex-toggle-auto-toc-recenter :style toggle :selected reftex-toc-auto-recenter-timer] ["Dedicated Frame" reftex-toc-toggle-dedicated-frame t]) "--" ["Help" reftex-toc-show-help t])] 6) (#$ . 410))
(defvar reftex-last-window-height nil)
(defvar reftex-last-window-width nil)
(defvar reftex-toc-include-labels-indicator nil)
(defvar reftex-toc-include-index-indicator nil)
(defvar reftex-toc-max-level-indicator nil)
(defvar reftex-toc-mode-hook nil)
(byte-code "\300\301N\204\f\302\300\301\303#\210\304\305!\204\302\305\306\307#\210\300\207" [reftex-toc-mode-hook variable-documentation put "Hook run after entering TOC mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp reftex-toc-mode-map definition-name reftex-toc-mode] 4)
(defvar reftex-toc-mode-map (make-sparse-keymap))
(byte-code "\301\302N\204\303\301\302\304\305!#\210\306\307!\204\303\307\310\311#\210\312\313 !\210\307\302N\204-\303\307\302\304\314!#\210\306\300!\204B\303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P\303\300\302\304\320!#\210\303\311\321\322#\207" [reftex-toc-mode-abbrev-table reftex-toc-mode-map variable-documentation put purecopy "Keymap for `reftex-toc-mode'." boundp reftex-toc-mode-syntax-table definition-name reftex-toc-mode (lambda (#1=#:def-tmp-var) (defvar reftex-toc-mode-syntax-table #1#)) make-syntax-table "Syntax table for `reftex-toc-mode'." (lambda (#1#) (defvar reftex-toc-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `reftex-toc-mode'." derived-mode-parent special-mode] 5)
#@379 Major mode for managing Table of Contents for LaTeX files.
This buffer was created with RefTeX.
Press `?' for a summary of important key bindings.

Here are all local bindings.

\{reftex-toc-mode-map}

In addition to any hooks its parent mode `special-mode' might have
run, this mode runs the hook `reftex-toc-mode-hook', as the final or
penultimate step during initialization.
(defalias 'reftex-toc-mode #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315!\204'\316\317 \"\210\320\f!\211\2035\211\321 =\203;\322\f\323 \"\210\210\324
\325\"\204R
7=\204R\326
\3257C#\210\327!\210\330\f!\210
7\306\331!\210\307\306\332!\210\333\306\334!\210\335\306\336!\2108\337U\203\201\340\202\205\3418!\342\343\344\345\346\n\347\350\334\351\352\353\351\354\336\351\355\2579\307:\306\356!\210\357\360\361\362\307$\210\357\363\364\362\307$\210)\365\366!\207" [delay-mode-hooks major-mode mode-name reftex-toc-mode-map reftex-toc-mode-syntax-table reftex-toc-mode-abbrev-table make-local-variable t special-mode reftex-toc-mode "TOC" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table transient-mark-mode revert-buffer-function reftex-toc-revert reftex-toc-include-labels-indicator "" reftex-toc-max-level-indicator 100 "ALL" int-to-string "----  " mode-line-buffer-identification "  " global-mode-string "   (" ")" "  L<" ">" "  I<" reftex-toc-include-index-indicator "  T<" " -%-" reftex-last-follow-point add-hook post-command-hook reftex-toc-post-command-hook nil pre-command-hook reftex-toc-pre-command-hook run-mode-hooks reftex-toc-mode-hook local-abbrev-table reftex-toc-max-level mode-line-format truncate-lines] 17 (#$ . 4895) nil])
#@77 Stores the file name from which `reftex-toc' was called.  For redo command.
(defvar reftex-last-toc-file nil (#$ . 6751))
#@68 Marker which makes it possible to return from TOC to old position.
(defvar reftex-toc-return-marker (make-marker) (#$ . 6879))
(defconst reftex-toc-help "                      AVAILABLE KEYS IN TOC BUFFER\n                      ============================\nn / p      next-line / previous-line\nSPC        Show the corresponding location of the LaTeX document.\nTAB        Goto the location and keep the TOC window.\nRET        Goto the location and hide the TOC window (also on mouse-2).\n< / >      Promote / Demote section, or all sections in region.\nC-c >      Display Index. With prefix arg, restrict index to current section.\nq / k      Hide/Kill *toc* buffer, return to position of reftex-toc command.\nl i c F    Toggle display of  [l]abels,  [i]ndex,  [c]ontext,  [F]ile borders.\nt          Change maximum toc depth (e.g. `3 t' hides levels greater than 3).\nf / g      Toggle follow mode / Refresh *toc* buffer.\na / d      Toggle auto recenter / Toggle dedicated frame\nr / C-u r  Reparse the LaTeX document     / Reparse entire LaTeX document.\n.          In other window, show position from where `reftex-toc' was called.\nM-%        Global search and replace to rename label at point.\nx          Switch to TOC of external document (with LaTeX package `xr').\nz          Jump to a specific section (e.g. '3 z' goes to section 3).")
(defvar reftex--rebuilding-toc nil)
#@164 Show the table of contents for the current document.
When called with a raw \[universal-argument] prefix, rescan the document first.

(fn &optional REBUILD REUSE)
(defalias 'reftex-toc #[512 "\306 \230\203	\203\307\310!\210\311 \306 `\312\223\210\f\203 \313
\203'\314 \210@\204.\312\315	!\210p%\316%J\236\317\311 BA@BA\203M\320\321N\202P\322 @\323\324!\203^\324\325 \326\"\202b\327\312\326\"\312\211\330\310\n\205l\331\"\211\262\203z\332!\210\202\270B\203\211\333 \334C_W\203\214\335 \210\336 D\333 E\204\264F\203\252\337\340\336 G_!!\210\202\264\341\340\333 G_!!\210\342\310!\210H\343=\204\302\343 \210\344\345!\210%I\346=\203\325\347\202\327IJ
\346=\203\343\347\202\344
K\350 \351U\203O\352\353!\210\312L\354\355\356!\"c\210\357 \203	\360e`\361M$\210\323\362!\203\362\313!\210\202\360e`\363\346$\210\364e`\365#\210\360eeT\366$\210\367\346I
NO\312\211\f\317\346&\262\370\371!\210\352\372!\210\346L\202{\373I\205Y\374\346
N&\206i\375\376%J#\262\377\320\201Q\201R#\210eb\210\334y\210\201S`\320\201QN#\210`\211P\207" [reftex-last-toc-master current-prefix-arg reftex-last-toc-file reftex-toc-return-marker reftex-toc-follow-mode reftex-toc-include-index-entries reftex-TeX-master-file reftex-erase-buffer "*toc*" buffer-file-name nil 1 reftex-ensure-index-support reftex-access-scan-info xr "" reftex-toc :reftex-data reftex-where-am-I fboundp frame-property selected-frame unsplittable frame-parameter get-buffer-window visible select-window window-height 2 delete-other-windows window-total-width split-window-right floor split-window-below switch-to-buffer reftex-toc-mode make-local-variable reftex-docstruct-symbol t "ALL" buffer-size 0 message "Building *toc* buffer..." format "TABLE-OF-CONTENTS on %s\nSPC=view TAB=goto RET=goto+hide [q]uit [r]escan [l]abels [f]ollow [x]r [?]Help\n------------------------------------------------------------------------------\n" abbreviate-file-name reftex-use-fonts put-text-property font-lock-face cursor-intangible-mode intangible add-text-properties (cursor-intangible t front-sticky (cursor-intangible) rear-nonsticky (cursor-intangible)) xr-alist reftex-insert-docstruct run-hooks reftex-display-copied-context-hook "Building *toc* buffer...done." reftex-get-offset " " reftex-last-assoc-before-elt toc put reftex-support-index reftex--rebuilding-toc reftex-toc-keep-other-windows window-min-height reftex-last-window-width reftex-last-window-height reftex-toc-split-windows-horizontally reftex-toc-split-windows-fraction major-mode reftex-toc-include-labels reftex-toc-include-labels-indicator reftex-toc-include-index-indicator buffer-read-only reftex-toc-header-face reftex-toc-include-file-boundaries reftex-toc-include-context reftex-last-follow-point :reftex-line 3 reftex-find-start-point] 22 (#$ . 8272) nil])
#@98 Display the TOC window and highlight line corresponding to current position.

(fn &optional ARG)
(defalias 'reftex-toc-recenter #[256 "p\302 \303\304\"\210\305\306`\"\307U\203 \310\311\312\"!\210\303\310\304\"\210)`\306V\203J\313`\314\"\204J	\315>\203J\316\307\317d`T^\320\"\206@e\321`\320\"\206Hd#\210\311\312\"!\207" [current-prefix-arg reftex-highlight-selection selected-frame reftex-toc t count-lines 1 2 nil select-window get-buffer-window get-text-property cursor-intangible (cursor both) reftex-highlight previous-single-property-change :data next-single-property-change] 9 (#$ . 11135) "P"])
(defalias 'reftex-toc-pre-command-hook #[0 "\300\301!\207" [reftex-unhighlight 0] 2])
(defalias 'reftex-toc-post-command-hook #[0 "\304`\305\"\2038\306\307\310\304`\305\"#\210`\311V\2038\304`\312\"\2048\313>\2038\314\315\316`T\305\"\206.e\317`\305\"\2066d#\210	\250\203A\320\211\207\321 ?\205e	\205e\n`\232?\205e`\211\205e\3221c\323\324?\"0\207\210\320\207" [reftex-highlight-selection reftex-toc-follow-mode reftex-last-follow-point reftex-revisit-to-follow get-text-property :data put reftex-toc :reftex-data 1 cursor-intangible (cursor both) reftex-highlight 2 previous-single-property-change next-single-property-change t reftex-toc-dframe-p (error) reftex-toc-visit-location nil] 6])
#@38 Enlarge window to a remembered size.
(defalias 'reftex-re-enlarge #[0 "\203	\206\n\303 \303 Z\202\n\206\304 \304 Z\211\305V\2051\3061)\307\"0\207\310\311\"\210\312\262\207" [reftex-toc-split-windows-horizontally reftex-last-window-width reftex-last-window-height window-total-width window-height 0 (debug error) enlarge-window message "Error: %S" nil] 5 (#$ . 12459)])
#@30 

(fn &optional FRAME ERROR)
(defalias 'reftex-toc-dframe-p #[512 "\206\300 \262\301\302!\203\302\303\"\202\304\303\"\305\232\211\203'\203'\306\307!\210\207" [selected-frame fboundp frame-property name frame-parameter "RefTeX TOC Frame" error "This frame is view-only.  Use `C-c =' to create TOC window for commands"] 5 (#$ . 12848)])
#@41 Show a summary of special key bindings.
(defalias 'reftex-toc-show-help #[0 "\306\307\310\"\210r\311\312!q\210p\313 \210\307\211\314\211\314\315 \210\316\317!\210+\211\320!\210\321!\210)\266\322\312\314\"\210\205A\323\211\207" [default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only reftex-toc-dframe-p nil error get-buffer-create "*RefTeX Help*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook princ internal-temp-output-buffer-show reftex-enlarge-to-fit 1 standard-output reftex-toc-help reftex-toc-follow-mode] 5 (#$ . 13202) nil])
#@51 Move to next selectable item.

(fn &optional ARG)
(defalias 'reftex-toc-next #[256 "\301m\204	\302u\210\303`\304\"\206`b\207" [reftex-callback-fwd t 1 next-single-property-change :data] 4 (#$ . 13846) nil])
#@55 Move to previous selectable item.

(fn &optional ARG)
(defalias 'reftex-toc-previous #[256 "\301\302`\303\"\206\n`b\207" [reftex-callback-fwd nil previous-single-property-change :data] 4 (#$ . 14063) nil])
#@58 Move to next table of contents line.

(fn &optional ARG)
(defalias 'reftex-toc-next-heading #[256 "\300\210\301\302\300\303$\210\304 \207" [nil re-search-forward "^ " t beginning-of-line] 6 (#$ . 14277) "p"])
#@62 Move to previous table of contents line.

(fn &optional ARG)
(defalias 'reftex-toc-previous-heading #[256 "\300\301\302\303$\207" [re-search-backward "^ " nil t] 6 (#$ . 14494) "p"])
#@52 Toggle follow (other window follows with context).
(defalias 'reftex-toc-toggle-follow #[0 "\302	?\211\207" [reftex-last-follow-point reftex-toc-follow-mode -1] 2 (#$ . 14684) nil])
#@54 Toggle inclusion of file boundaries in *toc* buffer.
(defalias 'reftex-toc-toggle-file-boundary #[0 "?\301 \207" [reftex-toc-include-file-boundaries reftex-toc-revert] 1 (#$ . 14874) nil])
#@143 Toggle inclusion of labels in *toc* buffer.
With prefix ARG, prompt for a label type and include only labels of
that specific type.

(fn ARG)
(defalias 'reftex-toc-toggle-labels #[257 "\211\203	\301 \202?\302 \207" [reftex-toc-include-labels reftex-query-label-type reftex-toc-revert] 2 (#$ . 15072) "P"])
#@144 Toggle inclusion of index in *toc* buffer.
With prefix arg, prompt for an index tag and include only entries of that
specific index.

(fn ARG)
(defalias 'reftex-toc-toggle-index #[257 "\211\203	\301 \202?\302 \207" [reftex-toc-include-index-entries reftex-index-select-tag reftex-toc-revert] 2 (#$ . 15390) "P"])
#@119 Toggle inclusion of label context in *toc* buffer.
Label context is only displayed when the labels are there as well.
(defalias 'reftex-toc-toggle-context #[0 "?\301 \207" [reftex-toc-include-context reftex-toc-revert] 1 (#$ . 15715) nil])
#@226 Set the maximum level of TOC lines in this buffer to value of prefix ARG.
When no prefix is given, set the max level to a large number, so that all
levels are shown.  For example, to set the level to 3, type `3 m'.

(fn ARG)
(defalias 'reftex-toc-max-level #[257 "\211\203\n\302!\202\303\211\203\304!\202\305\306 \207" [reftex-toc-max-level reftex-toc-max-level-indicator prefix-numeric-value 100 int-to-string "ALL" reftex-toc-revert] 3 (#$ . 15964) "P"])
#@41 View document location in other window.
(defalias 'reftex-toc-view-line #[0 "\300\301\302\"\210\303 \207" [reftex-toc-dframe-p nil error reftex-toc-visit-location] 3 (#$ . 16438) nil])
#@64 Go to document location in other window.  Hide the TOC window.
(defalias 'reftex-toc-goto-line-and-hide #[0 "\300\301\302\"\210\303\304!\207" [reftex-toc-dframe-p nil error reftex-toc-visit-location hide] 3 (#$ . 16629) nil])
#@61 Go to document location in other window.  TOC window stays.
(defalias 'reftex-toc-goto-line #[0 "\300\301\302\"\210\303\304!\207" [reftex-toc-dframe-p nil error reftex-toc-visit-location t] 3 (#$ . 16861) nil])
#@73 Go to document location in other window.  Hide the TOC window.

(fn EV)
(defalias 'reftex-toc-mouse-goto-line-and-hide #[257 "\300!\210\301\302\303\"\210\304\305!\207" [mouse-set-point reftex-toc-dframe-p nil error reftex-toc-visit-location hide] 4 (#$ . 17078) "e"])
#@48 Show point where `reftex-toc' was called from.
(defalias 'reftex-toc-show-calling-point #[0 "\301\302\303\"\210\304 \305\306\"\216\307\310!!\210\311!b\210\312\313!)\207" [reftex-toc-return-marker reftex-toc-dframe-p nil error selected-window make-closure #[0 "\301\300!\207" [V0 select-window] 2] switch-to-buffer-other-window marker-buffer marker-position recenter (4)] 4 (#$ . 17353) nil])
#@133 Hide the TOC window and do not move point.
If the TOC window is the only window on the dedicated TOC frame, the frame
is destroyed.
(defalias 'reftex-toc-quit #[0 "\301 \203\302 \203\303 G\304V\203\305 \207\301 \204\306 \210\307\310!!\210\311 \210\312!\206-`b\207" [reftex-toc-return-marker one-window-p reftex-toc-dframe-p frame-list 1 delete-frame delete-window switch-to-buffer marker-buffer reftex-re-enlarge marker-position] 3 (#$ . 17755) nil])
#@24 Kill the *toc* buffer.
(defalias 'reftex-toc-quit-and-kill #[0 "\301\302!\210\303 \204\f\304 \210\305\306!!\210\307 \210\310!b\207" [reftex-toc-return-marker kill-buffer "*toc*" one-window-p delete-window switch-to-buffer marker-buffer reftex-re-enlarge marker-position] 3 (#$ . 18223) nil])
#@196 Display the index buffer for the current document.
This works just like `reftex-display-index' from a LaTeX buffer.
With prefix arg 1, restrict index to the section at point.

(fn &optional ARG)
(defalias 'reftex-toc-display-index #[256 "\301\302\303\"\210\304`\305\"J\302\211\211\306=\203-\307\310#\262\310>A\236\262\3118E\262\312 \210\313?\2058\"\207" [reftex-docstruct-symbol reftex-toc-dframe-p nil error get-text-property :data 2 reftex-last-assoc-before-elt toc 6 reftex-toc-goto-line reftex-display-index] 10 (#$ . 18525) "P"])
#@82 Regenerate the *toc* buffer by reparsing file of section at point.

(fn &rest _)
(defalias 'reftex-toc-rescan #[128 "\203g	\204g\303`\304\"\211@\211\305\267\202 \3068\2024A@\2024\211;\203+\3068\2024\211\307=\2054\3068\310e`\"n\203@\311\202A\312\\\204N\313\314!\266\202j\315\316\317#\210\320\321!!\210\322\323\316 \210)\266\202j\324 \210\325 \207" [reftex-enable-partial-scans current-prefix-arg reftex--rebuilding-toc get-text-property :data #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (toc 20 eof 26 bof 26 file-error 26)) 3 index count-lines 1 0 error "Don't know which file to rescan.  Try `C-u r'" put reftex-toc :reftex-line switch-to-buffer-other-window reftex-get-file-buffer-force (4) t reftex-toc-Rescan reftex-kill-temporary-buffers] 9 (#$ . 19086) nil])
#@77 Regenerate the *toc* buffer by reparsing the entire document.

(fn &rest _)
(defalias 'reftex-toc-Rescan #[128 "\303e`\"n\203\f\304\202
\305\\\306\307\310#\266\311\312!!\210\313\314\307 )\207" [reftex-last-toc-file current-prefix-arg reftex--rebuilding-toc count-lines 1 0 put reftex-toc :reftex-line switch-to-buffer-other-window reftex-get-file-buffer-force (16) t] 6 (#$ . 19923) nil])
#@59 Regenerate the TOC from the internal lists.

(fn &rest _)
(defalias 'reftex-toc-revert #[128 "\303\304!\203\304\305 \306\"\202\307\310\306\"\311\211\203!\312\313	!!\210\202'\314\313	!!\210)\210\315\316!\210\310\317\311\211\"\207" [reftex--rebuilding-toc reftex-last-toc-file current-prefix-arg fboundp frame-property selected-frame unsplittable frame-parameter nil t switch-to-buffer reftex-get-file-buffer-force switch-to-buffer-other-window reftex-erase-buffer "*toc*" reftex-toc] 5 (#$ . 20325) nil])
#@68 Switch to table of contents of an external document.

(fn &rest _)
(defalias 'reftex-toc-external #[128 "\300\301\302\"\210p\303\304\305\"\306\307\"\310\3118A!\206\302\312!!\210\313 \210p\232\203*\314\315!\207\314\316!\207" [reftex-toc-dframe-p nil error get-text-property 1 xr-alist reftex-select-external-document 0 switch-to-buffer-other-window reftex-get-file-buffer-force "Cannot switch document" reftex-toc message "" "Switched document"] 8 (#$ . 20843) nil])
#@94 Jump to a specific section.  E.g. '3 z' jumps to section 3.
Useful for large TOCs.

(fn ARG)
(defalias 'reftex-toc-jump #[257 "eb\210\300\301\302\247\203\202\303!\304Q\305\306#\210\307 \207" [re-search-forward "^ *" number-to-string 1 " " nil t beginning-of-line] 5 (#$ . 21322) "P"])
#@92 Demote section at point.  If region is active, apply to all in region.

(fn &optional ARG)
(defalias 'reftex-toc-demote #[256 "\300\301!\207" [reftex-toc-do-promote 1] 3 (#$ . 21619) nil])
#@93 Promote section at point.  If region is active, apply to all in region.

(fn &optional ARG)
(defalias 'reftex-toc-promote #[256 "\300\301!\207" [reftex-toc-do-promote -1] 3 (#$ . 21814) nil])
#@156 Workhorse for `reftex-toc-promote' and `reftex-toc-demote'.
Changes the level of sections in the current region, or just the section at
point.

(fn DELTA)
(defalias 'reftex-toc-do-promote #[257 "\304e`\"n\203\f\305\202
\306\\\307 \205(\212\310 b\210\304e`\"n\203%\305\202&\306\\)`\306V\2034\311\2025\312\313\211\211\211\211\211\211\31421\307 \203`\315 \204Q\316 \210\202f`\310 ^\262`\310 ]\262\202f`\262`\262b\210\317`\320\"\211\262\203\226`X\203\226@\321=\203\211`BB\262\322`\320\"\206\221db\210\202j\237\262b\210\323@!\262G\211\262\305V\203\272\324\323S8!Q\262\325\326\327\"\"\262\203\250\203\324W\204\330\331\332\306W\203\342\333\202\343\334\211\305U\203\356\335\202\357\336\305U\203\372\337\202\373\340	&!\204\341\342!\210\343\344\"\210\345 \326\346\"\216\347 \210)\210\350	\"\210\351\352\211\305U\203+\337\202,\340\n$\210\3130\262\211\205>\353 \210\351\354\"+\207" [reftex--start-line reftex--mark-line reftex--pro-or-de reftex-toc-confirm-promotion count-lines 1 0 region-active-p mark "de" "pro" nil exit reftex-toc-check-docstruct reftex-toc-load-all-files-for-promotion get-text-property :data toc next-single-property-change reftex-toc-extract-section-number "-" mapcar make-closure #[257 "\301\300\"\207" [V0 reftex-toc-promote-prepare] 4 "\n\n(fn E)"] yes-or-no-p format "%s %d toc-entr%s (section%s %s)? " "Promote" "Demote" "y" "ies" "" "s" error "Abort" mapc reftex-toc-promote-action current-window-configuration #[0 "\301\300!\207" [V0 set-window-configuration] 2] reftex-toc-Rescan reftex-toc-restore-region message "%d section%s %smoted" ding "%s"] 17 (#$ . 22013)])
#@39 

(fn POINT-LINE &optional MARK-LINE)
(defalias 'reftex-toc-restore-region #[513 "\211\205\feb\210\211Sy\210`\203eb\210Sy\210\211\205$\302!\210\303\304\211\207" [mark-active deactivate-mark set-mark t nil] 5 (#$ . 23693)])
#@260 Look at a TOC entry and see if we could pro/demote it.
This function prepares everything for the change, but does not do it.
The return value is a list with information needed when doing the
promotion/demotion later.  DELTA is the level change.

(fn X DELTA)
(defalias 'reftex-toc-promote-prepare #[514 "@A\3038\3048\305\211\306!\203R\307!\203Rr\307!q\210\310!b\210\311\312!!\203D\313\314!\210\311!\203=\315\316!\262\202G\317\320!\210\202G\321\262)\203U\322 \210\202U\322 \210\305\323	\"A\211\250\204ib\210\317\324\n\"\210\305\325Y\203w	\\\202{\nZ\325Y\203\207\211\326U\204\223\325W\203\232\211\325U\203\232\317\327\n#\210\305\330	#\203\263\211\203\263
F\207\nb\210\317\327\n	#\207" [reftex-section-regexp reftex-section-levels-all reftex--pro-or-de 4 7 nil markerp marker-buffer marker-position looking-at regexp-quote beginning-of-line 1 reftex-match-string 2 error "Something is wrong!  Contact maintainer!" t reftex-toc-load-all-files-for-promotion assoc "Cannot %smote special sections" 0 -1 "Cannot %smote \\%s" reftex-toc-newhead-from-alist] 18 (#$ . 23932)])
#@118 Change the level of a TOC entry.
`reftex--pro-or-de' is assumed to be dynamically scoped into this function.

(fn X)
(defalias 'reftex-toc-promote-action #[257 "\211@A@\3028\3038r\304!q\210\305!b\210\306\307\310\311!R!\203+\312\313P!\202/\314\315	\")\207" [reftex-section-pre-regexp reftex--pro-or-de 2 4 marker-buffer marker-position looking-at "\\([ 	]*" "\\)" regexp-quote replace-match "\\1" error "Fatal error during %smotion"] 11 (#$ . 25061)])
#@69 Get the numbering of a TOC entry, for message purposes.

(fn ENTRY)
(defalias 'reftex-toc-extract-section-number #[257 "\300\301\302@8\"\203\303\304\302@8\"\207\305\207" [string-match "\\s-*\\(\\S-+\\)" 2 match-string 1 "?"] 5 (#$ . 25529)])
#@373 Get new heading with level NLEVEL from ALIST.
If there are no such entries, return nil.
If there are several different entries with same new level, choose the
one with the smallest distance to the association of HEAD in the alist.
This makes it possible for promotion to work several sets of headings,
if these sets are sorted blocks in the alist.

(fn NLEVEL HEAD ALIST)
(defalias 'reftex-toc-newhead-from-alist #[771 "\211\300\"\211>G\301\302\301\2037@A	\232\2030\303GZ!\262W\2030@@\262\262A\262\202\f\207" [assoc nil 1000 abs] 12 (#$ . 25782)])
#@75 Check if the current docstruct is fully up to date and all files visited.
(defalias 'reftex-toc-check-docstruct #[0 "J\301\211\211\3022D\211A\262\242\211\262\203B@\303=\203	\3048\262\3058\262\306!\203:\307!\203:\310!U\204	\311\302\301\"\210\202	\3120\207" [reftex-docstruct-symbol nil exit toc 4 8 markerp marker-buffer marker-position throw t] 7 (#$ . 26358)])
#@329 Make sure all files of the document are being visited by buffers,
and that the scanning info is absolutely up to date.
We do this by rescanning with `reftex-keep-temporary-buffers' bound to t.
The variable `reftex--pro-or-de' is assumed to be dynamically
scoped into this function.
When finished, we exit with an error message.
(defalias 'reftex-toc-load-all-files-for-promotion #[0 "\303\304 \210\305	\n\"\210\306\307\310\")\207" [reftex-keep-temporary-buffers reftex--start-line reftex--mark-line t reftex-toc-Rescan reftex-toc-restore-region throw exit "TOC had to be updated first.  Please check selection and repeat the command."] 3 (#$ . 26747)])
#@325 Rename the currently selected label in the *toc* buffer.
This launches a global search and replace in order to rename a label.
Renaming a label is hardly ever necessary - the only exception is after
promotion/demotion in connection with a package like fancyref, where the
label prefix determines the wording of a reference.
(defalias 'reftex-toc-rename-label #[0 "\301`\302\"\211@\303;\204\304\305!\210\306\307\310\"!\262\311J\"\203-\312\313\314\"!\204-\304\315!\210\212\316 \317\320\"\216\321\322!\210\3231N\324\325\326!\327Q\307\330\"\"0\210\202O\210)\210)\331 \207" [reftex-docstruct-symbol get-text-property :data nil error "This is not a label entry" read-string format "Rename label \"%s\" to: " assoc y-or-n-p format-message "Label `%s' exists.  Use anyway? " "Abort" current-window-configuration make-closure #[0 "\301\300!\207" [V0 set-window-configuration] 2] reftex-toc-visit-location t (error) reftex-query-replace-document "{" regexp-quote "}" "{%s}" reftex-toc-rescan] 9 (#$ . 27408) nil])
#@35 

(fn &optional FINAL NO-REVISIT)
(defalias 'reftex-toc-visit-location #[512 "\302`\303\"\304 \305\204\306\307!\210@\310=\203\311\"\262\202x@\312=\203/\313\"\262\202x@\314>\203i@A@\203E\315!\203]\316\317\305\"!\210\320=\203Ve\202Wdb\266\202\202d\321\322\"\266\305\262\202x@;\203x\323	\324$\262\211\204\204\325!\210\306\326!\210\327\267\202\322\330!r\331\332\"\216\325@\333\"\210\334\335!*\207\304 \336 =\204\305\330!r\331\337\"\216\325@\333\"\210\334\335!\210\340 \204\303\341 \210*\210\342!\204\317\343!\210\344 \207\345 \346!=\204\341\347\346!!\210\325!\207" [reftex-no-follow-message reftex-callback-fwd get-text-property :data selected-window nil error "Don't know which TOC line to visit" toc reftex-toc-find-section index reftex-index-show-entry (bof eof) find-buffer-visiting switch-to-buffer-other-window reftex-get-file-buffer-force bof message "%s" reftex-show-label-location t select-window "Cannot find location" #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (t 138 hide 158)) internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] norecord reftex-unhighlight 0 window-buffer #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] one-window-p delete-window window-live-p pop-to-buffer-same-window reftex-re-enlarge selected-frame window-frame select-frame-set-input-focus] 11 (#$ . 28433)])
#@33 

(fn TOC &optional NO-REVISIT)
(defalias 'reftex-toc-find-section #[513 "\3028\3038\3048\3058\3068\307!\203S\310!\203S\311\310!!\210\312\313!\210\314!b\210\315\316!!\206\231\315\317!!\206\231\315\320!!\206\231\315\321\316\322\"@!\323Q!\202\231\203]\324!\203\223\311\325\313\"!\210\211\206jeb\210\315\316!!\206\231G\326\316!\"\206\216\326\317!\"\206\216\326\320!\"\262\202\231\327\330	\"\210\313\211\203\264\331\224b\210`dU\204\253\332\333!\210\334\331\211\224\331\225p$\210\207" [reftex-section-levels-all reftex-no-follow-message 3 4 5 7 8 markerp marker-buffer switch-to-buffer-other-window push-mark nil marker-position looking-at regexp-quote reftex-make-regexp-allow-for-ctrl-m reftex-make-desperate-section-regexp "\\\\" rassq "[[{]?" find-buffer-visiting reftex-get-file-buffer-force reftex-nearest-match message "%s" 0 recenter 1 reftex-highlight] 13 (#$ . 29913)])
#@12 

(fn OLD)
(defalias 'reftex-make-desperate-section-regexp #[257 "\300\301\"T\302\303\300\301\"TO!\304O\300\305\"\203;\306\224\203(\307P\262\2021\310\311\312\"Q\262\211\303\225\304O\262\202\207" [string-match "[[{]" regexp-quote 0 nil "\\([
\n]\\)\\|\\(\\`\\|[ 	\n
]\\)\\([a-zA-Z0-9]+\\)\\([ 	\n
]\\|}\\'\\)" 1 "[^\n
]*[\n
]" "[^\n
]*" match-string 3] 9 (#$ . 30838)])
(defalias 'reftex-recenter-toc-when-idle #[0 "\303 \304V\205*\205*\305 ?\205*\306\307!\205*\310\311\312\"\205*	\313 \230\205*\314\315 )\207" [reftex-mode reftex-last-toc-master current-prefix-arg buffer-size 5 active-minibuffer-window fboundp reftex-toc-mode get-buffer-window "*toc*" visible reftex-TeX-master-file nil reftex-toc-recenter] 3])
#@139 Toggle the automatic recentering of the TOC window.
When active, leaving point idle will make the TOC window jump to the correct
section.
(defalias 'reftex-toggle-auto-toc-recenter #[0 "\203\302!\210\303\304\305!\207\306	\307\310#\304\311!\207" [reftex-toc-auto-recenter-timer reftex-idle-time cancel-timer nil message "Automatic recentering of TOC window was turned off" run-with-idle-timer t reftex-recenter-toc-when-idle "Automatic recentering of TOC window was turned on"] 4 (#$ . 31586) nil])
#@216 Toggle the display of a separate frame for the TOC.
This frame is not used by the `reftex-toc' commands, but it is useful to
always show the current section in connection with the option
`reftex-auto-recenter-toc'.
(defalias 'reftex-toc-toggle-dedicated-frame #[0 "\30028\301 \302\303\304!\203\304\202\305\211A\262\242\211\262\2033\211\306\"\307\232\203\310!\210\311\300\302\"\210\202\312 \266\2030\207" [exit frame-list nil fboundp frame-property frame-parameter name "RefTeX TOC Frame" delete-frame throw reftex-make-separate-toc-frame] 6 (#$ . 32097) nil])
(defalias 'reftex-make-separate-toc-frame #[0 "\302 \303 \304\305\306\"\307\205\302 \310!\232??\205H\311\312!\262\313!\210\314\305!\210\313!\210\315\316!\2033\316!\210\317!\210\320=\205H	\204D\321 \210\322\323\324\"\207" [reftex-auto-recenter-toc reftex-toc-auto-recenter-timer selected-frame selected-window get-buffer-window "*toc*" visible nil window-frame make-frame ((name . "RefTeX TOC Frame") (height . 20) (width . 60) (unsplittable . t) (minibuffer) (default-toolbar-visible-p) (menubar-visible-p) (horizontal-scrollbar-visible-p)) select-frame switch-to-buffer fboundp x-focus-frame select-window frame reftex-toggle-auto-toc-recenter add-hook delete-frame-functions reftex-toc-delete-frame-hook] 7])
#@14 

(fn FRAME)
(defalias 'reftex-toc-delete-frame-hook #[257 "\205\f\301!\205\f\302 \207" [reftex-toc-auto-recenter-timer reftex-toc-dframe-p reftex-toggle-auto-toc-recenter] 3 (#$ . 33403)])

Youez - 2016 - github.com/yon3zu
LinuXploit