;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\301\302!\210\301\303!\210\304\305\"\204\306\300\307\"\210\310\311\312\313\314\315\316\317&\210\320\321\322\323\324DD\325\326\327%\210\320\330\322\323\331DD\332\326\333%\210\320\334\322\323\335DD\336\326\337%\210\320\340\322\323\341DD\342\326\327%\210\320\343\322\323\344DD\345\326\327%\210\320\346\322\323\347DD\350\326\327\351\352&\210\320\353\322\323\354DD\355\326\327\351\352&\210\320\356\322\323\357DD\360\326\327%\210\320\361\322\323\362DD\363\326\327%\210\320\364\322\323\365DD\366\326\327%\210\320\367\322\323\370DD\371\326\327%\210\320\372\322\323\373DD\374\326\327%\210\320\375\322\323\376DD\377\326\201@%\210\320\201A\322\323\201BDD\201C\326\201D%\210\320\201E\322\323\201FDD\201G\326\201@%\210\320\201H\322\323\201IDD\201J\326\201K%\210\320\201L\322\323\201MDD\201N\326\201@%\210\320\201O\322\323\201PDD\201Q\326\201@\351\201R&\210\320\201S\322\323\201TDD\201U\326\201@\351\201R&\210\320\201V\322\323\201WDD\201X\326\201@%\210\320\201Y\322\323\201ZDD\201[\326\201@%\210\320\201\\\322\323\201]DD\201^\326\327%\210\320\201_\322\323\201`DD\201a\326\201@%\210\320\201b\322\323\201cDD\201d\326\201@%\207" [org-latex-classes require cl-lib ox-latex assoc "default-koma-letter" add-to-list ("default-koma-letter" "\\documentclass[11pt]{scrlttr2}") custom-declare-group org-export-koma-letter nil "Options for exporting to KOMA scrlttr2 class in LaTeX export." :tag "Org Koma-Letter" :group org-export custom-declare-variable org-koma-letter-class-option-file funcall function #[0 "\300\207" ["NF"] 1 #1=""] "Letter Class Option File.\nThis option can also be set with the LCO keyword." :type string org-koma-letter-author #[0 "\300\207" [user-full-name] 1 #1#] "Sender's name.\n\nThis variable defaults to calling the function `user-full-name'\nwhich just returns the current function `user-full-name'.\nAlternatively a string, nil or a function may be given.\nFunctions must return a string.\n\nThis option can also be set with the AUTHOR keyword." (radio (function-item user-full-name) (string) (function) (const :tag "Do not export author" nil)) org-koma-letter-email #[0 "\300\207" [org-koma-letter-email] 1 #1#] "Sender's email address.\n\nThis variable defaults to the value `org-koma-letter-email' which\nreturns `user-mail-address'.  Alternatively a string, nil or\na function may be given.  Functions must return a string.\n\nThis option can also be set with the EMAIL keyword." (radio (function-item org-koma-letter-email) (string) (function) (const :tag "Do not export email" nil)) org-koma-letter-from-address #[0 "\300\207" [#1#] 1 #1#] "Sender's address, as a string.\nThis option can also be set with one or more FROM_ADDRESS\nkeywords." org-koma-letter-phone-number #[0 "\300\207" [#1#] 1 #1#] "Sender's phone number, as a string.\nThis option can also be set with the PHONE_NUMBER keyword." org-koma-letter-url #[0 "\300\207" [#1#] 1 #1#] "Sender's URL, e. g., the URL of her homepage.\nThis option can also be set with the URL keyword." :safe stringp org-koma-letter-from-logo #[0 "\300\207" [#1#] 1 #1#] "Commands for inserting the sender's logo, e. g., \\includegraphics{logo}.\nThis option can also be set with the FROM_LOGO keyword." org-koma-letter-place #[0 "\300\207" [#1#] 1 #1#] "Place from which the letter is sent, as a string.\nThis option can also be set with the PLACE keyword." org-koma-letter-location #[0 "\300\207" [#1#] 1 #1#] "Sender's extension field, as a string.\n\nThis option can also be set with the LOCATION keyword.\nMoreover, when:\n  (1) Either `org-koma-letter-prefer-special-headings' is non-nil\n      or there is no LOCATION keyword or the LOCATION keyword is\n      empty;\n  (2) the letter contains a headline with the special\n      tag \"location\";\nthen the location will be set as the content of the location\nspecial heading.\n\nThe location field is typically printed right of the address\nfield (See Figure 4.9. in the English manual of 2015-10-03)." org-koma-letter-opening #[0 "\300\207" [#1#] 1 #1#] "Letter's opening, as a string.\n\nThis option can also be set with the OPENING keyword.  Moreover,\nwhen:\n  (1) Either `org-koma-letter-prefer-special-headings' is non-nil\n      or the CLOSING keyword is empty\n  (2) `org-koma-letter-headline-is-opening-maybe' is non-nil;\n  (3) the letter contains a headline without a special\n      tag (e.g. \"to\" or \"ps\");\nthen the opening will be implicitly set as the untagged headline title." org-koma-letter-closing #[0 "\300\207" [#1#] 1 #1#] "Letter's closing, as a string.\nThis option can also be set with the CLOSING keyword.  Moreover,\nwhen:\n  (1) Either `org-koma-letter-prefer-special-headings' is non-nil\n      or the CLOSING keyword is empty;\n  (2) `org-koma-letter-headline-is-opening-maybe' is non-nil;\n  (3) the letter contains a headline with the special\n      tag \"closing\";\nthen the opening will be set as the title of the closing special\nheading title." org-koma-letter-signature #[0 "\300\207" [#1#] 1 #1#] "Signature, as a string.\nThis option can also be set with the SIGNATURE keyword.\nMoreover, when:\n  (1) Either `org-koma-letter-prefer-special-headings' is non-nil\n      or there is no CLOSING keyword or the CLOSING keyword is empty;\n  (2) `org-koma-letter-headline-is-opening-maybe' is non-nil;\n  (3) the letter contains a headline with the special\n      tag \"closing\";\nthen the signature will be  set as the content of the\nclosing special heading.\n\nNote if the content is empty the signature will not be set." org-koma-letter-prefer-special-headings #[0 "\300\207" [nil] 1 #1#] "Non-nil means prefer headlines over keywords for TO and FROM.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"special-headings:t\"." boolean org-koma-letter-subject-format #[0 "\300\207" [t] 1 #1#] "Non-nil means include the subject.\n\nSupport formatting options.\n\nWhen t, insert a subject using default options.  When nil, do not\ninsert a subject at all.  It can also be a list of symbols among\nthe following ones:\n\n `afteropening'  Subject after opening\n `beforeopening' Subject before opening\n `centered'      Subject centered\n `left'          Subject left-justified\n `right'         Subject right-justified\n `titled'        Add title/description to subject\n `underlined'    Set subject underlined\n `untitled'      Do not add title/description to subject\n\nPlease refer to the KOMA-script manual (Table 4.16. in the\nEnglish manual of 2012-07-22).\n\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"subject:(underlined centered)\"." (choice (const :tag "No export" nil) (const :tag "Default options" t) (set :tag "Configure options" (const :tag "Subject after opening" afteropening) (const :tag "Subject before opening" beforeopening) (const :tag "Subject centered" centered) (const :tag "Subject left-justified" left) (const :tag "Subject right-justified" right) (const :tag "Add title or description to subject" underlined) (const :tag "Set subject underlined" titled) (const :tag "Do not add title or description to subject" untitled))) org-koma-letter-use-backaddress #[0 "\300\207" [nil] 1 #1#] "Non-nil prints return address in line above to address.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"backaddress:t\"." org-koma-letter-use-foldmarks #[0 "\300\207" [t] 1 #1#] "Configure appearance of folding marks.\n\nWhen t, activate default folding marks.  When nil, do not insert\nfolding marks at all.  It can also be a list of symbols among the\nfollowing ones:\n\n  `B'  Activate upper horizontal mark on left paper edge\n  `b'  Deactivate upper horizontal mark on left paper edge\n\n  `H'  Activate all horizontal marks on left paper edge\n  `h'  Deactivate all horizontal marks on left paper edge\n\n  `L'  Activate left vertical mark on upper paper edge\n  `l'  Deactivate left vertical mark on upper paper edge\n\n  `M'  Activate middle horizontal mark on left paper edge\n  `m'  Deactivate middle horizontal mark on left paper edge\n\n  `P'  Activate punch or center mark on left paper edge\n  `p'  Deactivate punch or center mark on left paper edge\n\n  `T'  Activate lower horizontal mark on left paper edge\n  `t'  Deactivate lower horizontal mark on left paper edge\n\n  `V'  Activate all vertical marks on upper paper edge\n  `v'  Deactivate all vertical marks on upper paper edge\n\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"foldmarks:(b l m t)\"." (choice (const :tag "Activate default folding marks" t) (const :tag "Deactivate folding marks" nil) (set :tag "Configure folding marks" (const :tag "Activate upper horizontal mark on left paper edge" B) (const :tag "Deactivate upper horizontal mark on left paper edge" b) (const :tag "Activate all horizontal marks on left paper edge" H) (const :tag "Deactivate all horizontal marks on left paper edge" h) (const :tag "Activate left vertical mark on upper paper edge" L) (const :tag "Deactivate left vertical mark on upper paper edge" l) (const :tag "Activate middle horizontal mark on left paper edge" M) (const :tag "Deactivate middle horizontal mark on left paper edge" m) (const :tag "Activate punch or center mark on left paper edge" P) (const :tag "Deactivate punch or center mark on left paper edge" p) (const :tag "Activate lower horizontal mark on left paper edge" T) (const :tag "Deactivate lower horizontal mark on left paper edge" t) (const :tag "Activate all vertical marks on upper paper edge" V) (const :tag "Deactivate all vertical marks on upper paper edge" v))) org-koma-letter-use-phone #[0 "\300\207" [nil] 1 #1#] "Non-nil prints sender's phone number.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"phone:t\"." org-koma-letter-use-url #[0 "\300\207" [nil] 1 #1#] "Non-nil prints sender's URL.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"url:t\"." booleanp org-koma-letter-use-from-logo #[0 "\300\207" [nil] 1 #1#] "Non-nil prints sender's FROM_LOGO.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"from-logo:t\"." org-koma-letter-use-email #[0 "\300\207" [nil] 1 #1#] "Non-nil prints sender's email address.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"email:t\"." org-koma-letter-use-place #[0 "\300\207" [t] 1 #1#] "Non-nil prints the letter's place next to the date.\nThis option can also be set with the OPTIONS keyword, e.g.:\n\"place:nil\"." org-koma-letter-default-class #[0 "\300\207" ["default-koma-letter"] 1 #1#] "Default class for `org-koma-letter'.\nThe value must be a member of `org-latex-classes'." org-koma-letter-headline-is-opening-maybe #[0 "\300\207" [t] 1 #1#] "Non-nil means a headline may be used as an opening and closing.\nSee also `org-koma-letter-opening' and\n`org-koma-letter-closing'." org-koma-letter-prefer-subject #[0 "\300\207" [nil] 1 #1#] "Non-nil means title should be interpreted as subject if subject is missing.\nThis option can also be set with the OPTIONS keyword,\ne.g. \"title-subject:t\"."] 8)
#@43 Header tags related to the letter itself.
(defconst org-koma-letter-special-tags-in-letter '(to from closing location) (#$ . 11087))
#@57 Header tags to be inserted in the letter after closing.
(defconst org-koma-letter-special-tags-after-closing '(after_closing ps encl cc) (#$ . 11226))
#@39 Header tags to be inserted as macros.
(defconst org-koma-letter-special-tags-as-macro '(ps encl cc) (#$ . 11383))
#@46 Header tags to be inserted after the letter.
(defconst org-koma-letter-special-tags-after-letter '(after_letter) (#$ . 11503))
#@36 Holds special content temporarily.
(defvar org-koma-letter-special-contents nil (#$ . 11636))
(org-export-define-derived-backend 'koma-letter 'latex :options-alist '((:latex-class "LATEX_CLASS" nil org-koma-letter-default-class t) (:lco "LCO" nil org-koma-letter-class-option-file) (:author "AUTHOR" nil (org-koma-letter--get-value org-koma-letter-author) parse) (:author-changed-in-buffer-p "AUTHOR" nil nil t) (:from-address "FROM_ADDRESS" nil org-koma-letter-from-address newline) (:phone-number "PHONE_NUMBER" nil org-koma-letter-phone-number) (:url "URL" nil org-koma-letter-url) (:from-logo "FROM_LOGO" nil org-koma-letter-from-logo) (:email "EMAIL" nil (org-koma-letter--get-value org-koma-letter-email) t) (:to-address "TO_ADDRESS" nil nil newline) (:place "PLACE" nil org-koma-letter-place) (:location "LOCATION" nil org-koma-letter-location) (:subject "SUBJECT" nil nil parse) (:opening "OPENING" nil org-koma-letter-opening parse) (:closing "CLOSING" nil org-koma-letter-closing parse) (:signature "SIGNATURE" nil org-koma-letter-signature newline) (:special-headings nil "special-headings" org-koma-letter-prefer-special-headings) (:special-tags-as-macro nil nil org-koma-letter-special-tags-as-macro) (:special-tags-in-letter nil nil org-koma-letter-special-tags-in-letter) (:special-tags-after-closing nil "after-closing-order" org-koma-letter-special-tags-after-closing) (:special-tags-after-letter nil "after-letter-order" org-koma-letter-special-tags-after-letter) (:with-backaddress nil "backaddress" org-koma-letter-use-backaddress) (:with-email nil "email" org-koma-letter-use-email) (:with-foldmarks nil "foldmarks" org-koma-letter-use-foldmarks) (:with-phone nil "phone" org-koma-letter-use-phone) (:with-url nil "url" org-koma-letter-use-url) (:with-from-logo nil "from-logo" org-koma-letter-use-from-logo) (:with-place nil "place" org-koma-letter-use-place) (:with-subject nil "subject" org-koma-letter-subject-format) (:with-title-as-subject nil "title-subject" org-koma-letter-prefer-subject) (:with-headline-opening nil nil org-koma-letter-headline-is-opening-maybe) (:inbuffer-author "AUTHOR" nil 'koma-letter:empty) (:inbuffer-from "FROM" nil 'koma-letter:empty) (:inbuffer-email "EMAIL" nil 'koma-letter:empty) (:inbuffer-phone-number "PHONE_NUMBER" nil 'koma-letter:empty) (:inbuffer-url "URL" nil 'koma-letter:empty) (:inbuffer-from-logo "FROM_LOGO" nil 'koma-letter:empty) (:inbuffer-place "PLACE" nil 'koma-letter:empty) (:inbuffer-location "LOCATION" nil 'koma-letter:empty) (:inbuffer-signature "SIGNATURE" nil 'koma-letter:empty) (:inbuffer-with-backaddress nil "backaddress" 'koma-letter:empty) (:inbuffer-with-email nil "email" 'koma-letter:empty) (:inbuffer-with-foldmarks nil "foldmarks" 'koma-letter:empty) (:inbuffer-with-phone nil "phone" 'koma-letter:empty) (:inbuffer-with-url nil "url" 'koma-letter:empty) (:inbuffer-with-from-logo nil "from-logo" 'koma-letter:empty) (:inbuffer-with-place nil "place" 'koma-letter:empty)) :translate-alist '((export-block . org-koma-letter-export-block) (export-snippet . org-koma-letter-export-snippet) (headline . org-koma-letter-headline) (keyword . org-koma-letter-keyword) (template . org-koma-letter-template)) :menu-entry '(107 "Export with KOMA Scrlttr2" ((76 "As LaTeX buffer" org-koma-letter-export-as-latex) (108 "As LaTeX file" org-koma-letter-export-to-latex) (112 "As PDF file" org-koma-letter-export-to-pdf) (111 "As PDF file and open" (lambda (a s v b) (if a (org-koma-letter-export-to-pdf t s v b) (org-open-file (org-koma-letter-export-to-pdf nil s v b))))))))
#@41 Return the current `user-mail-address'.
(defalias 'org-koma-letter-email #[0 "\207" [user-mail-address] 1 (#$ . 15202)])
#@119 Get contents from a headline tagged with KEY.
The contents is stored in `org-koma-letter-special-contents'.

(fn KEY)
(defalias 'org-koma-letter--get-tagged-contents #[257 "\301\302!\"A\211\205#\303
\304\305
\203\306\202\307\310\305\311\310##\266\202!\207" [org-koma-letter-special-contents assoc-string org-koma-letter--get-value org-string-nw-p nil replace-regexp-in-string "\\`\\([ 	]*\n\\)+" "\\`[ 	\n
]+" "" "[ 	\n
]+\\'"] 12 (#$ . 15331)])
#@146 Turn value into a string whenever possible.
Determines if VALUE is nil, a string, a function or a symbol and
return a string or nil.

(fn VALUE)
(defalias 'org-koma-letter--get-value #[257 "\211\205\211;\203\n\207\300
!\203\211 \207\2119\203\301
!\207\211\207" [functionp symbol-name] 3 (#$ . 15793)])
#@255 Process KEYWORDS members of `org-koma-letter-special-contents'.

KEYWORDS is a list of symbols.  Return them as a string to be
formatted.

The function is used for inserting content of special headings
such as the one tagged with PS.

(fn KEYWORDS INFO)
(defalias 'org-koma-letter--special-contents-inline #[514 "\300\301\302\"\303#\207" [mapconcat make-closure #[257 "\301
!\302
!\303\300\304\">
\204\305\207\211\203\306\307#\207
\207" [V0 org-koma-letter--get-value org-koma-letter--get-tagged-contents plist-get :special-tags-as-macro nil format "\\%s{%s}\n"] 8 "\n\n(fn KEYWORD)"] "\n"] 6 (#$ . 16109)])
#@72 Replace regular newlines with LaTeX newlines (i.e. `\\').

(fn STRING)
(defalias 'org-koma-letter--add-latex-newlines #[257 "\211\300\301
\203\302\202\f\303\304\301\305\304##\266\202\306
!\205!\301\307\310#\207" [nil replace-regexp-in-string "\\`\\([ 	]*\n\\)+" "\\`[ 	\n
]+" "" "[ 	\n
]+\\'" org-string-nw-p "\n" "\\\\\\\\\n"] 10 (#$ . 16732)])
#@160 Transcode an EXPORT-BLOCK element into KOMA Scrlttr2 code.
CONTENTS is nil.  INFO is a plist used as a communication
channel.

(fn EXPORT-BLOCK CONTENTS INFO)
(defalias 'org-koma-letter-export-block #[771 "\300\211;\203\301\302#\266\202\202\303
A@\"\266\202\304\235\2059\305\306\211;\2030\301\302#\266\202\2028\303
A@\"\266\202!\207" [:type get-text-property 0 plist-get ("KOMA-LETTER" "LATEX") org-remove-indentation :value] 10 (#$ . 17092)])
#@163 Transcode an EXPORT-SNIPPET object into KOMA Scrlttr2 code.
CONTENTS is nil.  INFO is a plist used as a communication
channel.

(fn EXPORT-SNIPPET CONTENTS INFO)
(defalias 'org-koma-letter-export-snippet #[771 "\300!\301>\205\302\211;\203\303\304#\207\305
A@\"\266\202\207" [org-export-snippet-backend (latex koma-letter) :value get-text-property 0 plist-get] 9 (#$ . 17558)])
#@149 Transcode a KEYWORD element into KOMA Scrlttr2 code.
CONTENTS is nil.  INFO is a plist used as a communication
channel.

(fn KEYWORD CONTENTS INFO)
(defalias 'org-koma-letter-keyword #[771 "\300\211;\203\301\302#\266\202\202\303
A@\"\266\202\304\211;\203*\301\302#\266\202\2022\303
A@\"\266\202
\305\232\2039\207\306\307$\207" [:key get-text-property 0 plist-get :value "KOMA-LETTER" org-export-with-backend latex] 10 (#$ . 17951)])
#@367 Transcode a HEADLINE element from Org to LaTeX.
CONTENTS holds the contents of the headline.  INFO is a plist
holding contextual information.

Note that if a headline is tagged with a tag from
`org-koma-letter-special-tags' it will not be exported, but
stored in `org-koma-letter-special-contents' and included at the
appropriate place.

(fn HEADLINE CONTENTS INFO)
(defalias 'org-koma-letter-headline #[771 "\301\"\211\204\n\207\211BB\302\207" [org-koma-letter-special-contents org-koma-letter--special-tag ""] 6 (#$ . 18412)])
#@148 Non-nil if HEADLINE is a special headline.
INFO is a plist holding contextual information.  Return first
special tag headline.

(fn HEADLINE INFO)
(defalias 'org-koma-letter--special-tag #[514 "\300\301\302\"\301\303\"\301\304\"#\305\306\307\"\310\"\"\207" [append plist-get :special-tags-in-letter :special-tags-after-closing :special-tags-after-letter cl-some make-closure #[257 "\301
\300\"\205\211\207" [V0 assoc-string] 4 "\n\n(fn TAG)"] org-export-get-tags] 8 (#$ . 18955)])
#@390 Return the correct version of opening or closing.
PLIST-KEY should be a key in info, typically :opening
or :closing.  PRED is a predicate run on headline to determine
which title to use which takes two arguments, a headline element
and an info plist.  INFO is a plist holding contextual
information.  Return the preferred candidate for the exported of
PLIST-KEY.

(fn PLIST-KEY PRED INFO)
(defalias 'org-koma-letter--keyword-or-headline #[771 "\300
\"\300\301\"\205'\300\302\"\204\211?\205'\303\300\304\"\305\306\307#\310%\311
\2061\2061\312\"\207" [plist-get :with-headline-opening :special-headings org-element-map :parse-tree headline make-closure #[257 "\300
\301\"\205\302
\211;\203\303\304#\207\305
A@\"\266\202\207" [V0 V1 :title get-text-property 0 plist-get] 7 "\n\n(fn H)"] t org-export-data ""] 11 (#$ . 19451)])
#@170 Return complete document string after KOMA Scrlttr2 conversion.
CONTENTS is the transcoded contents string.  INFO is a plist
holding export options.

(fn CONTENTS INFO)
(defalias 'org-koma-letter-template #[514 "\300
\301\"\205\n\302\303!\304!\305!\306\307\"\310\311\312\300\313\"\206 \314!\314#\306\315\"\316\317\320\321\n!\n\"\"\300\322\"\300	\323\"
\205F\300\n\324\"\325\320\300
\326\"
\"!\205`\325\320\300\327\"\"!\204h\330\202u\203t
\206u\211\202u
\204}\330\202\212\203\211\205\212
\202\212
\300\331\"\332\333\206\232\206\232\314BC\334!\"\205\302\335=?\205\302\316\336\n9\203\273\n\202\301\310\337\f\340#\";\205\313\341\"\342\205\326\316\343\"\205\340\316\344\"\325!\204\356\325	!\205\357\345\260\266\211\300	\346\"\347\350!\316\351\352\300\353\"\203
\206
\202
\206
\206
\354!\"\266\202\316\355\356\357\360#\"\316\361\356\362\363#\"\364\300\365\"\"\366\364\300\367\"\"\370\260\207" [plist-get :time-stamp-file format-time-string "%% Created %Y-%m-%d %a %H:%M\n" org-latex--insert-compiler org-latex-make-preamble org-koma-letter--build-settings global mapconcat #[257 "\300\301\"\207" [format "\\LoadLetterOption{%s}\n"] 4 "\n\n(fn FILE)"] split-string :lco "" buffer format "\\date{%s}\n" org-export-data org-export-get-date :with-subject :with-title :with-title-as-subject org-string-nw-p :subject :title nil :latex-hyperref-template append 116 org-latex--format-spec t "\\KOMAoption{subject}{%s}\n" symbol-name "," format-spec "\\begin{document}\n\n" "\\setkomavar{subject}{%s}\n" "\\setkomavar{title}{%s}\n" "\n" :to-address org-koma-letter--get-tagged-contents to "\\begin{letter}{%%\n%s}\n\n" org-koma-letter--add-latex-newlines :special-headings "\\mbox{}" "\\opening{%s}\n\n" org-koma-letter--keyword-or-headline :opening #[514 "\300\"?\207" [org-koma-letter--special-tag] 5 "\n\n(fn H I)"] "\\closing{%s}\n" :closing #[514 "\300\"\211\205\211\301\230\207" [org-koma-letter--special-tag "closing"] 5 "\n\n(fn H I)"] org-koma-letter--special-contents-inline :special-tags-after-closing "\n\\end{letter}\n" :special-tags-after-letter "\n\\end{document}"] 25 (#$ . 20306)])
#@147 Build settings string according to type.
SCOPE is either `global' or `buffer'.  INFO is a plist used as
a communication channel.

(fn SCOPE INFO)
(defalias 'org-koma-letter--build-settings #[514 "\300\301#\300\302$\303\304\"\211\205!\305!\205!\306\307\310\"\"\262

\311\312\"\211\2051\306\313\314!\"\262
\303\315\"\211\205E\316!\205E\306\317\"\262
\320!\205]\306\321\303\322\"\203[\323\202\\\324\"\303\325\"\326
!\205s\327!\205s\306\330\"\262
\331!\205\214\306\332\303\n\333\"\203\212\323\202\213\324\"\303	\334\"\326
!\205\242\335!\205\242\306\336\"\262
\337!\205\273\306\340\303\f\341\"\203\271\323\202\272\324\"\303\342\"\326
!\205\321\n\343!\205\321\306\344\"\262
\n\345!\205\352\306\346\303\347\"\203\350\323\202\351\324\"\303
\350\"\205
\351\352!\326
!\205
\211\353\354
\203
\355\202
\356\357\354\360\357##\266\202\262
\326\303\361\"!
\362!
\203&
\211\204*
\205B
\363=\2052
?\205B
\306\364\203@
\202A
\"\266\203\f\365!\205[
\306\366\303\367\"\203Y
\323\202Z
\324\"
\370!\371!
\203k
\211\204z
\372=\205\216

\204z
\211\205\216
\306\373\303\374\"\203\214
\303\375\"\202\215
\357\"\266\202
\376\377\"\211\205\237
\306\201@\"\262
\201A!\205\326
\303\201B\"\211:\203\307
\306\201C\201D\201E\357#\"\202\324
\211\203\321
\201F\202\324
\201G\262
\260\207" [make-closure #[257 "\302\303\304\"!\300\305=\203\306\301\"\307=\207\306\301\"\307=?\207" [V0 V1 intern format ":inbuffer-%s" global plist-get koma-letter:empty] 5 "\n\n(fn SETTING)"] #[770 "\303!\304\305\301\"!\302\206!
\203\211\204\205.\300\306=\205#?\205.\211\203-
\207\207" [V0 V1 V2 org-koma-letter--get-tagged-contents org-string-nw-p plist-get global] 8 "\n\n(fn HEADING KEY &optional SCOPED)"] plist-get :author author format "\\setkomavar{fromname}{%s}\n" org-export-data from :from-address "\\setkomavar{fromaddress}{%s}\n" org-koma-letter--add-latex-newlines :email email "\\setkomavar{fromemail}{%s}\n" with-email "\\KOMAoption{fromemail}{%s}\n" :with-email "true" "false" :phone-number org-string-nw-p phone-number "\\setkomavar{fromphone}{%s}\n" with-phone "\\KOMAoption{fromphone}{%s}\n" :with-phone :url url "\\setkomavar{fromurl}{%s}\n" with-url "\\KOMAoption{fromurl}{%s}\n" :with-url :from-logo from-logo "\\setkomavar{fromlogo}{%s}\n" with-from-logo "\\KOMAoption{fromlogo}{%s}\n" :with-from-logo :with-headline-opening org-koma-letter--get-tagged-contents closing nil replace-regexp-in-string "\\`\\([ 	]*\n\\)+" "\\`[ 	\n
]+" "" "[ 	\n
]+\\'" :signature signature global "\\setkomavar{signature}{%s}\n" with-backaddress "\\KOMAoption{backaddress}{%s}\n" :with-backaddress with-place place buffer "\\setkomavar{place}{%s}\n" :with-place :place location :location "\\setkomavar{location}{%s}\n" with-foldmarks :with-foldmarks "\\KOMAoptions{foldmarks=true,foldmarks=%s}\n" mapconcat symbol-name "\\KOMAoptions{foldmarks=true}\n" "\\KOMAoptions{foldmarks=false}\n"] 25 (#$ . 22509)])
#@1024 Export current buffer as a KOMA Scrlttr2 letter.

If narrowing is active in the current buffer, only export its
narrowed part.

If a region is active, export that region.

A non-nil optional argument ASYNC means the process should happen
asynchronously.  The resulting buffer should be accessible
through the `org-export-stack' interface.

When optional argument SUBTREEP is non-nil, export the sub-tree
at point, extracting information from the headline properties
first.

When optional argument VISIBLE-ONLY is non-nil, don't export
contents of hidden elements.

When optional argument BODY-ONLY is non-nil, only write code
between "\begin{letter}" and "\end{letter}".

EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.

Export is done in a buffer named "*Org KOMA-LETTER Export*".  It
will be displayed if `org-export-show-temporary-export-buffer' is
non-nil.

(fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
(defalias 'org-koma-letter-export-as-latex #[1280 "\301\302\303\304\305&)\207" [org-koma-letter-special-contents nil org-export-to-buffer koma-letter "*Org KOMA-LETTER Export*" #[0 "\300 \207" [LaTeX-mode] 1]] 14 (#$ . 25503) nil])
#@991 Export current buffer as a KOMA Scrlttr2 letter (tex).

If narrowing is active in the current buffer, only export its
narrowed part.

If a region is active, export that region.

A non-nil optional argument ASYNC means the process should happen
asynchronously.  The resulting file should be accessible through
the `org-export-stack' interface.

When optional argument SUBTREEP is non-nil, export the sub-tree
at point, extracting information from the headline properties
first.

When optional argument VISIBLE-ONLY is non-nil, don't export
contents of hidden elements.

When optional argument BODY-ONLY is non-nil, only write code
between "\begin{letter}" and "\end{letter}".

EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.

When optional argument PUB-DIR is set, use it as the publishing
directory.

Return output file's name.

(fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
(defalias 'org-koma-letter-export-to-latex #[1280 "\301\302\"\303\304\305&)\207" [org-koma-letter-special-contents org-export-output-file-name ".tex" nil org-export-to-file koma-letter] 14 (#$ . 26777) nil])
#@912 Export current buffer as a KOMA Scrlttr2 letter (pdf).

If narrowing is active in the current buffer, only export its
narrowed part.

If a region is active, export that region.

A non-nil optional argument ASYNC means the process should happen
asynchronously.  The resulting file should be accessible through
the `org-export-stack' interface.

When optional argument SUBTREEP is non-nil, export the sub-tree
at point, extracting information from the headline properties
first.

When optional argument VISIBLE-ONLY is non-nil, don't export
contents of hidden elements.

When optional argument BODY-ONLY is non-nil, only write code
between "\begin{letter}" and "\end{letter}".

EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.

Return PDF file's name.

(fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
(defalias 'org-koma-letter-export-to-pdf #[1280 "\301\302\"\303\304\305\306&)\207" [org-koma-letter-special-contents org-export-output-file-name ".tex" nil org-export-to-file koma-letter org-latex-compile] 15 (#$ . 27996) nil])
(provide 'ox-koma-letter)