;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@138 Query and insert the column argument of \switchcolum macro. If OPTIONAL is non-nil, insert the result in square brackets. (fn OPTIONAL) (defalias 'TeX-arg-paracol-switchcolumn* #[257 "\300\301\302\303#!\211\205\211\304\230?\205\212\305u\210\306\")\207" [TeX-read-string TeX-argument-prompt nil "Column" "" -1 TeX-argument-insert] 6 (#$ . 151)]) (TeX-add-style-hook "paracol" #[0 "\301\302\303\304\305\306\307\310\311\312\313&\n\210\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354& \210\355\356!\210\357\360!\210\361\362!\205Y\363=\205Y\364\365\366\"\210\364\367\370\"\210\364\371\372\"\210\364\373\374\"\207" [TeX-install-font-lock LaTeX-add-environments ("paracol" ["Number left"] "Number of columns" ["Text across columns"]) ("paracol*" (lambda (_env) (let ((numleft (TeX-read-string (TeX-argument-prompt t nil "Number left"))) (numcol (TeX-read-string (TeX-argument-prompt nil nil "Number of columns"))) (txt (TeX-read-string (TeX-argument-prompt t nil "Text across columns")))) (LaTeX-insert-environment "paracol" (concat (when (and numleft (not (string= numleft #1=""))) (format "[%s]" numleft)) "*" (format "{%s}" numcol) (when (and txt (not (string= txt #1#))) (format "[%s]" txt))))))) ("column") ("column*" ["Text across columns"]) ("nthcolumn" "Column") ("nthcolumn*" "Column" ["Text across columns"]) ("leftcolumn") ("leftcolumn*" ["Text across columns"]) ("rightcolumn") ("rightcolumn*" ["Text across columns"]) TeX-add-symbols ("switchcolumn" ["Column"]) ("switchcolumn*" [TeX-arg-paracol-switchcolumn*]) ("thecolumn") ("definecolumnpreamble" "Column" t) ("ensurevspace" TeX-arg-length) ("columnratio" "Fraction(s)" ["Fraction(s)"]) ("setcolumnwidth" "Width/Gap" ["Width/Gap"]) ("twosided" ["Features (combination of p, c, m, b)"]) ("marginparthreshold" "Number of columns" ["Number of columns"]) ("globalcounter" TeX-arg-counter) ("globalcounter*") ("localcounter" TeX-arg-counter) ("definethecounter" TeX-arg-counter "Column" t) ("synccounter" TeX-arg-counter) ("syncallcounters") ("footnotelayout" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Layout") '("c" "m" "p"))) ("footnote*" (TeX-arg-conditional TeX-arg-footnote-number-p (["Number"]) nil) t) ("footnotetext*" (TeX-arg-conditional TeX-arg-footnote-number-p (["Number"]) nil) t) ("footnotemark*" (TeX-arg-conditional TeX-arg-footnote-number-p (["Number"]) nil)) ("fncounteradjustment" 0) ("nofncounteradjustment" 0) ("columncolor" (TeX-arg-conditional (member "xcolor" (TeX-style-list)) (TeX-arg-xcolor) (TeX-arg-color)) ["Column"]) ("normalcolumncolor" ["Column"]) ("coloredwordhyphenated" 0) ("nocoloredwordhyphenated" 0) ("colseprulecolor" (TeX-arg-conditional (member "xcolor" (TeX-style-list)) (TeX-arg-xcolor) (TeX-arg-color)) ["Column"]) ("normalcolseprulecolor" ["Column"]) ("backgroundcolor" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Region") '("c" "g" "s" "f" "n" "p" "t" "b" "l" "r" "C" "G" "S" "F" "N" "P" "T" "B" "L" "R")) (TeX-arg-conditional (member "xcolor" (TeX-style-list)) (TeX-arg-xcolor) (TeX-arg-color))) ("nobackgroundcolor" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Region") '("c" "g" "s" "f" "n" "p" "t" "b" "l" "r" "C" "G" "S" "F" "N" "P" "T" "B" "L" "R"))) ("resetbackgroundcolor" 0) ("addcontentsonly" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Content file") '("toc" "lof" "lot")) "Column") ("flushpage" 0) LaTeX-add-lengths "belowfootnoteskip" LaTeX-paragraph-commands-add-locally "switchcolumn" featurep font-latex font-latex-setup font-latex-add-keywords (("switchcolumn" "*[")) textual (("flushpage" "*[")) warning (("footnote" "*[{") ("footnotemark" "*[") ("footnotetext" "*[{")) reference (("definecolumnpreamble" "{{") ("ensurevspace" "{") ("columnratio" "{[") ("setcolumnwidth" "{[") ("twosided" "[") ("marginparthreshold" "{[") ("globalcounter" "*") ("definethecounter" "{{{") ("synccounter" "{") ("syncallcounters" #1#) ("footnotelayout" "{") ("fncounteradjustment" #1#) ("nofncounteradjustment" #1#) ("normalcolumncolor" "[") ("coloredwordhyphenated" #1#) ("nocoloredwordhyphenated" #1#) ("colseprulecolor" "[{[") ("normalcolseprulecolor" "[") ("backgroundcolor" "{[{") ("nobackgroundcolor" "{") ("resetbackgroundcolor" #1#) ("addcontentsonly" "{{")) function] 33] TeX-dialect) #@42 Package options for the paracol package. (defvar LaTeX-paracol-package-options nil (#$ . 4510))