;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@96 Information about splitidx-newindices in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-splitidx-newindex nil (#$ . 150)) #@96 Information about splitidx-newindices in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-splitidx-newindex-list nil (#$ . 304)) (make-variable-buffer-local 'LaTeX-splitidx-newindex-list) #@96 Information about splitidx-newindices in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-splitidx-newindex-changed nil (#$ . 517)) (make-variable-buffer-local 'LaTeX-splitidx-newindex-changed) #@132 Add information about SPLITIDX-NEWINDICES to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest SPLITIDX-NEWINDICES) (defalias 'LaTeX-add-splitidx-newindices #[128 "\300\301\"\207" [TeX-auto-add-information "splitidx-newindex"] 4 (#$ . 737)]) #@93 List of splitidx-newindices active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-splitidx-newindex-list #[0 "\300\301!\207" [TeX-auto-list-information "splitidx-newindex"] 2 (#$ . 1001)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("splitidx-newindex" LaTeX-auto-splitidx-newindex LaTeX-add-splitidx-newindices LaTeX-splitidx-newindex-list LaTeX-splitidx-newindex-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-splitidx-newindex-list nil] 2]] 4) #@58 Matches the argument of `\newindex' from `splitidx.sty'. (defvar LaTeX-splitidx-newindex-regex (cons "\\\\new\\(?:protected\\)?index\\(?:\\[[^]]*\\]\\)?{\\([^}]+\\)}" '(1 LaTeX-auto-splitidx-newindex)) (#$ . 1542)) #@54 Clear `LaTeX-auto-splitidx-newindex' before parsing. (defalias 'LaTeX-splitidx-auto-prepare #[0 "\301\211\207" [LaTeX-auto-splitidx-newindex nil] 2 (#$ . 1763)]) #@44 Process parsed results for "splitidx.sty". (defalias 'LaTeX-splitidx-auto-cleanup #[0 "\301\302\303\"\205P\304\305\306 \"\211\205N\211@\307\310B!\210\311\312BC!\210\313\314!\2033\315=\2033\316\317BC\320\"\210\321\322\323\324Q\325B\"\210\321\326\323\327Q\330B\"\210A\266\202\202\f\262\207" [TeX-install-font-lock LaTeX-provided-package-options-member "splitidx" "idxcommands" mapcar car LaTeX-splitidx-newindex-list TeX-add-symbols (TeX-arg-index) TeX-ispell-skip-setcar (ispell-tex-arg-end) featurep font-latex font-latex-setup font-latex-add-keywords ("{") reference add-to-list LaTeX-auto-regexp-list "\\\\" "{\\([^}{]*\\({[^}{]*\\({[^}{]*\\({[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^}{]*\\)*\\)}" (1 LaTeX-auto-index-entry) TeX-complete-list "{\\([^{}\n ]*\\)" (1 LaTeX-index-entry-list "}")] 7 (#$ . 1932)]) (byte-code "\301\302\303\304#\210\301\305\306\304#\210\301\307\310\304#\210\311\312\313#\207" [TeX-dialect add-hook TeX-auto-prepare-hook LaTeX-splitidx-auto-prepare t TeX-auto-cleanup-hook LaTeX-splitidx-auto-cleanup TeX-update-style-hook TeX-auto-parse TeX-add-style-hook "splitidx" #[0 "\303\304\305\306\307\310\311\312\313\314\315\316\317\320& \210\321!\210\322\323\324\325B\"\210\322\326\327\"\210\322\326\330\"\210\331\332!\2037\332\333\334 \335BBBC!\210\336\337\340\"\203d\303\341!\210\331\332!\203L\332\342!\210\322\323\343\344B\"\210\345\346!\203d\n\347=\203d\350\351\352\"\210\336\337\353\"\203\256\354 \203\256\355\356\354 \"\211\203\255\211@\303\357B!\210\360\361BC!\210\345\346!\203\234\n\347=\203\234\350\362BC\352\"\210\322\323\363\364Q\365B\"\210A\266\202\202u\210\345\346!\205\303\n\347=\205\303\350\366\367\"\210\350\370\352\"\207" [LaTeX-splitidx-newindex-regex LaTeX-splitidx-sindex-reftex-quick-id-key TeX-install-font-lock TeX-add-symbols ("newindex" ["Index name"] (TeX-arg-eval (lambda nil (let ((shortcut (TeX-read-string (TeX-argument-prompt nil nil "Short cut")))) (LaTeX-add-splitidx-newindices shortcut) (format "%s" shortcut))))) ("sindex" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Short cut") (LaTeX-splitidx-newindex-list)] TeX-arg-index) ("AtWriteToIndex" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Short cut") (LaTeX-splitidx-newindex-list)) t) ("AtNextWriteToIndex" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Short cut") (LaTeX-splitidx-newindex-list)) t) ("newprotectedindex" ["Index name"] (TeX-arg-eval (lambda nil (let ((shortcut (TeX-read-string (TeX-argument-prompt nil nil "Short cut")))) (LaTeX-add-splitidx-newindices shortcut) (format "%s" shortcut))))) ("printindex" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Short cut") (LaTeX-splitidx-newindex-list)] ["Index name"]) ("printindex*" 0) ("printsubindex" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Short cut") (LaTeX-splitidx-newindex-list)] ["Index name"]) ("printsubindex*" 0) ("setindexpreamble" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Short cut") (LaTeX-splitidx-newindex-list)] t) ("useindexpreamble" [TeX-arg-macro]) ("indexshortcut" 0) ("extendtheindex" 4) TeX-auto-add-regexp add-to-list LaTeX-auto-regexp-list "\\\\sindex\\(?:\\[[^{}]*\\]\\)?{\\([^}{]*\\({[^}{]*\\({[^}{]*\\({[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^}{]*\\)*\\)}" (1 LaTeX-auto-index-entry) TeX-complete-list ("\\\\sindex\\(\\[[^][{}]*\\]\\)?{\\([^{}\n ]*\\)" 2 LaTeX-index-entry-list "}") ("|see{\\([^{}\n ]*\\)" 1 LaTeX-index-entry-list) fboundp reftex-add-index-macros "\\sindex[]{*}" 1 (#1="" nil t) LaTeX-provided-package-options-member "splitidx" "useindex" ("index" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Short cut") (LaTeX-splitidx-newindex-list)] (TeX-arg-index)) (("\\index[]{*}" 1 105 #1# nil t)) "\\\\index\\(?:\\[[^{}]*\\]\\)?{\\([^}{]*\\({[^}{]*\\({[^}{]*\\({[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^}{]*\\)*\\)}" (1 LaTeX-auto-index-entry) featurep font-latex font-latex-setup font-latex-add-keywords (("index" "[{")) reference "idxcommands" LaTeX-splitidx-newindex-list mapcar car (TeX-arg-index) TeX-ispell-skip-setcar (ispell-tex-arg-end) ("{") "\\\\" "{\\([^}{]*\\({[^}{]*\\({[^}{]*\\({[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^}{]*\\)*\\)}" (1 LaTeX-auto-index-entry) (("newindex" "[{") ("AtWriteToIndex" "{{") ("AtNextWriteToIndex" "{{") ("newprotectedindex" "[{") ("setindexpreamble" "[{") ("useindexpreamble" "[") ("extendtheindex" "{{{{")) function (("sindex" "[{"))] 14]] 4) #@54 Prompt for package options for the splitidx package. (defvar LaTeX-splitidx-package-options '("makeindex" "useindex" "allintoone" "split" "protected" "idxcommands") (#$ . 6331))