;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@105 Information about changes-definechangesauthors in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-auto-changes-definechangesauthor nil (#$ . 151)) #@105 Information about changes-definechangesauthors in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-changes-definechangesauthor-list nil (#$ . 325)) (make-variable-buffer-local 'LaTeX-changes-definechangesauthor-list) #@105 Information about changes-definechangesauthors in the current buffer. Generated by `TeX-auto-add-type'. (defvar LaTeX-changes-definechangesauthor-changed nil (#$ . 568)) (make-variable-buffer-local 'LaTeX-changes-definechangesauthor-changed) #@150 Add information about CHANGES-DEFINECHANGESAUTHORS to the current buffer. Generated by `TeX-auto-add-type'. (fn &rest CHANGES-DEFINECHANGESAUTHORS) (defalias 'LaTeX-add-changes-definechangesauthors #[128 "\300\301\"\207" [TeX-auto-add-information "changes-definechangesauthor"] 4 (#$ . 817)]) #@102 List of changes-definechangesauthors active in the current buffer. Generated by `TeX-auto-add-type'. (defalias 'LaTeX-changes-definechangesauthor-list #[0 "\300\301!\207" [TeX-auto-list-information "changes-definechangesauthor"] 2 (#$ . 1119)]) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [add-to-list TeX-auto-parser ("changes-definechangesauthor" LaTeX-auto-changes-definechangesauthor LaTeX-add-changes-definechangesauthors LaTeX-changes-definechangesauthor-list LaTeX-changes-definechangesauthor-changed) t add-hook TeX-remove-style-hook #[0 "\301\211\207" [LaTeX-changes-definechangesauthor-list nil] 2]] 4) #@49 Matches the id defined by \definechangesauthor. (defvar LaTeX-changes-definechangesauthor-regexp (cons "\\\\definechangesauthor[ \n %]*\\(?:\\[[^]]*\\]\\)?[ \n %]*{\\([^}]+\\)}" '(1 LaTeX-auto-changes-definechangesauthor)) (#$ . 1748)) #@49 Reset `LaTeX-auto-changes-definechangesauthor'. (defalias 'LaTeX-changes-auto-prepare #[0 "\301\211\207" [LaTeX-auto-changes-definechangesauthor nil] 2 (#$ . 1992)]) (byte-code "\300\301\302\303#\210\300\304\305\303#\207" [add-hook TeX-auto-prepare-hook LaTeX-changes-auto-prepare t TeX-update-style-hook TeX-auto-parse] 4) #@255 Prompt for the arguments of \definechangesauthor macro. While reading the first optional argument, remove space from `crm-local-completion-map' and `minibuffer-local-completion-map'. Insert the argument in brackets if OPTIONAL is non-nil. (fn OPTIONAL) (defalias 'LaTeX-arg-changes-definechangesauthor #[257 "\306\307\236\"\306\307 \236 \"\310 \311=\203\f\312\232\2026 \313=\203(\f\314\232\2066 \315=\2035\f\316\232?\2066\n?\205l\317\320\321\322\323\324 \235\203S\325\326!\203S\327\330\326 \"\202i\322\324 \235\203h\325\331!\203h\327\330\331 \"\202i\310DD\"  !\211\203|\332\320\"\210-\210\333\334\310\335#!\336!\210\332\"\207" [crm-local-completion-map minibuffer-local-completion-map TeX-last-optional-rejected TeX-insert-macro-default-style current-prefix-arg LaTeX-optop remove 32 nil show-all-optional-args (4) show-optional-args (4) mandatory-args-only (4) TeX-read-key-val t ("name") "color" "xcolor" TeX-style-list fboundp LaTeX-xcolor-definecolor-list mapcar car LaTeX-color-definecolor-list TeX-argument-insert TeX-read-string TeX-argument-prompt "Author ID" LaTeX-add-changes-definechangesauthors TeX-arg-opening-brace LaTeX-optcl TeX-arg-closing-brace] 8 (#$ . 2324)]) #@233 Prompt for the argument of various markup commands. Remove space from `crm-local-completion-map' and `minibuffer-local-completion-map' while reading user input. Insert the argument in brackets if OPTIONAL is non-nil. (fn OPTIONAL) (defalias 'LaTeX-arg-changes-markup #[257 "\302\303\236\"\302\303 \236 \"\304\305\306\307\310 \"D\311B\"\312\"*\207" [crm-local-completion-map minibuffer-local-completion-map remove 32 TeX-read-key-val "id" mapcar car LaTeX-changes-definechangesauthor-list (("comment")) TeX-argument-insert] 7 (#$ . 3541)]) (TeX-add-style-hook "changes" #[0 "\303!\210\304\305 \"\2032\306\211\2031\211@\304\305 \"A\307\310\311Q\312\313\314#\"\203)\315!\210\210A\266\202\202\f\210\315\316!\210\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342&\210\343\344!\205g\n\345=\205g\346\347\350\"\210\346\351\352\"\210\346\353\354\"\207" [LaTeX-changes-definechangesauthor-regexp LaTeX-provided-package-options TeX-install-font-lock TeX-auto-add-regexp assoc "changes" ("ulem" "xcolor") string-match "\\<" "\\>" mapconcat identity "|" TeX-run-style-hooks "truncate" TeX-add-symbols ("added" [LaTeX-arg-changes-markup] 1) ("deleted" [LaTeX-arg-changes-markup] 1) ("replaced" [LaTeX-arg-changes-markup] 2) ("highlight" [LaTeX-arg-changes-markup] 1) ("comment" [TeX-arg-eval TeX-read-key-val t `(("id" ,(mapcar #'car (LaTeX-changes-definechangesauthor-list))))] 1) ("listofchanges" [TeX-arg-key-val (("style" ("list" "summary" "compactsummary")) ("title") ("show" ("all" "added" "deleted" "replaced" "highlight" "comment")))]) ("definechangesauthor" LaTeX-arg-changes-definechangesauthor) ("setaddedmarkup" "Definition") ("setdeletedmarkup" "Definition") ("sethighlightmarkup" "Definition") ("setcommentmarkup" "Definition") ("setauthormarkup" "Definition") ("setauthormarkupposition" (TeX-arg-eval completing-read (TeX-argument-prompt optional nil "Position") '("left" "right"))) ("setauthormarktext" (TeX-arg-eval completing-read (TeX-argument-prompt optional nil "Markup") '("id" "name"))) ("settruncatewidth" (TeX-arg-length "Width")) ("setsummarywidth" (TeX-arg-length "Width")) ("setsummarytowidth" "Text") ("setlocextension" "Extension") ("setsocextension" "Extension") featurep font-latex font-latex-setup font-latex-add-keywords (("definechangesauthor" "[{") ("setaddedmarkup" "{") ("setdeletedmarkup" "{") ("sethighlightmarkup" "{") ("setcommentmarkup" "{") ("setauthormarkup" "{") ("setauthormarkupposition" "{") ("setauthormarktext" "{") ("settruncatewidth" "{") ("setsummarywidth" "{") ("setsummarytowidth" "{") ("setlocextension" "{") ("setsocextension" "{")) function (("added" "[{") ("deleted" "[{") ("replaced" "[{{") ("highlight" "[{") ("comment" "[{")) textual (("listofchanges" "[")) reference] 20] TeX-dialect) #@53 Prompt for package options for the changes package. (defalias 'LaTeX-changes-package-options #[0 "\304\305!\210\304\306!\210\304\307!\210\310\311\312\313\314\315!\203#\315 \203#\316\317\315 \"\202$DC\320\321\322\323\324\325\326\327\330\331\332\333\306 D\307\nD\305 D\257\"\"\207" [LaTeX-xcolor-base-colors LaTeX-truncate-package-options LaTeX-ulem-package-options LaTeX-xcolor-package-options TeX-load-style "xcolor" "truncate" "ulem" TeX-read-key-val t append "defaultcolor" fboundp LaTeX-xcolor-definecolor-list mapcar car ("draft") ("final") ("commandnameprefix" ("none" "ifneeded" "always")) ("markup" ("default" "underlined" "bfit" "nocolor")) ("addedmarkup" ("colored" "uline" "uuline" "uwave" "dashuline" "dotuline" "bf" "it" "sl" "em")) ("deletedmarkup" ("sout" "xout" "colored" "uline" "uuline" "uwave" "dashuline" "dotuline" "bf" "it" "sl" "em")) ("highlightmarkup" ("background" "uuline" "uwave")) ("commentmarkup" ("todo" "margin" "footnote" "uwave")) ("authormarkup" ("superscript" "subscript" "brackets" "footnote" "none")) ("authormarkupposition" ("right" "left")) ("authormarkuptext" ("id" "name")) ("todonotes")] 20 (#$ . 6332)])