;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@57 Key=value options for mdframed macros and environments. (defvar LaTeX-mdframed-key-val-options '(("style" ("defaultoptions")) ("default") ("defaultunit" ("pt" "pc" "in" "bp" "cm" "mm" "dd" "cc" "sp" "ex" "em")) ("skipabove") ("skipbelow") ("leftmargin") ("rightmargin") ("innerleftmargin") ("innerrightmargin") ("innertopmargin") ("innerbottommargin") ("linewidth") ("innerlinewidth") ("middlelinewidth") ("outerlinewidth") ("roundcorner") ("linecolor") ("innerlinecolor") ("middlelinecolor") ("outerlinecolor") ("backgroundcolor") ("fontcolor") ("font") ("shadowsize") ("shadowcolor") ("topline" ("true" "false")) ("rightline" ("true" "false")) ("leftline" ("true" "false")) ("bottomline" ("true" "false")) ("hidealllines" ("true" "false")) ("outermargin") ("innermargin") ("usetwoside" ("true" "false")) ("footnotedistance") ("footnoteinside" ("true" "false")) ("nobreak" ("true" "false")) ("everyline" ("true" "false")) ("splittopskip") ("splitbottomskip") ("frametitle") ("frametitlefont") ("frametitlealignment" ("\\raggedleft" "\\raggedright" "\\centering")) ("frametitlerule" ("true" "false")) ("frametitlerulewidth") ("frametitleaboveskip") ("frametitlebelowskip") ("frametitlebackgroundcolor") ("repeatframetitle" ("true" "false")) ("subtitleaboveline" ("true" "false")) ("subtitlebelowline" ("true" "false")) ("subtitlefont") ("subtitlebackgroundcolor") ("subtitleabovelinecolor") ("subtitlebelowlinecolor") ("subtitleabovelinewidth") ("subtitlebelowlinewidth") ("subtitleaboveskip") ("subtitlebelowskip") ("subtitleinneraboveskip") ("subtitleinnerbelowskip") ("ntheorem" ("true" "false")) ("needspace") ("ignorelastdescenders" ("true" "false")) ("userdefinedwidth" ("\\linewidth" "\\columnwidth")) ("align" ("left" "right" "center")) ("tikzsetting") ("apptotikzsetting") ("pstrickssetting") ("pstricksappsetting") ("settings") ("extra") ("singleextra") ("firstextra") ("middleextra") ("secondextra") ("mdfsingleframe" ("true" "false")) ("mdffirstframe" ("true" "false")) ("mdfmiddleframe" ("true" "false")) ("mdflastframe" ("true" "false")) ("beforesingleframe") ("aftersingleframe") ("beforebreak") ("afterbreak") ("beforelastframe") ("afterlastframe") ("startcode") ("startinnercode") ("endinnercode") ("endcode") ("theoremseparator") ("theoremtitlefont") ("theoremspace")) (#$ . 150)) #@70 Buffer-local key=value options for mdframed macros and environments. (defvar LaTeX-mdframed-key-val-options-local nil (#$ . 2455)) (make-variable-buffer-local 'LaTeX-mdframed-key-val-options-local) #@95 Information about mdframed-newmdenvs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-mdframed-newmdenv nil (#$ . 2659)) #@95 Information about mdframed-newmdenvs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-newmdenv-list nil (#$ . 2813)) (make-variable-buffer-local 'LaTeX-mdframed-newmdenv-list) #@95 Information about mdframed-newmdenvs in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-newmdenv-changed nil (#$ . 3026)) (make-variable-buffer-local 'LaTeX-mdframed-newmdenv-changed) #@130 Add information about MDFRAMED-NEWMDENVS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest MDFRAMED-NEWMDENVS) (defalias 'LaTeX-add-mdframed-newmdenvs #[128 "\300\301\"\207" [TeX-auto-add-information "mdframed-newmdenv"] 4 (#$ . 3246)]) #@92 List of mdframed-newmdenvs active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-mdframed-newmdenv-list #[0 "\300\301!\207" [TeX-auto-list-information "mdframed-newmdenv"] 2 (#$ . 3508)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("mdframed-newmdenv" LaTeX-auto-mdframed-newmdenv LaTeX-add-mdframed-newmdenvs LaTeX-mdframed-newmdenv-list LaTeX-mdframed-newmdenv-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-mdframed-newmdenv-list nil] 2]] 4) #@58 Matches the argument of \newmdenv from mdframed package. (defvar LaTeX-mdframed-newmdenv-regexp (cons "\\\\newmdenv[ \n %]*\\(?:\\[[^][]*\\(?:{[^}{]*\\(?:{[^}{]*\\(?:{[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^][]*\\)*\\]\\)?[ \n %]*{\\([^}]+\\)}" '(1 LaTeX-auto-mdframed-newmdenv)) (#$ . 4047)) #@101 Information about mdframed-mdfdefinestyles in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-mdframed-mdfdefinestyle nil (#$ . 4340)) #@101 Information about mdframed-mdfdefinestyles in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-mdfdefinestyle-list nil (#$ . 4507)) (make-variable-buffer-local 'LaTeX-mdframed-mdfdefinestyle-list) #@101 Information about mdframed-mdfdefinestyles in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-mdfdefinestyle-changed nil (#$ . 4739)) (make-variable-buffer-local 'LaTeX-mdframed-mdfdefinestyle-changed) #@142 Add information about MDFRAMED-MDFDEFINESTYLES to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest MDFRAMED-MDFDEFINESTYLES) (defalias 'LaTeX-add-mdframed-mdfdefinestyles #[128 "\300\301\"\207" [TeX-auto-add-information "mdframed-mdfdefinestyle"] 4 (#$ . 4977)]) #@98 List of mdframed-mdfdefinestyles active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-mdframed-mdfdefinestyle-list #[0 "\300\301!\207" [TeX-auto-list-information "mdframed-mdfdefinestyle"] 2 (#$ . 5263)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("mdframed-mdfdefinestyle" LaTeX-auto-mdframed-mdfdefinestyle LaTeX-add-mdframed-mdfdefinestyles LaTeX-mdframed-mdfdefinestyle-list LaTeX-mdframed-mdfdefinestyle-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-mdframed-mdfdefinestyle-list nil] 2]] 4) #@64 Matches the argument of \mdfdefinestyle from mdframed package. (defvar LaTeX-mdframed-mdfdefinestyle-regexp '("\\\\mdfdefinestyle[ \n %]*{\\([^}]+\\)}" 1 LaTeX-auto-mdframed-mdfdefinestyle) (#$ . 5856)) #@96 Information about mdframed-mdtheorems in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-mdframed-mdtheorem nil (#$ . 6066)) #@96 Information about mdframed-mdtheorems in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-mdtheorem-list nil (#$ . 6222)) (make-variable-buffer-local 'LaTeX-mdframed-mdtheorem-list) #@96 Information about mdframed-mdtheorems in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-mdframed-mdtheorem-changed nil (#$ . 6438)) (make-variable-buffer-local 'LaTeX-mdframed-mdtheorem-changed) #@132 Add information about MDFRAMED-MDTHEOREMS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest MDFRAMED-MDTHEOREMS) (defalias 'LaTeX-add-mdframed-mdtheorems #[128 "\300\301\"\207" [TeX-auto-add-information "mdframed-mdtheorem"] 4 (#$ . 6661)]) #@93 List of mdframed-mdtheorems active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-mdframed-mdtheorem-list #[0 "\300\301!\207" [TeX-auto-list-information "mdframed-mdtheorem"] 2 (#$ . 6927)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("mdframed-mdtheorem" LaTeX-auto-mdframed-mdtheorem LaTeX-add-mdframed-mdtheorems LaTeX-mdframed-mdtheorem-list LaTeX-mdframed-mdtheorem-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-mdframed-mdtheorem-list nil] 2]] 4) #@80 Matches the argument of \newmdtheoremenv and \mdtheorem from mdframed package. (defvar LaTeX-mdframed-mdtheorem-regexp (cons "\\\\\\(new\\)?mdtheorem\\(?:env\\)?[ \n %]*\\(?:\\[[^][]*\\(?:{[^}{]*\\(?:{[^}{]*\\(?:{[^}{]*}[^}{]*\\)*}[^}{]*\\)*}[^][]*\\)*\\]\\)?[ \n %]*{\\([^}]+\\)}" '((2 1) LaTeX-auto-mdframed-mdtheorem)) (#$ . 7475)) #@67 Update some key=values in `LaTeX-mdframed-key-val-options-local'. (defalias 'LaTeX-mdframed-update-style-key #[0 "\302 \203>\303\304\"@\303\304 \"A@\305!\306\303\"@\"\307\310\311\312\302 \"\"!D\211\235\2031\2024\211B\262\262\305!\266\313\314 \235\204L\315\314 \235\205\225\313\314 \235\203W\316\202X\317\320\305!\211\203\215\211@\306\303\"@\"\262\211\311\312 \"D\211\235\203\202\202\211B\262\262A\266\202\202]\210\305!\211\266\203\207" [LaTeX-mdframed-key-val-options-local LaTeX-mdframed-key-val-options LaTeX-mdframed-mdfdefinestyle-list assoc "style" copy-alist assq-delete-all TeX-delete-duplicate-strings append mapcar car "xcolor" TeX-style-list "color" LaTeX-xcolor-definecolor-list LaTeX-color-definecolor-list ("linecolor" "innerlinecolor" "middlelinecolor" "outerlinecolor" "backgroundcolor" "fontcolor" "shadowcolor" "frametitlebackgroundcolor" "subtitlebackgroundcolor" "subtitleabovelinecolor" "subtitlebelowlinecolor")] 11 (#$ . 7818)]) #@54 Clear variables before parsing for mdframed package. (defalias 'LaTeX-mdframed-auto-prepare #[0 "\303\211\303\211\207" [LaTeX-auto-mdframed-newmdenv LaTeX-auto-mdframed-mdfdefinestyle LaTeX-auto-mdframed-mdtheorem nil] 3 (#$ . 8818)]) #@47 Process parsed elements for mdframed package. (defalias 'LaTeX-mdframed-auto-cleanup #[0 "\300\301\302 \"\211\203\211@\303\304B!\210\305\306BC!\210A\266\202\202\210\307 \211\203R\211@\211@A@\303\310\311!D!\210\211\203?\211\312\230\203I\303\313P\310\311!D!\210\266A\266\202\202\"\210\314 \207" [mapcar car LaTeX-mdframed-newmdenv-list LaTeX-add-environments (LaTeX-env-args [TeX-arg-key-val LaTeX-mdframed-key-val-options-local]) TeX-ispell-skip-setcdr (ispell-tex-arg-end 0) LaTeX-mdframed-mdtheorem-list vector "Heading" "" "*" LaTeX-mdframed-update-style-key] 8 (#$ . 9062)]) (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-mdframed-auto-prepare t TeX-auto-cleanup-hook LaTeX-mdframed-auto-cleanup TeX-update-style-hook TeX-auto-parse TeX-add-style-hook "mdframed" #[0 "\306!\210\306 !\210\306\n!\210\307 !\310\311\312\313\314\315\316\317\320\321\322&\n\210\323\324!\210\325\326!\205< \327=\205<\330\331\332\"\210\330\333\334\"\210\330\335\336\"\207" [LaTeX-mdframed-newmdenv-regexp LaTeX-mdframed-mdfdefinestyle-regexp LaTeX-mdframed-mdtheorem-regexp LaTeX-mdframed-key-val-options LaTeX-mdframed-key-val-options-local TeX-install-font-lock TeX-auto-add-regexp copy-alist TeX-add-symbols ("mdfsetup" (TeX-arg-key-val LaTeX-mdframed-key-val-options-local)) ("newmdenv" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] (TeX-arg-eval (lambda nil (let ((env (TeX-read-string (TeX-argument-prompt nil nil "Environment")))) (LaTeX-add-environments `(,env LaTeX-env-args [TeX-arg-key-val LaTeX-mdframed-key-val-options-local])) (TeX-ispell-skip-setcdr `((,env ispell-tex-arg-end 0))) (format "%s" env))))) ("renewmdenv" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Environment") (LaTeX-mdframed-newmdenv-list))) ("surroundwithmdframed" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] TeX-arg-environment) ("mdflength" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Length") '(("skipabove") ("skipbelow") ("leftmargin") ("rightmargin") ("innerleftmargin") ("innerrightmargin") ("innertopmargin") ("innerbottommargin") ("linewidth") ("innerlinewidth") ("middlelinewidth") ("outerlinewidth")))) ("mdfdefinestyle" (TeX-arg-eval (lambda nil (let ((style (TeX-read-string (TeX-argument-prompt nil nil "Style name")))) (LaTeX-add-mdframed-mdfdefinestyles style) (LaTeX-mdframed-update-style-key) (format "%s" style)))) (TeX-arg-key-val LaTeX-mdframed-key-val-options-local)) ("mdfapptodefinestyle" (TeX-arg-eval completing-read (TeX-argument-prompt nil nil "Style name") (LaTeX-mdframed-mdfdefinestyle-list)) (TeX-arg-key-val LaTeX-mdframed-key-val-options-local)) ("mdfsubtitle" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] "Subtitle") ("newmdtheoremenv" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] (TeX-arg-eval (lambda nil (let ((nthm (TeX-read-string (TeX-argument-prompt nil nil "Environment")))) (LaTeX-add-environments (list nthm (vector "Heading"))) (format "%s" nthm)))) [TeX-arg-environment "Numbered like"] t [(TeX-arg-eval progn (if (eq (save-excursion (backward-char 2) (preceding-char)) 93) nil (TeX-arg-counter t "Within counter")) #1="")]) ("mdtheorem" [TeX-arg-key-val LaTeX-mdframed-key-val-options-local] (TeX-arg-eval (lambda nil (let ((nthm (TeX-read-string (TeX-argument-prompt nil nil "Environment")))) (LaTeX-add-environments (list nthm (vector "Heading")) (list (concat nthm "*") (vector "Heading"))) (format "%s" nthm)))) [TeX-arg-environment "Numbered like"] t [(TeX-arg-eval progn (if (eq (save-excursion (backward-char 2) (preceding-char)) 93) nil (TeX-arg-counter t "Within counter")) #1#)]) LaTeX-add-environments ("mdframed" LaTeX-env-args [TeX-arg-key-val LaTeX-mdframed-key-val-options-local]) featurep font-latex font-latex-setup font-latex-add-keywords (("newmdenv" "[{") ("renewmdenv" "[{") ("surroundwithmdframed" "[{") ("mdfsetup" "[{") ("mdfdefinestyle" "{{") ("mdfapptodefinestyle" "{{") ("newmdtheoremenv" "[{[{[") ("mdtheorem" "[{[{[")) function (("mdfsubtitle" "[{")) sectioning-5 (("mdflength" "{")) variable] 11]] 4) #@41 Package options for the framed package. (defvar LaTeX-mdframed-package-options-list '(("xcolor") ("framemethod" ("default" "tex" "latex" "none" "0" "tikz" "pgf" "1" "pstricks" "ps" "postscript" "2")) ("tikz") ("TikZ") ("ps") ("pstricks") ("PSTricks")) (#$ . 13254)) #@54 Prompt for package options for the mdframed package. (defalias 'LaTeX-mdframed-package-options #[0 "\301\302\"\207" [LaTeX-mdframed-package-options-list TeX-read-key-val t] 3 (#$ . 13526)])