;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@460 Prompt for fancyhdr places with completion. If OPTIONAL is non-nil, insert the resulting value as an optional argument, otherwise as a mandatory one. If non-nil, PROMPT is used as the prompt. If non-nil, COLLECTION is used as the completion list for the place. If FULL is non-nil, a full list of places is offered for completion, otherwise a reduced one omitting place combinations for H(eader) or F(ooter). (fn OPTIONAL &optional PROMPT COLLECTION FULL) (defalias 'TeX-arg-fancyhdr-place #[1025 "\206 \211\203\f\300\202 \301\302\303\304\305\306#\"\307#\310\"\207" [("L" "LO" "LE" "LOH" "LOF" "LEH" "LEF" "C" "CO" "CE" "COH" "COF" "CEH" "CEF" "R" "RO" "RE" "ROH" "ROF" "REH" "REF") ("L" "LO" "LE" "C" "CO" "CE" "R" "RE" "RO") mapconcat identity TeX-completing-read-multiple TeX-argument-prompt "Places" "," TeX-argument-insert] 12 (#$ . 151)]) #@62 Regexp matching the first argument of \fancypagestyle macro. (defvar LaTeX-fancyhdr-fancypagestyle-regexp '("\\\\fancypagestyle{\\([^}]+\\)}" 1 LaTeX-auto-pagestyle) (#$ . 1017)) (TeX-add-style-hook "fancyhdr" #[0 "\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331&\210\332\333\334\"\210\335!\210\336\337!\2054 \340=\2054\337\341\342\"\207" [LaTeX-fancyhdr-fancypagestyle-regexp TeX-install-font-lock TeX-add-symbols ("fancyhead" [TeX-arg-fancyhdr-place] t) ("fancyfoot" [TeX-arg-fancyhdr-place] t) ("fancyhf" [(TeX-arg-fancyhdr-place nil nil t)] t) ("fancyheadoffset" [(TeX-arg-fancyhdr-place nil ("L" "LO" "LE" "R" "RO" "RE"))] TeX-arg-length) ("fancyfootoffset" [(TeX-arg-fancyhdr-place nil ("LO" "LE" "L" "RO" "RE" "R"))] TeX-arg-length) ("fancyhfoffset" [(TeX-arg-fancyhdr-place nil ("L" "LO" "LE" "LOH" "LOF" "LEH" "LEF" "R" "RO" "RE" "ROH" "ROF" "REH" "REF"))] TeX-arg-length) "headrulewidth" "footrulewidth" "headruleskip" "footruleskip" "headrule" "footrule" "headwidth" ("fancyheadinit" t) ("fancyfootinit" t) ("fancyhfinit" t) ("fancycenter" [TeX-arg-length "Distance"] ["Stretch"] 3) ("iftopfloat" 2) ("ifbotfloat" 2) ("iffloatpage" 2) ("iffootnote" 2) ("fancypagestyle" (TeX-arg-pagestyle nil t) [TeX-arg-pagestyle "Base pagestyle"] t) ("nouppercase" t) LaTeX-add-pagestyles "fancy" "fancydefault" TeX-auto-add-regexp fboundp font-latex-add-keywords font-latex-setup (("fancyhead" "[{") ("fancyfoot" "[{") ("fancyhf" "[{") ("fancyheadoffset" "[{") ("fancyfootoffset" "[{") ("fancyhfoffset" "[{") ("fancyheadinit" "{") ("fancyfootinit" "{") ("fancyhfinit" "{") ("lhead" "[{") ("lfoot" "[{") ("chead" "[{") ("cfoot" "[{") ("rhead" "[{") ("rfoot" "[{") ("fancypagestyle" "{[")) function] 24] TeX-dialect) #@39 Package options for fancyhdr package. (defvar LaTeX-fancyhdr-package-options '("nocheck" "compatV3" "headings" "myheadings") (#$ . 2789))