;ELC
|
;;; Compiled
|
;;; in Emacs version 26.1
|
;;; with all optimizations.
|
|
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
|
|
;;; This file does not contain utf-8 non-ASCII characters,
|
;;; and so can be loaded in Emacs versions earlier than 23.
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
(byte-code "\301\302!\210\301\303!\210\304\305\"\204 \306\300\307\"\210\310\311\312\313\314\315\316\317\320\321& \210\322\323\324\325\326DD\327\316\311\330\331&\210\322\332\324\325\333DD\334\316\311\330\335&\210\322\336\324\325\337DD\340\316\311\320\341\342\343\330\344& \210\322\345\324\325\346DD\347\316\311\320\341\342\350\330\351& \210\322\352\324\325\353DD\354\316\311\320\341\342\355\330\356& \210\322\357\324\325\360DD\361\316\311\330\362&\210\322\363\324\325\364DD\365\316\311\330\366&\210\322\367\324\325\370DD\371\316\311\320\372\342\373\330\374& \207" [org-latex-classes require cl-lib ox-latex assoc "beamer" add-to-list ("beamer" "\\documentclass[presentation]{beamer}" ("\\section{%s}" . "\\section*{%s}") ("\\subsection{%s}" . "\\subsection*{%s}") ("\\subsubsection{%s}" . "\\subsubsection*{%s}")) custom-declare-group org-export-beamer nil "Options specific for using the beamer class in LaTeX export." :tag "Org Beamer" :group org-export :version "24.2" custom-declare-variable org-beamer-frame-level funcall function #[0 "\300\207" [1] 1] "The level at which headlines become frames.\n\nHeadlines at a lower level will be translated into a sectioning\nstructure. At a higher level, they will be translated into\nblocks.\n\nIf a headline with a \"BEAMER_env\" property set to \"frame\" is\nfound within a tree, its level locally overrides this number.\n\nThis variable has no effect on headlines with the \"BEAMER_env\"\nproperty set to either \"ignoreheading\", \"appendix\", or\n\"note\", which will respectively, be invisible, become an\nappendix or a note.\n\nThis integer is relative to the minimal level of a headline\nwithin the parse tree, defined as 1." :type integer org-beamer-frame-default-options #[0 "\300\207" [#1=""] 1 #1#] "Default options string to use for frames.\nFor example, it could be set to \"allowframebreaks\"." (string :tag "[options]") org-beamer-column-view-format #[0 "\300\207" [#2="%45ITEM %10BEAMER_env(Env) %10BEAMER_act(Act) %4BEAMER_col(Col) %8BEAMER_opt(Opt)"] 1 #2#] "Column view format that should be used to fill the template." "24.4" :package-version (Org . "8.0") (choice (const :tag "Do not insert Beamer column view format" nil) (string :tag "Beamer column view format")) org-beamer-theme #[0 "\300\207" [#3="default"] 1 #3#] "Default theme used in Beamer presentations." (Org . "8.0") (choice (const :tag "Do not insert a Beamer theme" nil) (string :tag "Beamer theme")) org-beamer-environments-extra #[0 "\300\207" [nil] 1] "Environments triggered by tags in Beamer export.\nEach entry has 4 elements:\n\nname Name of the environment\nkey Selection key for `org-beamer-select-environment'\nopen The opening template for the environment, with the following escapes\n %a the action/overlay specification\n %A the default action/overlay specification\n %R the raw BEAMER_act value\n %o the options argument, with square brackets\n %O the raw BEAMER_opt value\n %h the headline text\n %r the raw headline text (i.e. without any processing)\n %H if there is headline text, that raw text in {} braces\n %U if there is headline text, that raw text in [] brackets\nclose The closing string of the environment." (Org . "8.1") (repeat (list (string :tag "Environment") (string :tag "Selection key") (string :tag "Begin") (string :tag "End"))) org-beamer-outline-frame-title #[0 "\300\207" [#4="Outline"] 1 #4#] "Default title of a frame containing an outline." (string :tag "Outline frame title") org-beamer-outline-frame-options #[0 "\300\207" [#1#] 1 #1#] "Outline frame options appended after \\begin{frame}.\nYou might want to put e.g. \"allowframebreaks=0.9\" here." (string :tag "Outline frame options") org-beamer-subtitle-format #[0 "\300\207" [#5="\\subtitle{%s}"] 1 #5#] "Format string used for transcoded subtitle.\nThe format string should have at most one \"%s\"-expression,\nwhich is replaced with the subtitle." "26.1" (Org . "8.3") (string :tag "Format string")] 12)
|
#@72 The column widths that should be installed as allowed property values.
|
(defconst org-beamer-column-widths "0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 0.0 :ETC" (#$ . 4445))
|
#@307 Alist of environments treated in a special way by the back-end.
|
Keys are environment names, as strings, values are bindings used
|
in `org-beamer-select-environment'. Environments listed here,
|
along with their binding, are hard coded and cannot be modified
|
through `org-beamer-environments-extra' variable.
|
(defconst org-beamer-environments-special '(("againframe" "A") ("appendix" "x") ("column" "c") ("columns" "C") ("frame" "f") ("fullframe" "F") ("ignoreheading" "i") ("note" "n") ("noteNH" "N")) (#$ . 4618))
|
#@140 Environments triggered by properties in Beamer export.
|
These are the defaults - for user definitions, see
|
`org-beamer-environments-extra'.
|
(defconst org-beamer-environments-default '(("block" "b" "\\begin{block}%a{%h}" "\\end{block}") ("alertblock" "a" "\\begin{alertblock}%a{%h}" "\\end{alertblock}") ("verse" "v" "\\begin{verse}%a %% %h" "\\end{verse}") ("quotation" "q" "\\begin{quotation}%a %% %h" "\\end{quotation}") ("quote" "Q" "\\begin{quote}%a %% %h" "\\end{quote}") ("structureenv" "s" "\\begin{structureenv}%a %% %h" "\\end{structureenv}") ("theorem" "t" "\\begin{theorem}%a[%h]" "\\end{theorem}") ("definition" "d" "\\begin{definition}%a[%h]" "\\end{definition}") ("example" "e" "\\begin{example}%a[%h]" "\\end{example}") ("exampleblock" "E" "\\begin{exampleblock}%a{%h}" "\\end{exampleblock}") ("proof" "p" "\\begin{proof}%a[%h]" "\\end{proof}") ("beamercolorbox" "o" "\\begin{beamercolorbox}%o{%h}" "\\end{beamercolorbox}")) (#$ . 5138))
|
#@142 List of element or object types producing verbatim text.
|
This is used internally to determine when a frame should have the
|
"fragile" option.
|
(defconst org-beamer-verbatim-elements '(code example-block fixed-width inline-src-block src-block verbatim) (#$ . 6097))
|
#@281 Return ARGUMENT string with proper boundaries.
|
|
TYPE is a symbol among the following:
|
`action' Return ARGUMENT within angular brackets.
|
`defaction' Return ARGUMENT within both square and angular brackets.
|
`option' Return ARGUMENT within square brackets.
|
|
(fn ARGUMENT TYPE)
|
(defalias 'org-beamer--normalize-argument #[514 "\300\301\"\204 \302\207\211\303\267\2021 \304\305\306\307\310#\"\207\304\311\306\307\310\306\312\313 ##\"\207\304\314\306\312\313#\"\207\315\316\"\207" [string-match "\\S-" "" #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (action 15 defaction 25 option 39)) format "<%s>" org-unbracket-string "<" ">" "[<%s>]" "[" "]" "[%s]" error "Invalid `type' argument to `org-beamer--normalize-argument': %s"] 11 (#$ . 6367)])
|
#@241 Non-nil when ELEMENT has an overlay specified.
|
An element has an overlay specification when it starts with an
|
`beamer' export-snippet whose value is between angular brackets.
|
Return overlay specification, as a string, or nil.
|
|
(fn ELEMENT)
|
(defalias 'org-beamer--element-has-overlay-p #[257 "\211\211:\204\n \300\202 \211@9\203 \211AA\202 \211\262@\211\211:\204) \211;\2051 \301\2021 \211@9\2051 \211@\262\302=\205` \303\211;\203G \304\305#\202M \306A@\"\266\202\307\310\"\205^ \311\312\"\205^ \211\262\207" [nil plain-text export-snippet :value get-text-property 0 plist-get string-prefix-p "<" string-suffix-p ">"] 8 (#$ . 7166)])
|
(org-export-define-derived-backend 'beamer 'latex :menu-entry '(108 1 ((66 "As LaTeX buffer (Beamer)" org-beamer-export-as-latex) (98 "As LaTeX file (Beamer)" org-beamer-export-to-latex) (80 "As PDF file (Beamer)" org-beamer-export-to-pdf) (79 "As PDF file and open (Beamer)" (lambda (a s v b) (if a (org-beamer-export-to-pdf t s v b) (org-open-file (org-beamer-export-to-pdf nil s v b))))))) :options-alist '((:headline-levels nil "H" org-beamer-frame-level) (:latex-class "LATEX_CLASS" nil "beamer" t) (:beamer-subtitle-format nil nil org-beamer-subtitle-format) (:beamer-column-view-format "COLUMNS" nil org-beamer-column-view-format) (:beamer-theme "BEAMER_THEME" nil org-beamer-theme) (:beamer-color-theme "BEAMER_COLOR_THEME" nil nil t) (:beamer-font-theme "BEAMER_FONT_THEME" nil nil t) (:beamer-inner-theme "BEAMER_INNER_THEME" nil nil t) (:beamer-outer-theme "BEAMER_OUTER_THEME" nil nil t) (:beamer-header "BEAMER_HEADER" nil nil newline) (:beamer-environments-extra nil nil org-beamer-environments-extra) (:beamer-frame-default-options nil nil org-beamer-frame-default-options) (:beamer-outline-frame-options nil nil org-beamer-outline-frame-options) (:beamer-outline-frame-title nil nil org-beamer-outline-frame-title)) :translate-alist '((bold . org-beamer-bold) (export-block . org-beamer-export-block) (export-snippet . org-beamer-export-snippet) (headline . org-beamer-headline) (item . org-beamer-item) (keyword . org-beamer-keyword) (link . org-beamer-link) (plain-list . org-beamer-plain-list) (radio-target . org-beamer-radio-target) (template . org-beamer-template)))
|
#@150 Transcode BLOCK object into Beamer code.
|
CONTENTS is the text being bold. INFO is a plist used as
|
a communication channel.
|
|
(fn BOLD CONTENTS INFO)
|
(defalias 'org-beamer-bold #[771 "\300\301\302!\206 \303#\207" [format "\\alert%s{%s}" org-beamer--element-has-overlay-p ""] 7 (#$ . 9408)])
|
#@153 Transcode an EXPORT-BLOCK element into Beamer code.
|
CONTENTS is nil. INFO is a plist used as a communication
|
channel.
|
|
(fn EXPORT-BLOCK CONTENTS INFO)
|
(defalias 'org-beamer-export-block #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\235\2055 \305\306\211;\203, \301\302#\2022 \303A@\"\266\202!\207" [:type get-text-property 0 plist-get ("BEAMER" "LATEX") org-remove-indentation :value] 10 (#$ . 9708)])
|
#@156 Transcode an EXPORT-SNIPPET object into Beamer code.
|
CONTENTS is nil. INFO is a plist used as a communication
|
channel.
|
|
(fn EXPORT-SNIPPET CONTENTS INFO)
|
(defalias 'org-beamer-export-snippet #[771 "\300!\301\211;\203 \302\303#\202 \304A@\"\266\202\305=\203$ \211\202: \306=\205: \307\"\2049 \310\311\"?\205: \211\207" [org-export-snippet-backend :value get-text-property 0 plist-get latex beamer org-export-get-previous-element string-match "\\`<.*>\\'"] 10 (#$ . 10140)])
|
#@359 Return label for HEADLINE, as a string.
|
|
INFO is a plist used as a communication channel.
|
|
The value is either the label specified in "BEAMER_opt"
|
property, the custom ID, if there is one and
|
`:latex-prefer-user-labels' property has a non nil value, or
|
a unique internal label. This function assumes HEADLINE will be
|
treated as a frame.
|
|
(fn HEADLINE INFO)
|
(defalias 'org-beamer--get-label #[514 "\301\211;\203 \302\303#\202 \304A@\"\266\202\211;\205A \305\306\"\205A \307\310\"\311\312\313\305#)\266\203\203> \211\310\314O\202? \211\262\262\206n \304\315\"\203g \316\211;\203\\ \302\303#\202b \304A@\"\266\202\206n \317\320\321\"\"\207" [inhibit-changing-match-data :BEAMER_OPT get-text-property 0 plist-get string-match "\\(?:^\\|,\\)label=\\(.*?\\)\\(?:$\\|,\\)" match-string 1 "\\`{.*}\\'" nil t -1 :latex-prefer-user-labels :CUSTOM_ID format "sec:%s" org-export-get-reference] 11 (#$ . 10634)])
|
#@121 Return frame level in subtree containing HEADLINE.
|
INFO is a plist used as a communication channel.
|
|
(fn HEADLINE INFO)
|
(defalias 'org-beamer--frame-level #[514 "\3002D \301!\237\211\205A \211@\302\211;\203 \303\304#\202# \305A@\"\266\202\211\2039 \306\307\"\2039 \310\300\311\"\"\210\210A\266\202\202 \2620\206\214 \302\211;\203V \303\304#\202\\ \305A@\"\266\202\211\205m \306\312\"\205m \311\"\262\206\214 \313\314\315\316\317\320\321!\322\"\323\324%\325%\206\214 \305\326\"\207" [exit org-element-lineage :BEAMER_ENV get-text-property 0 plist-get member-ignore-case ("frame" "fullframe") throw org-export-get-relative-level ("frame" "fullframe") org-element-map headline make-byte-code 257 "\301\211;\203 \302\303#\202 \304A@\"\266\202\211\205& \305\306\"\205& \307\300\"\207" vconcat vector [:BEAMER_ENV get-text-property 0 plist-get member-ignore-case ("frame" "fullframe") org-export-get-relative-level] 7 "\n\n(fn HL)" first-match :headline-levels] 11 (#$ . 11566)])
|
#@163 Format HEADLINE as a sectioning part.
|
CONTENTS holds the contents of the headline. INFO is a plist
|
used as a communication channel.
|
|
(fn HEADLINE CONTENTS INFO)
|
(defalias 'org-beamer--format-section #[771 "\300\301\302\303\304\305\306\307\310\311\312\313!\314\"\315\316%\317\"\262$$\320\211;\203, \321\322#\2022 \323A@\"\266\202\211\203Q \324\325\"\203Q \326\327\330\"\331\332\"P\333\211\330%\202R \207" [org-export-with-backend org-export-create-backend :parent latex :transcoders #[771 "\300\301$\302!\203 \303P\202 \211\207" [org-export-with-backend beamer org-string-nw-p "\\protect"] 8 "\n\n(fn OBJECT CONTENTS INFO)"] mapcar make-byte-code 257 "\211\300B\207" vconcat vector [] 3 "\n\n(fn TYPE)" (bold footnote-reference italic strike-through timestamp underline) :BEAMER_ACT get-text-property 0 plist-get string-match "\\`\\\\\\(.*?\\)\\(?:\\*\\|\\[.*\\]\\)?{" replace-match match-string 1 format "<%s>" nil] 16 (#$ . 12584)])
|
#@153 Format HEADLINE as a frame.
|
CONTENTS holds the contents of the headline. INFO is a plist
|
used as a communication channel.
|
|
(fn HEADLINE CONTENTS INFO)
|
(defalias 'org-beamer--format-frame #[771 "\302\303\304%\305\306\211;\203 \307\310#\202 \311A@\"\266\202\211\204' \312\2029 \313\314\"\2035 \315\316\"\2029 \315\317\"\262\320\211;\203K \307\310#\202Q \311A@\"\266\202\321\322\323\324\311 \325\"\326\"\205r \324\313\327\"\205p \330\331\"\326\"\205\203 \313\332\"\206\203 \313\333\"?\205\250 \334\f \"\335\336\337\340\313#)\266\203\203\242 \341\202\243 \342\"\262C#\"\315\343\303\203\270 \344\235\203\274 \202\277 \344B\326#\345\"\266\202\346\211;\203\325 \307\310#\202\333 \311A@\"\266\202\335\347\203\356 \227\350\232\203\356 \312\202\n\351\352 \211;\203\377 \307\310#\202\311A@\"\266\202 \"\"\262\353\204\202!\354\355\356\n\206 \312#\357\260\207" [org-beamer-verbatim-elements inhibit-changing-match-data org-element-map identity first-match "\\begin{frame}" :BEAMER_ACT get-text-property 0 plist-get "" string-match "\\`\\[.*\\]\\'" org-beamer--normalize-argument defaction action :BEAMER_OPT cl-remove-if-not org-string-nw-p append org-split-string :beamer-frame-default-options "," "^\\[?\\(.*\\)\\]?$" match-string 1 "\\(^\\|,\\)label=" "allowframebreaks" org-beamer--get-label format ":" nil t "label={%s}" "label=%s" mapconcat "fragile" option :BEAMER_ENV "{%s}" "fullframe" org-export-data :title "\n" replace-regexp-in-string "\\`\n*" "\\& " "\\end{frame}"] 21 (#$ . 13549)])
|
#@153 Format HEADLINE as a block.
|
CONTENTS holds the contents of the headline. INFO is a plist
|
used as a communication channel.
|
|
(fn HEADLINE CONTENTS INFO)
|
(defalias 'org-beamer--format-block #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\305\211;\203& \302\303#\202, \304A@\"\266\202\211\204: \204: \306\202C \211\204B \307\202C \211\262\310\211;\203T \302\303#\202Z \304A@\"\266\202\311\235\203f \312\202x \313\314\304\315\"\"\"\206x \316\317\"\320\321\211;\203\211 \302\303#\202\217 \304A@\"\266\202\"\322\211;\203\244 \302\303#\202\252 \304A@\"\266\202\211\203\267 \323\324\"\202\270 \325\305\326 !\211;\203\312 \302\303#\202\320 \304A@\"\266\202\327\232\206\205\211\205\346 \211\227\327\232?\205\330 \n\"\206\301\331\f \"\211;\203\302\303#\202 \304A@\"\266\202?\327\232\206N\205N\205$\227\327\232?\205N\332\f \"\206N\301\333 \f\"\211;\203E\302\303#\202K\304A@\"\266\202?\205a\327\232\204]\334\202a\335\336\"\n\205{\335\337 \307\232\203t\202u\325\335\340\"#\341 8\205\342\341\n8\343\211;\203\227\302\303#\202\235\304A@\"\266\202\211\204\260\344\325B\345\325B\346\325BE\202\333\347\350\"\203\316\351\352\"\203\316\345\323\353\"B\344\325B\346BE\202\333\344\323\354\"B\345\325B\346BE\262\355 B\356 \206\350\325B\357 B\360B\361\325\232\203\375\325\202\335\362\"B\363\325\232\203\325\202\335\364\"B\257\244\"\365P\366 8\205*\366 8\365P\2050\367\2056\370\260\207" [org-beamer-environments-default :BEAMER_COL get-text-property 0 plist-get :BEAMER_ENV "block" "column" :raw-value ("column" "columns") nil assoc append :beamer-environments-extra user-error "Wrong block type at a headline named \"%s\"" org-export-data :title :BEAMER_OPT org-beamer--normalize-argument option "" org-export-get-parent-headline "columns" org-export-first-sibling-p org-export-get-previous-element org-export-last-sibling-p org-export-get-next-element "\\begin{columns}\n" format "\\begin{columns}%s\n" "\\begin{column}%s{%s}\n" "%s\\columnwidth" 2 org-fill-template :BEAMER_ACT "a" "A" "R" string-prefix-p "[" string-suffix-p "]" defaction action "o" "O" "h" "r" "H" "{%s}" "U" "[%s]" "\n" 3 "\\end{column}\n" "\\end{columns}"] 27 (#$ . 15114)])
|
#@167 Transcode HEADLINE element into Beamer code.
|
CONTENTS is the contents of the headline. INFO is a plist used
|
as a communication channel.
|
|
(fn HEADLINE CONTENTS INFO)
|
(defalias 'org-beamer-headline #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202?\205\325\304\"\305\"\306\211;\2032 \301\302#\2028 \303A@\"\266\202\307!\206A \310\262\211\311\232\203\371 \312\211;\203Y \301\302#\202_ \303A@\"\266\202\307!\205\364 \313\314\211;\203x \301\302#\202~ \303A@\"\266\202\211\205\223 \315\316\317\"\203\221 \320\202\222 \321\"\262\322 \211;\203\245 \301\302#\202\253 \303A@\"\266\202\211\205\265 \315\323\"\262\316\324\"\203\317 \325\326\327\302\225\330ODD \"\202\351 \331\326\327\332!\333=\203\340 \202\344 \334PDD \"\335\336\337\f\"\"\262R\262\202\323\211\340\232\203;\341\314\211;\203\301\302#\202\303A@\"\266\202\342\343\344\n\211;\203*\301\302#\2020\303A@\"\266\202\345\"\260\202\323\211\346\232\203a\343\344\211;\203R\301\302#\202X\303A@\"\266\202\345\"P\202\323\211\347\235\203\251\335\350\351\232\205\215\352\353 \211;\203\200\301\302#\202\206\303A@\"\266\202\"\342P\330\354\203\231\355\202\232\356\357\354\360\357##\266\202P\"\202\323U\203\272\361#\202\323W\203\313\362#\202\323\363#\266\203\207" [:footnote-section-p get-text-property 0 plist-get org-export-get-relative-level org-beamer--frame-level :BEAMER_ENV org-string-nw-p "block" "againframe" :BEAMER_REF "\\againframe" :BEAMER_ACT org-beamer--normalize-argument string-match "\\`\\[.*\\]\\'" defaction action :BEAMER_OPT option "\\`\\(id:\\|#\\)" org-export-resolve-id-link link :path nil org-export-resolve-fuzzy-link string-to-char 42 "*" format "{%s}" org-beamer--get-label "appendix" "\\appendix" "\n" make-string :pre-blank 10 "ignoreheading" ("note" "noteNH") "\\note{%s}" "note" org-export-data :title replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" org-beamer--format-frame org-beamer--format-section org-beamer--format-block] 18 (#$ . 17409)])
|
#@160 Transcode an ITEM element into Beamer code.
|
CONTENTS holds the contents of the item. INFO is a plist holding
|
contextual information.
|
|
(fn ITEM CONTENTS INFO)
|
(defalias 'org-beamer-item #[771 "\300\301\302\303\304\305\306\307\310\311\312\f\f\"\313\"\314\315%BC\303\211\211\211&$\207" [org-export-with-backend record org-export-backend nil beamer item make-byte-code 771 "\211:\204\n \302\202 \211@9\203 \211AA\202 \211\262@\211\211:\204) \211;\2051 \303\2021 \211@9\2051 \211@\262\304=\205; \305!\262\306\300\301#\203M \307\310\"\204Q \211\202Y \311\310P\302\211$\207" vconcat vector [nil plain-text paragraph org-beamer--element-has-overlay-p org-latex-item string-match "\\\\item" replace-match] 10 "\n\n(fn ITEM C I)"] 16 (#$ . 19496)])
|
#@142 Transcode a KEYWORD element into Beamer code.
|
CONTENTS is nil. INFO is a plist used as a communication
|
channel.
|
|
(fn KEYWORD CONTENTS INFO)
|
(defalias 'org-beamer-keyword #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\211;\203& \301\302#\202, \303A@\"\266\202\305\232\2038 \211\202 \306\232\203v \307\310\"\203v \307\311\"\203U \312\313\302\"!\206Y \303\314\"\307\315\"\205d \313\302\"\316!\205n \317\320\"\321Q\266\202\202 \322\323$\207" [:key get-text-property 0 plist-get :value "BEAMER" "TOC" string-match "\\<headlines\\>" "[0-9]+" string-to-number match-string :with-toc "\\[.*?\\]" wholenump format "\\setcounter{tocdepth}{%s}\n" "\\tableofcontents" org-export-with-backend latex] 10 (#$ . 20262)])
|
#@164 Transcode a LINK object into Beamer code.
|
CONTENTS is the description part of the link. INFO is a plist
|
used as a communication channel.
|
|
(fn LINK CONTENTS INFO)
|
(defalias 'org-beamer-link #[771 "\300\301#\206+ \302\303$\304\305\"\203( \306\307\310\311!\206 \312\"\313\211$\202) \211\262\207" [org-export-custom-protocol-maybe beamer org-export-with-backend latex string-match "\\`\\\\hyperref\\[\\(.*?\\)\\]" replace-match format "\\\\hyperlink%s{\\1}" org-beamer--element-has-overlay-p "" nil] 9 (#$ . 21015)])
|
#@168 Transcode a PLAIN-LIST element into Beamer code.
|
CONTENTS is the contents of the list. INFO is a plist holding
|
contextual information.
|
|
(fn PLAIN-LIST CONTENTS INFO)
|
(defalias 'org-beamer-plain-list #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\305\306\"\305\307\"\"\303\310\"\211\206: \311\267\2029 \312\202: \313\202: \314\262\315\316\317\320\303\321\"\206L \322\323\"\320\303 \324\"\206X \322\325\" &#\207" [:type get-text-property 0 plist-get org-combine-plists org-export-read-attribute :attr_latex :attr_beamer :environment #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 49 descriptive 53)) "enumerate" "description" "itemize" org-latex--wrap-label format "\\begin{%s}%s%s\n%s\\end{%s}" org-beamer--normalize-argument :overlay "" defaction :options option] 16 (#$ . 21547)])
|
#@161 Transcode a RADIO-TARGET object into Beamer code.
|
TEXT is the text of the target. INFO is a plist holding
|
contextual information.
|
|
(fn RADIO-TARGET TEXT INFO)
|
(defalias 'org-beamer-radio-target #[771 "\300\301\302!\206 \303\304\"$\207" [format "\\hypertarget%s{%s}{%s}" org-beamer--element-has-overlay-p "" org-export-get-reference] 9 (#$ . 22419)])
|
#@163 Return complete document string after Beamer conversion.
|
CONTENTS is the transcoded contents string. INFO is a plist
|
holding export options.
|
|
(fn CONTENTS INFO)
|
(defalias 'org-beamer-template #[514 "\301\302\303\"\"\301\302\304\"\"\302\305\"\205 \306\307!\310!\311!\312\313\314\315\316\n!\317\"\320\321%\322\312\323\324\315\316!\325\"\326\327%\330\331#\262\302\332\"\211\250\205L \333\334\"\262\302\335\"\205f \302\336\"\211\205d \301\n\"\262\302 \337\"\205w \301\302\n\340\"\n\"\203\215 \211\203\215 \211\331\230\204\215 \333\341#\202\235 \204\225 \211\205\235 \333\342\206\234 \"\266\202\302 \343\"\205\253 \344 !\333\345\301 \"\"\262\333\346\n\"\347 !\205\314 \333\302\f\350\"\n\"\351P\302\f\352\"\211\205\335 \333\353\302\352\"\"\262\302 \354\"\211;\205\360 \355\356!\"\262\357\360\302\361\"\204 \362\202$\331\230\203 \362\202$;\204\362\202$\363\364\"\203#\333\"\202$!\302\365\"\211\205K\333\366\367\302\370\"\371\"\302\372\"#\373!\205H\333\374\"\375\376R\262\302\377\"\203c\302\201@ \"\351P\202d\331\201A \260\207" [org-latex-title-command org-export-data plist-get :title :subtitle :time-stamp-file format-time-string "%% Created %Y-%m-%d %a %H:%M\n" org-latex--insert-compiler org-latex-make-preamble make-byte-code 514 "\301\300\"\211\205; \302\303\"\204 \304\305\"\202: \304\306\307\310\"\311\312\313\211$\313\314\203. \315\202/ \316\312\314\317\312##\266\202#P\207" vconcat vector [plist-get string-match "\\[.*\\]" format "{%s}\n" "%s{%s}\n" match-string 0 replace-match #1="" nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'"] 16 "\n\n(fn PROP COMMAND)" mapconcat 257 "\301\300\"\207" [apply] 4 "\n\n(fn ARGS)" ((:beamer-theme "\\usetheme") (:beamer-color-theme "\\usecolortheme") (:beamer-font-theme "\\usefonttheme") (:beamer-inner-theme "\\useinnertheme") (:beamer-outer-theme "\\useoutertheme")) #1# :section-numbers format "\\setcounter{secnumdepth}{%d}\n" :with-author :author :with-email :email "\\author{%s\\thanks{%s}}\n" "\\author{%s}\n" :with-date org-export-get-date "\\date{%s}\n" "\\title{%s}\n" org-string-nw-p :beamer-subtitle-format "\n" :beamer-header "%s\n" :latex-hyperref-template format-spec org-latex--format-spec "\\begin{document}\n\n" org-element-normalize-string :with-title nil string-match "\\(?:[^%]\\|^\\)%s" :with-toc "\\begin{frame}%s{%s}\n" org-beamer--normalize-argument :beamer-outline-frame-options option :beamer-outline-frame-title wholenump "\\setcounter{tocdepth}{%d}\n" "\\tableofcontents\n" "\\end{frame}\n\n" :with-creator :creator "\\end{document}"] 24 (#$ . 22783)])
|
#@35 The keymap for `org-beamer-mode'.
|
(defvar org-beamer-mode-map (make-sparse-keymap) (#$ . 25443))
|
(define-key org-beamer-mode-map "" 'org-beamer-select-environment)
|
#@99 Non-nil if Org-Beamer mode is enabled.
|
Use the command `org-beamer-mode' to change this variable.
|
(defvar org-beamer-mode nil (#$ . 25615))
|
(make-variable-buffer-local 'org-beamer-mode)
|
#@73 Support for editing Beamer oriented Org mode files.
|
|
(fn &optional ARG)
|
(defalias 'org-beamer-mode #[256 "\301 \302=\203 ?\202 \303!\304V\305\306\203 \307\202 \310\"\210\311\312!\203B \301 \2032 \211\301 \232\203B \313\314\315\203= \316\202> \317#\266\210\320 \210\207" [org-beamer-mode current-message toggle prefix-numeric-value 0 run-hooks org-beamer-mode-hook org-beamer-mode-on-hook org-beamer-mode-off-hook called-interactively-p any " in current buffer" message "Org-Beamer mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 25807) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
|
(defvar org-beamer-mode-hook nil)
|
(byte-code "\300\301N\204\f \302\300\301\303#\210\300\207" [org-beamer-mode-hook variable-documentation put "Hook run after entering or leaving `org-beamer-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)"] 4)
|
#@31 Keymap for `org-beamer-mode'.
|
(defvar org-beamer-mode-map (byte-code "\300\301!\203 \211\202 \211<\203 \302!\202 \303\304\"\207" [org-beamer-mode-map keymapp easy-mmode-define-keymap error "Invalid keymap %S"] 4) (#$ . 26765))
|
(byte-code "\301\302\303\304\211%\210\305\306!\203 \306\307\310\311#\210\312\313\314\315\316\317%\207" [org-beamer-mode-map add-minor-mode org-beamer-mode " Bm" nil fboundp font-lock-add-keywords org-mode ((":\\(B_[a-z]+\\|BMCOL\\):" 1 'org-beamer-tag prepend)) prepend custom-declare-face org-beamer-tag ((t (:box (:line-width 1 :color grey40)))) "The special face for beamer tags." :group org-export-beamer] 6)
|
#@135 Track the BEAMER_env property with tags.
|
PROPERTY is the name of the modified property. VALUE is its new
|
value.
|
|
(fn PROPERTY VALUE)
|
(defalias 'org-beamer-property-changed #[514 "\300\267\202B \212\301\302!\210\303\304\305 \"\306!\205 \307P\310\203$ B\202% !\210\211\205/ \311\312\"\266\202)\207\311\313\306!\203? \312\202@ \314\"\207\315\207" [#s(hash-table size 2 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("BEAMER_env" 6 "BEAMER_col" 51)) org-back-to-heading t cl-remove-if #[257 "\300\301\"\207" [string-match "^B_"] 4 "\n\n(fn X)"] org-get-tags org-string-nw-p "B_" org-set-tags-to org-toggle-tag on "BMCOL" off nil] 7 (#$ . 27421)])
|
(add-hook 'org-property-changed-functions 'org-beamer-property-changed)
|
#@52 Supply allowed values for PROPERTY.
|
|
(fn PROPERTY)
|
(defalias 'org-beamer-allowed-property-values #[257 "\211\304\232\203 \305\306\307P\310#\204 \311\312\313 \n#\"\207\211\314\232\205. \305\306\307P\310#?\205. \315 \316\"\207" [org-beamer-environments-special org-beamer-environments-extra org-beamer-environments-default org-beamer-column-widths "BEAMER_env" org-entry-get nil "_ALL" inherit mapcar car append "BEAMER_col" split-string " "] 7 (#$ . 28175)])
|
(add-hook 'org-property-allowed-value-functions 'org-beamer-allowed-property-values)
|
#@1020 Export current buffer as a Beamer buffer.
|
|
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{document}" and "\end{document}".
|
|
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 BEAMER Export*", which
|
will be displayed when `org-export-show-temporary-export-buffer'
|
is non-nil.
|
|
(fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
|
(defalias 'org-beamer-export-as-latex #[1280 "\300\301\302\303&\207" [org-export-to-buffer beamer "*Org BEAMER Export*" #[0 "\300 \207" [LaTeX-mode] 1]] 14 (#$ . 28731) nil])
|
#@918 Export current buffer as a Beamer presentation (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{document}" and "\end{document}".
|
|
EXT-PLIST, when provided, is a property list with external
|
parameters overriding Org default settings, but still inferior to
|
file-local settings.
|
|
Return output file's name.
|
|
(fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
|
(defalias 'org-beamer-export-to-latex #[1280 "\300\301\"\302\303&\207" [org-export-output-file-name ".tex" org-export-to-file beamer] 14 (#$ . 29943) nil])
|
#@915 Export current buffer as a Beamer presentation (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{document}" and "\end{document}".
|
|
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-beamer-export-to-pdf #[1280 "\300\301\"\302\303\304&\207" [org-export-output-file-name ".tex" org-export-to-file beamer #[257 "\300!\207" [org-latex-compile] 3 "\n\n(fn FILE)"]] 15 (#$ . 31036) nil])
|
#@328 Select the environment to be used by beamer for this entry.
|
While this uses (for convenience) a tag selection interface, the
|
result of this command will be that the BEAMER_env *property* of
|
the entry is set.
|
|
In addition to this, the command will also set a tag as a visual
|
aid, but the tag does not have any semantic meaning.
|
(defalias 'org-beamer-select-environment #[0 "\306 \n#\306\307\310\311\"\312\313$\314 \315\211 +\316 \210\3171# \320 0\202' \210\202* \206+ \321,\322=\203H \323\324\"\203B \325\326\327\330!\"\202\234 \331\326!\202\234 ,\332=\203 \333\314\334\"\335\232\203i \336\314\334\"\210\336\314\337\"\210\336\314\340\"\202\234 \341\314\334\335#\210\325\337\327\342!\"\210\325\340\327\343!\"\202\234 \323\344\345\346\347#\350Q\"\203\230 \341\314\334\351\352\"#\202\234 \336\314\334\"\262,\207" [org-beamer-environments-special org-beamer-environments-extra org-beamer-environments-default org-current-tag-alist org-tag-persistent-alist org-use-fast-tag-selection append ((:startgroup)) mapcar #[257 "\300@P\301A@!B\207" ["B_" string-to-char] 4 "\n\n(fn E)"] ((:endgroup)) (("BMCOL" . 124)) nil t org-set-tags (error) org-get-tags-string "" 124 string-match ":BMCOL:" org-set-property "BEAMER_col" read-string "Column width: " org-delete-property 65 org-entry-get "BEAMER_env" "againframe" org-entry-delete "BEAMER_ref" "BEAMER_act" org-entry-put "Frame reference (*Title, #custom-id, id:...): " "Overlay specification: " ":B_\\(" mapconcat car "\\|" "\\):" match-string 1 org-fast-tag-selection-single-key org-last-tag-selection-key] 9 (#$ . 32186) nil])
|
#@258 Publish an Org file to a Beamer presentation (LaTeX).
|
|
FILENAME is the filename of the Org file to be published. PLIST
|
is the property list for the given project. PUB-DIR is the
|
publishing directory.
|
|
Return output file name.
|
|
(fn PLIST FILENAME PUB-DIR)
|
(defalias 'org-beamer-publish-to-latex #[771 "\300\301\302%\207" [org-publish-org-to beamer ".tex"] 9 (#$ . 33777)])
|
#@267 Publish an Org file to a Beamer presentation (PDF, via LaTeX).
|
|
FILENAME is the filename of the Org file to be published. PLIST
|
is the property list for the given project. PUB-DIR is the
|
publishing directory.
|
|
Return output file name.
|
|
(fn PLIST FILENAME PUB-DIR)
|
(defalias 'org-beamer-publish-to-pdf #[771 "\301\302!\303\304\305\306 \302\n!%!)#\207" [default-directory org-publish-attachment file-name-directory org-latex-compile org-publish-org-to beamer ".tex"] 13 (#$ . 34162)])
|
(provide 'ox-beamer)
|
