;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require tex latex] 2) #@429 Read and return a language for csquotes macros. If OPTIONAL is non-nil, indicate it in minibuffer while reading user input. PROMPT replaces the standard one "Language". This function checks if the functions `LaTeX-babel-active-languages' or `LaTeX-polyglossia-active-languages' are bound and use them to retrieve the active languages. If none available, user is requested to enter a language. (fn OPTIONAL &optional PROMPT) (defalias 'LaTeX-csquotes-read-language #[513 "\300\301!\203\301 \203\302\303\304#\301 \"\207\300\305!\203*\305 \203*\302\303\304#\305 \"\207\306\303\304#!\207" [fboundp LaTeX-babel-active-languages completing-read TeX-argument-prompt "Language" LaTeX-polyglossia-active-languages TeX-read-string] 7 (#$ . 151)]) #@181 Insert a language for csquotes macros. If OPTIONAL is non-nil, insert the language in square brackets. PROMPT replaces the standard one "Language". (fn OPTIONAL &optional PROMPT) (defalias 'LaTeX-arg-csquotes-language #[513 "\300\301\"\"\207" [TeX-argument-insert LaTeX-csquotes-read-language] 6 (#$ . 911)]) (TeX-add-style-hook "csquotes" #[0 "\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335DF!\332\333\336\335DFE\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\377\331\332\333\334\3359DF!\332\333\201@\3358DF\201ABBB\201B\331\332\333\334\335:DF!\332\333\201@\3359DF\201CBBB\201D\201E\201F\201G\201H\201I\201J\201K\201L\201M\201N\201O\201P\201Q\201R\201S\201T\201U\201V\201W\201X\201Y&I\210\201Z\201[\201\\\201]\201^\201_\201`&\210G\201aV\203\366 G\201aV\203\366\201b \nF\201c\201d!\205(\f\201e=\205(\201f\201g\201h\"\210\201f\201i\201j\"\210\201f\201k\201l\"\207" [LaTeX-csquotes-open-quote LaTeX-csquotes-close-quote LaTeX-csquotes-quote-after-quote TeX-quote-language TeX-install-font-lock (("american") ("brazilian") ("british") ("german") ("guillemets") ("guillemets*") ("mexican") ("portuguese") ("quotes") ("quotes*") ("spanish") ("swiss")) (("austrian") ("croatian") ("czech") ("danish") ("dutch") ("english") ("finnish") ("french") ("german") ("greek") ("italian") ("norwegian") ("portuguese") ("russian") ("serbian") ("spanish") ("swedish")) TeX-add-symbols ("enquote" 1) ("enquote*" 1) ("foreignquote" LaTeX-arg-csquotes-language 1) ("foreignquote*" LaTeX-arg-csquotes-language 1) ("hyphenquote" LaTeX-arg-csquotes-language 1) ("hyphenquote*" LaTeX-arg-csquotes-language 1) ("textquote" ["Citation"] ["Punctuation"] t) ("textquote*" ["Citation"] ["Punctuation"] t) ("foreigntextquote" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("foreigntextquote*" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("hyphentextquote" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("hyphentextquote*" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("blockquote" ["Citation"] ["Punctuation"] t) ("foreignblockquote" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("hyphenblockquote" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) ("hybridblockquote" LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"] t) "setquotestyle" vector TeX-arg-eval completing-read "Quote style variant: " quote "Quote style name or alias: " "setquotestyle*" ("MakeInnerQuote" "Character") ("MakeOuterQuote" "Character") ("MakeAutoQuote" "Opening quotation mark" "Closing quotation mark") ("MakeAutoQuote*" "Opening quotation mark" "Closing quotation mark") ("MakeForeignQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Closing quotation mark") ("MakeForeignQuote*" LaTeX-arg-csquotes-language "Opening quotation mark" "Closing quotation mark") ("MakeHyphenQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Closing quotation mark") ("MakeHyphenQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Closing quotation mark") ("MakeBlockQuote" "Opening quotation mark" "Delimiter for citation" "Closing quotation mark") ("MakeForeignBlockQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Delimiter for citation" "Closing quotation mark") ("MakeHyphenBlockQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Delimiter for citation" "Closing quotation mark") ("MakeHybridBlockQuote" LaTeX-arg-csquotes-language "Opening quotation mark" "Delimiter for citation" "Closing quotation mark") "EnableQuotes" "DisableQuotes" "VerbatimQuotes" "DeleteQuotes" ("textcquote" ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("textcquote*" ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("foreigntextcquote" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("foreigntextcquote*" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("hyphentextcquote" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("hyphentextcquote*" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("blockcquote" ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("foreignblockcquote" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("hyphenblockcquote" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("hybridblockcquote" LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"] t) ("textelp" 1) ("textelp*" 1) ("textins" 1) ("textins*" 1) ("textdel" 1) "DeclareQuoteStyle" "Quote style name: " (["Outer quote initialization"] ["Inner quote initialization"] "Opening outer quotation mark" ["Middle outer quotation mark"] "Closing outer quotation mark" ["Kerning between adjoining marks"] "Opening inner quotation mark" ["Middle inner quotation mark"] "Closing inner quotation mark") "DeclareQuoteAlias" ("Alias name") ("DeclareQuoteOption" 1) ("ExecuteQuoteOptions" 1) ("DeclarePlainStyle" "Opening outer quotation mark" "Closing outer quotation mark" "Opening inner quotation mark" "Closing inner quotation mark") ("SetBlockThreshold" "Number of lines") ("SetBlockEnvironment" "Environment") ("SetCiteCommand" "Command") "mkcitation" "mkccitation" "mktextquote" "mkblockquote" "mkbegdispquote" "mkenddispquote" ("ifpunctmark" "Character" 2) ("ifpunct" 2) ("ifterm" 2) ("iftextpunctmark" 4) ("iftextpunct" 3) ("iftextterm" 3) ("ifblockquote" 2) ("ifblank" 3) "unspace" ("DeclareAutoPunct" "Characters") LaTeX-add-environments ("displayquote" LaTeX-env-args ["Citation"] ["Punctuation"]) ("foreigndisplayquote" LaTeX-env-args LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"]) ("hyphendisplayquote" LaTeX-env-args LaTeX-arg-csquotes-language ["Citation"] ["Punctuation"]) ("displaycquote" LaTeX-env-args ["Pre-note"] ["Post-note"] "Key" ["Punctuation"]) ("foreigndisplaycquote" LaTeX-env-args LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"]) ("hyphendisplaycquote" LaTeX-env-args LaTeX-arg-csquotes-language ["Pre-note"] ["Post-note"] "Key" ["Punctuation"]) 0 override featurep font-latex font-latex-setup font-latex-add-keywords (("EnableQuotes" #1="") ("DisableQuotes" #1#) ("VerbatimQuotes" #1#) ("DeleteQuotes" #1#)) function (("enquote" "*{") ("foreignquote" "*{{") ("hyphenquote" "*{{") ("textquote" "*[[{") ("foreigntextquote" "*{[[{") ("hyphentextquote" "*{[[{") ("blockquote" "[[{") ("foreignblockquote" "{[[{") ("hyphenblockquote" "{[[{") ("hybridblockquote" "{[[{") ("textcquote" "*[[{[{") ("foreigntextcquote" "*{[[{[{") ("hyphentextcquote" "*{[[{[{") ("blockcquote" "[[{[{") ("foreignblockcquote" "{[[{[{") ("hyphenblockcquote" "{[[{[{") ("hybridblockcquote" "{[[{[{")) textual (("setquotestyle" "[{") ("MakeOuterQuote" "{") ("MakeInnerQuote" "{") ("MakeAutoQuote" "*{{") ("MakeForeignQuote" "*{{{") ("MakeHyphenQuote" "*{{{") ("MakeBlockQuote" "{{{") ("MakeForeignBlockQuote" "{{{{") ("MakeHyphenBlockQuote" "{{{{") ("DeclareQuoteStyle" "[{[[{[{[{[{") ("DeclareQuoteAlias" "[{{") ("DeclareQuoteOption" "{") ("DeclarePlainStyle" "{{{{") ("SetBlockThreshold" "{") ("SetBlockEnvironment" "{") ("SetCiteCommand" "{")) variable] 76] TeX-dialect) #@54 Prompt for package options for the csquotes package. (defalias 'LaTeX-csquotes-package-options #[0 "\300\301\302\"\207" [TeX-read-key-val t (("strict" ("true" "false")) ("style" ("american" "australian" "austrian" "brazil" "brazilian" "british" "canadian" "croatian" "czech" "danish" "dutch" "english" "finnish" "french" "german" "greek" "italian" "mexican" "naustrian" "newzealand" "ngerman" "norsk" "norwegian" "nswissgerman" "nynorsk" "portuges" "portuguese" "russian" "serbian" "spanish" "swedish" "swiss" "swissgerman" "UKenglish" "USenglish")) ("autostyle" ("true" "false" "try" "once" "tryonce")) ("austrian" ("quotes" "guillemets")) ("croatian" ("quotes" "guillemets" "guillemets*")) ("czech" ("quotes" "guillemets")) ("danish" ("quotes" "guillemets" "topquotes")) ("english" ("american" "british")) ("estonian") ("french" ("quotes" "quotes*" "guillemets" "guillemets*")) ("galician" ("quotes" "guillemets")) ("german" ("quotes" "guillemets" "swiss")) ("hungarian") ("italian" ("guillemets" "quotes")) ("latvian") ("norwegian" ("guillemets" "quotes")) ("polish" ("guillemets" "guillemets*")) ("portuguese" ("portuguese" "brazilian")) ("serbian" ("quotes" "guillemets" "german")) ("spanish" ("spanish" "mexican")) ("swedish" ("quotes" "guillemets" "guillemets*")) ("maxlevel") ("autopunct" ("true" "false")) ("threshold") ("thresholdtype" ("lines" "words")) ("parthreshold" ("true" "false")) ("splitcomp" ("true" "false")) ("csdisplay" ("true" "false")) ("debug" ("true" "false")) ("version" ("4.4" "3.6" "3.0")))] 3 (#$ . 8284)])