;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@93 Key=value options for "\titleformat" and "\titlespacing" macros provided by "titlesec.sty". (defvar LaTeX-titlesec-key-val-options '(("page" ("even" "odd")) ("numberless")) (#$ . 150)) #@58 List of sectioning commands available in "titlesec.sty". (defvar LaTeX-titlesec-section-command-list '("part" "chapter" "section" "subsection" "subsubsection" "paragraph" "subparagraph") (#$ . 341)) #@65 List of sectioning shapes available for "\titleformat" command. (defvar LaTeX-titlesec-section-shape-list '("hang" "block" "display" "runin" "leftmargin" "rightmargin" "drop" "wrap" "frame") (#$ . 546)) #@213 Remove "chapter" from variable `LaTeX-titlesec-section-command-list' and return the remainder. Removal is based on the return value of function `LaTeX-largest-level'. Items returned are prefixed with `TeX-esc'. (defalias 'LaTeX-titlesec-section-command-list #[0 "\301\302\303 \304W\203\300J\202\305\306\"\"\207" [LaTeX-titlesec-section-command-list mapcar #[257 "P\207" [TeX-esc] 3 "\n\n(fn ELT)"] LaTeX-largest-level 2 remove "chapter"] 5 (#$ . 756)]) #@416 Insert the first argument of "\titleformat" and "\titlespacing". Depending on returned value of function `LaTeX-largest-level', append a "name" key with corresponding values to `LaTeX-titlesec-key-val-options'. The values are retrieved from `LaTeX-titlesec-section-command-list'. The values of this list are also added stand-alone as keys. If OPTIONAL is non-nil, insert the argument in brackets. (fn OPTIONAL) (defalias 'LaTeX-arg-titlesec-titlespec #[257 "\302\303\304\305\306\307 \310W\203\300J\202\311\312\"\"DC\305\313\305\314\307 \310W\203)\300J\202-\311\312\"\"\" #\315#\316\"\207" [LaTeX-titlesec-section-command-list LaTeX-titlesec-key-val-options TeX-read-key-val append "name" mapcar #[257 "P\207" [TeX-esc] 3 "\n\n(fn ELT)"] LaTeX-largest-level 2 remove "chapter" list #[257 "P\207" [TeX-esc] 3 "\n\n(fn ELT)"] "Sectioning command" TeX-argument-insert] 12 (#$ . 1224)]) (TeX-add-style-hook "titlesec" #[0 "\301\302\303\"\203 \304\305!\210\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332&\210\301\302\333\"\203.\306\334!\210\335\336\337\340#\210\341\342!\205D\343=\205D\344\345\346\"\207" [TeX-install-font-lock LaTeX-provided-package-options-member "titlesec" "pagestyles" TeX-run-style-hooks "titleps" TeX-add-symbols ("titlelabel" t) ("titleformat*" (LaTeX-arg-titlesec-titlespec) t) ("titleformat" (LaTeX-arg-titlesec-titlespec) [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Shape") LaTeX-titlesec-section-shape-list] (TeX-arg-conditional (y-or-n-p "With optional after-code? ") (4 [nil]) (4))) ("chaptertitlename" 0) ("titlespacing" (LaTeX-arg-titlesec-titlespec) (TeX-arg-length "Left margin") (TeX-arg-length "Before vertical space") (TeX-arg-length "Space between title and text") [TeX-arg-length "Right margin"]) ("titlespacing*" (LaTeX-arg-titlesec-titlespec) (TeX-arg-length "Left margin") (TeX-arg-length "Before vertical space") (TeX-arg-length "Space between title and text") [TeX-arg-length "Right margin"]) ("filright" 0) ("filcenter" 0) ("filleft" 0) ("fillast" 0) ("filinner" 0) ("filouter" 0) ("wordsep" 0) ("nostruts" 0) ("titleline" [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Alignment") '("l" "r" "c")] t) ("titlerule" [TeX-arg-length "Rule height"]) ("titlerule*" [TeX-arg-length "Box width"] "Text") ("iftitlemeasuring" 2) ("assignpagestyle" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Sectioning command") (LaTeX-titlesec-section-command-list)) (TeX-arg-pagestyle)) ("titleclass" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Sectioning command") (LaTeX-titlesec-section-command-list)) (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Class") '("page" "top" "straight")) [TeX-arg-eval completing-read (TeX-argument-prompt t nil "Super level command") (LaTeX-titlesec-section-command-list)]) "calcwidth" ("titleline*" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Alignment") '("l" "r" "c")) t) LaTeX-add-lengths "titlewidth" "titlewidthlast" "titlewidthfirst" featurep font-latex font-latex-setup font-latex-add-keywords (("titlelabel" "{") ("titleformat" "*{[{") ("titlespacing" "*{{{{[") ("iftitlemeasuring" "{{") ("assignpagestyle" "{{") ("titleclass" "{[{[")) function] 21] TeX-dialect) #@43 Package options for the titlesec package. (defvar LaTeX-titlesec-package-options '("rm" "sf" "tt" "md" "bf" "up" "it" "sl" "sc" "big" "medium" "small" "tiny" "raggedleft" "center" "raggedright" "compact" "uppercase" "indentafter" "noindentafter" "rigidchapters" "rubberchapters" "bottomtitles" "nobottomtitles" "nobottomtitles*" "aftersep" "largestsep" "pageatnewline" "nostruts" "calcwidth" "explicit" "newparttoc" "oldparttoc" "clearempty" "toctitles" "newlinetospace" "loadonly" "pagestyles") (#$ . 4500))