| commit | author | age | ||
| 76bbd0 | 1 | ;ELC |
| C | 2 | ;;; Compiled |
| 3 | ;;; in Emacs version 26.1 | |
| 4 | ;;; with all optimizations. | |
| 5 | ||
| 6 | ;;; This file uses dynamic docstrings, first added in Emacs 19.29. | |
| 7 | ||
| 8 | ;;; This file does not contain utf-8 non-ASCII characters, | |
| 9 | ;;; and so can be loaded in Emacs versions earlier than 23. | |
| 10 | ||
| 11 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 12 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 13 | ||
| 14 | ||
| 15 | (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\306\307\310\311\312\313\314\315\316&\207" [require cl-lib format-spec ox ox-publish table org-export-define-backend html ((bold . org-html-bold) (center-block . org-html-center-block) (clock . org-html-clock) (code . org-html-code) (drawer . org-html-drawer) (dynamic-block . org-html-dynamic-block) (entity . org-html-entity) (example-block . org-html-example-block) (export-block . org-html-export-block) (export-snippet . org-html-export-snippet) (fixed-width . org-html-fixed-width) (footnote-definition . org-html-footnote-definition) (footnote-reference . org-html-footnote-reference) (headline . org-html-headline) (horizontal-rule . org-html-horizontal-rule) (inline-src-block . org-html-inline-src-block) (inlinetask . org-html-inlinetask) (inner-template . org-html-inner-template) (italic . org-html-italic) (item . org-html-item) (keyword . org-html-keyword) (latex-environment . org-html-latex-environment) (latex-fragment . org-html-latex-fragment) (line-break . org-html-line-break) (link . org-html-link) (node-property . org-html-node-property) (paragraph . org-html-paragraph) (plain-list . org-html-plain-list) (plain-text . org-html-plain-text) (planning . org-html-planning) (property-drawer . org-html-property-drawer) (quote-block . org-html-quote-block) (radio-target . org-html-radio-target) (section . org-html-section) (special-block . org-html-special-block) (src-block . org-html-src-block) (statistics-cookie . org-html-statistics-cookie) (strike-through . org-html-strike-through) (subscript . org-html-subscript) (superscript . org-html-superscript) (table . org-html-table) (table-cell . org-html-table-cell) (table-row . org-html-table-row) (target . org-html-target) (template . org-html-template) (timestamp . org-html-timestamp) (underline . org-html-underline) (verbatim . org-html-verbatim) (verse-block . org-html-verse-block)) :filters-alist ((:filter-options . org-html-infojs-install-script) (:filter-parse-tree . org-html-image-link-filter) (:filter-final-output . org-html-final-function)) :menu-entry (104 "Export to HTML" ((72 "As HTML buffer" org-html-export-as-html) (104 "As HTML file" org-html-export-to-html) (111 "As HTML file and open" (lambda (a s v b) (if a (org-html-export-to-html t s v b) (org-open-file (org-html-export-to-html nil s v b))))))) :options-alist ((:html-doctype "HTML_DOCTYPE" nil org-html-doctype) (:html-container "HTML_CONTAINER" nil org-html-container-element) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:html-html5-fancy nil "html5-fancy" org-html-html5-fancy) (:html-link-use-abs-url nil "html-link-use-abs-url" org-html-link-use-abs-url) (:html-link-home "HTML_LINK_HOME" nil org-html-link-home) (:html-link-up "HTML_LINK_UP" nil org-html-link-up) (:html-mathjax "HTML_MATHJAX" nil "" space) (:html-postamble nil "html-postamble" org-html-postamble) (:html-preamble nil "html-preamble" org-html-preamble) (:html-head "HTML_HEAD" nil org-html-head newline) (:html-head-extra "HTML_HEAD_EXTRA" nil org-html-head-extra newline) (:subtitle "SUBTITLE" nil nil parse) (:html-head-include-default-style nil "html-style" org-html-head-include-default-style) (:html-head-include-scripts nil "html-scripts" org-html-head-include-scripts) (:html-allow-name-attribute-in-anchors nil nil org-html-allow-name-attribute-in-anchors) (:html-divs nil nil org-html-divs) (:html-checkbox-type nil nil org-html-checkbox-type) (:html-extension nil nil org-html-extension) (:html-footnote-format nil nil org-html-footnote-format) (:html-footnote-separator nil nil org-html-footnote-separator) (:html-footnotes-section nil nil org-html-footnotes-section) (:html-format-drawer-function nil nil org-html-format-drawer-function) (:html-format-headline-function nil nil org-html-format-headline-function) (:html-format-inlinetask-function nil nil org-html-format-inlinetask-function) (:html-home/up-format nil nil org-html-home/up-format) (:html-indent nil nil org-html-indent) (:html-infojs-options nil nil org-html-infojs-options) (:html-infojs-template nil nil org-html-infojs-template) (:html-inline-image-rules nil nil org-html-inline-image-rules) (:html-link-org-files-as-html nil nil org-html-link-org-files-as-html) (:html-mathjax-options nil nil org-html-mathjax-options) (:html-mathjax-template nil nil org-html-mathjax-template) (:html-metadata-timestamp-format nil nil org-html-metadata-timestamp-format) (:html-postamble-format nil nil org-html-postamble-format) (:html-preamble-format nil nil org-html-preamble-format) (:html-table-align-individual-fields nil nil org-html-table-align-individual-fields) (:html-table-caption-above nil nil org-html-table-caption-above) (:html-table-data-tags nil nil org-html-table-data-tags) (:html-table-header-tags nil nil org-html-table-header-tags) (:html-table-use-header-tags-for-first-column nil nil org-html-table-use-header-tags-for-first-column) (:html-tag-class-prefix nil nil org-html-tag-class-prefix) (:html-text-markup-alist nil nil org-html-text-markup-alist) (:html-todo-kwd-class-prefix nil nil org-html-todo-kwd-class-prefix) (:html-toplevel-hlevel nil nil org-html-toplevel-hlevel) (:html-use-infojs nil nil org-html-use-infojs) (:html-validation-link nil nil org-html-validation-link) (:html-viewport nil nil org-html-viewport) (:html-inline-images nil nil org-html-inline-images) (:html-table-attributes nil nil org-html-table-default-attributes) (:html-table-row-open-tag nil nil org-html-table-row-open-tag) (:html-table-row-close-tag nil nil org-html-table-row-close-tag) (:html-xml-declaration nil nil org-html-xml-declaration) (:html-klipsify-src nil nil org-html-klipsify-src) (:html-klipse-css nil nil org-html-klipse-css) (:html-klipse-js nil nil org-html-klipse-js) (:html-klipse-selection-script nil nil org-html-klipse-selection-script) (:infojs-opt "INFOJS_OPT" nil nil) (:creator "CREATOR" nil org-html-creator-string) (:with-latex nil "tex" org-html-with-latex) (:latex-header "LATEX_HEADER" nil nil newline))] 9) | |
| 16 | #@34 CSS class used for pre/postamble | |
| 17 | (defvar org-html--pre/postamble-class "status" (#$ . 6478)) | |
| 18 | #@56 An alist mapping (x)html flavors to specific doctypes. | |
| 19 | (defconst org-html-doctype-alist '(("html4-strict" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD HTML 4.01//EN\"\n\"http://www.w3.org/TR/html4/strict.dtd\">") ("html4-transitional" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\"\n\"http://www.w3.org/TR/html4/loose.dtd\">") ("html4-frameset" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD HTML 4.01 Frameset//EN\"\n\"http://www.w3.org/TR/html4/frameset.dtd\">") ("xhtml-strict" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">") ("xhtml-transitional" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\"\n\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">") ("xhtml-frameset" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\"\n\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">") ("xhtml-11" . "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.1//EN\"\n\"http://www.w3.org/TR/xhtml1/DTD/xhtml11.dtd\">") ("html5" . "<!DOCTYPE html>") ("xhtml5" . "<!DOCTYPE html>")) (#$ . 6577)) | |
| 20 | #@123 New elements in html5. | |
| 21 | ||
| 22 | For blocks that should contain headlines, use the HTML_CONTAINER | |
| 23 | property on the headline itself. | |
| 24 | (defconst org-html-html5-elements '("article" "aside" "audio" "canvas" "details" "figcaption" "figure" "footer" "header" "menu" "meter" "nav" "output" "progress" "section" "video") (#$ . 7682)) | |
| 25 | #@52 Regular expressions for special string conversion. | |
| 26 | (defconst org-html-special-string-regexps '(("\\\\-" . "­") ("---\\([^-]\\)" . "—\\1") ("--\\([^-]\\)" . "–\\1") ("\\.\\.\\." . "…")) (#$ . 8004)) | |
| 27 | #@69 Basic JavaScript that is needed by HTML files produced by Org mode. | |
| 28 | (defconst org-html-scripts "<script type=\"text/javascript\">\n/*\n@licstart The following is the entire license notice for the\nJavaScript code in this tag.\n\nCopyright (C) 2012-2018 Free Software Foundation, Inc.\n\nThe JavaScript code in this tag is free software: you can\nredistribute it and/or modify it under the terms of the GNU\nGeneral Public License (GNU GPL) as published by the Free Software\nFoundation, either version 3 of the License, or (at your option)\nany later version. The code is distributed WITHOUT ANY WARRANTY;\nwithout even the implied warranty of MERCHANTABILITY or FITNESS\nFOR A PARTICULAR PURPOSE. See the GNU GPL for more details.\n\nAs additional permission under GNU GPL version 3 section 7, you\nmay distribute non-source (e.g., minimized or compacted) forms of\nthat code without the copy of the GNU GPL normally required by\nsection 4, provided you include this license notice and a URL\nthrough which recipients can access the Corresponding Source.\n\n\n@licend The above is the entire license notice\nfor the JavaScript code in this tag.\n*/\n<!--/*--><![CDATA[/*><!--*/\n function CodeHighlightOn(elem, id)\n {\n var target = document.getElementById(id);\n if(null != target) {\n elem.cacheClassElem = elem.className;\n elem.cacheClassTarget = target.className;\n target.className = \"code-highlighted\";\n elem.className = \"code-highlighted\";\n }\n }\n function CodeHighlightOff(elem, id)\n {\n var target = document.getElementById(id);\n if(elem.cacheClassElem)\n elem.className = elem.cacheClassElem;\n if(elem.cacheClassTarget)\n target.className = elem.cacheClassTarget;\n }\n/*]]>*///-->\n</script>" (#$ . 8236)) | |
| 29 | #@233 The default style specification for exported HTML files. | |
| 30 | You can use `org-html-head' and `org-html-head-extra' to add to | |
| 31 | this style. If you don't want to include this default style, | |
| 32 | customize `org-html-head-include-default-style'. | |
| 33 | (defconst org-html-style-default "<style type=\"text/css\">\n <!--/*--><![CDATA[/*><!--*/\n .title { text-align: center;\n margin-bottom: .2em; }\n .subtitle { text-align: center;\n font-size: medium;\n font-weight: bold;\n margin-top:0; }\n .todo { font-family: monospace; color: red; }\n .done { font-family: monospace; color: green; }\n .priority { font-family: monospace; color: orange; }\n .tag { background-color: #eee; font-family: monospace;\n padding: 2px; font-size: 80%; font-weight: normal; }\n .timestamp { color: #bebebe; }\n .timestamp-kwd { color: #5f9ea0; }\n .org-right { margin-left: auto; margin-right: 0px; text-align: right; }\n .org-left { margin-left: 0px; margin-right: auto; text-align: left; }\n .org-center { margin-left: auto; margin-right: auto; text-align: center; }\n .underline { text-decoration: underline; }\n #postamble p, #preamble p { font-size: 90%; margin: .2em; }\n p.verse { margin-left: 3%; }\n pre {\n border: 1px solid #ccc;\n box-shadow: 3px 3px 3px #eee;\n padding: 8pt;\n font-family: monospace;\n overflow: auto;\n margin: 1.2em;\n }\n pre.src {\n position: relative;\n overflow: visible;\n padding-top: 1.2em;\n }\n pre.src:before {\n display: none;\n position: absolute;\n background-color: white;\n top: -10px;\n right: 10px;\n padding: 3px;\n border: 1px solid black;\n }\n pre.src:hover:before { display: inline;}\n /* Languages per Org manual */\n pre.src-asymptote:before { content: 'Asymptote'; }\n pre.src-awk:before { content: 'Awk'; }\n pre.src-C:before { content: 'C'; }\n /* pre.src-C++ doesn't work in CSS */\n pre.src-clojure:before { content: 'Clojure'; }\n pre.src-css:before { content: 'CSS'; }\n pre.src-D:before { content: 'D'; }\n pre.src-ditaa:before { content: 'ditaa'; }\n pre.src-dot:before { content: 'Graphviz'; }\n pre.src-calc:before { content: 'Emacs Calc'; }\n pre.src-emacs-lisp:before { content: 'Emacs Lisp'; }\n pre.src-fortran:before { content: 'Fortran'; }\n pre.src-gnuplot:before { content: 'gnuplot'; }\n pre.src-haskell:before { content: 'Haskell'; }\n pre.src-hledger:before { content: 'hledger'; }\n pre.src-java:before { content: 'Java'; }\n pre.src-js:before { content: 'Javascript'; }\n pre.src-latex:before { content: 'LaTeX'; }\n pre.src-ledger:before { content: 'Ledger'; }\n pre.src-lisp:before { content: 'Lisp'; }\n pre.src-lilypond:before { content: 'Lilypond'; }\n pre.src-lua:before { content: 'Lua'; }\n pre.src-matlab:before { content: 'MATLAB'; }\n pre.src-mscgen:before { content: 'Mscgen'; }\n pre.src-ocaml:before { content: 'Objective Caml'; }\n pre.src-octave:before { content: 'Octave'; }\n pre.src-org:before { content: 'Org mode'; }\n pre.src-oz:before { content: 'OZ'; }\n pre.src-plantuml:before { content: 'Plantuml'; }\n pre.src-processing:before { content: 'Processing.js'; }\n pre.src-python:before { content: 'Python'; }\n pre.src-R:before { content: 'R'; }\n pre.src-ruby:before { content: 'Ruby'; }\n pre.src-sass:before { content: 'Sass'; }\n pre.src-scheme:before { content: 'Scheme'; }\n pre.src-screen:before { content: 'Gnu Screen'; }\n pre.src-sed:before { content: 'Sed'; }\n pre.src-sh:before { content: 'shell'; }\n pre.src-sql:before { content: 'SQL'; }\n pre.src-sqlite:before { content: 'SQLite'; }\n /* additional languages in org.el's org-babel-load-languages alist */\n pre.src-forth:before { content: 'Forth'; }\n pre.src-io:before { content: 'IO'; }\n pre.src-J:before { content: 'J'; }\n pre.src-makefile:before { content: 'Makefile'; }\n pre.src-maxima:before { content: 'Maxima'; }\n pre.src-perl:before { content: 'Perl'; }\n pre.src-picolisp:before { content: 'Pico Lisp'; }\n pre.src-scala:before { content: 'Scala'; }\n pre.src-shell:before { content: 'Shell Script'; }\n pre.src-ebnf2ps:before { content: 'ebfn2ps'; }\n /* additional language identifiers per \"defun org-babel-execute\"\n in ob-*.el */\n pre.src-cpp:before { content: 'C++'; }\n pre.src-abc:before { content: 'ABC'; }\n pre.src-coq:before { content: 'Coq'; }\n pre.src-groovy:before { content: 'Groovy'; }\n /* additional language identifiers from org-babel-shell-names in\n ob-shell.el: ob-shell is the only babel language using a lambda to put\n the execution function name together. */\n pre.src-bash:before { content: 'bash'; }\n pre.src-csh:before { content: 'csh'; }\n pre.src-ash:before { content: 'ash'; }\n pre.src-dash:before { content: 'dash'; }\n pre.src-ksh:before { content: 'ksh'; }\n pre.src-mksh:before { content: 'mksh'; }\n pre.src-posh:before { content: 'posh'; }\n /* Additional Emacs modes also supported by the LaTeX listings package */\n pre.src-ada:before { content: 'Ada'; }\n pre.src-asm:before { content: 'Assembler'; }\n pre.src-caml:before { content: 'Caml'; }\n pre.src-delphi:before { content: 'Delphi'; }\n pre.src-html:before { content: 'HTML'; }\n pre.src-idl:before { content: 'IDL'; }\n pre.src-mercury:before { content: 'Mercury'; }\n pre.src-metapost:before { content: 'MetaPost'; }\n pre.src-modula-2:before { content: 'Modula-2'; }\n pre.src-pascal:before { content: 'Pascal'; }\n pre.src-ps:before { content: 'PostScript'; }\n pre.src-prolog:before { content: 'Prolog'; }\n pre.src-simula:before { content: 'Simula'; }\n pre.src-tcl:before { content: 'tcl'; }\n pre.src-tex:before { content: 'TeX'; }\n pre.src-plain-tex:before { content: 'Plain TeX'; }\n pre.src-verilog:before { content: 'Verilog'; }\n pre.src-vhdl:before { content: 'VHDL'; }\n pre.src-xml:before { content: 'XML'; }\n pre.src-nxml:before { content: 'XML'; }\n /* add a generic configuration mode; LaTeX export needs an additional\n (add-to-list 'org-latex-listings-langs '(conf \" \")) in .emacs */\n pre.src-conf:before { content: 'Configuration File'; }\n\n table { border-collapse:collapse; }\n caption.t-above { caption-side: top; }\n caption.t-bottom { caption-side: bottom; }\n td, th { vertical-align:top; }\n th.org-right { text-align: center; }\n th.org-left { text-align: center; }\n th.org-center { text-align: center; }\n td.org-right { text-align: right; }\n td.org-left { text-align: left; }\n td.org-center { text-align: center; }\n dt { font-weight: bold; }\n .footpara { display: inline; }\n .footdef { margin-bottom: 1em; }\n .figure { padding: 1em; }\n .figure p { text-align: center; }\n .inlinetask {\n padding: 10px;\n border: 2px solid gray;\n margin: 10px;\n background: #ffffcc;\n }\n #org-div-home-and-up\n { text-align: right; font-size: 70%; white-space: nowrap; }\n textarea { overflow-x: auto; }\n .linenr { font-size: smaller }\n .code-highlighted { background-color: #ffff00; }\n .org-info-js_info-navigation { border-style: none; }\n #org-info-js_console-label\n { font-size: 10px; font-weight: bold; white-space: nowrap; }\n .org-info-js_search-highlight\n { background-color: #ffff00; color: #000000; font-weight: bold; }\n .org-svg { width: 90%; }\n /*]]>*/-->\n</style>" (#$ . 10015)) | |
| 34 | (custom-declare-group 'org-export-html nil "Options for exporting Org mode files to HTML." :tag "Org Export HTML" :group 'org-export) | |
| 35 | #@59 JavaScript options, long form for script, default values. | |
| 36 | (defvar org-html-infojs-opts-table '((path PATH "https://orgmode.org/org-info.js") (view VIEW "info") (toc TOC :with-toc) (ftoc FIXED_TOC "0") (tdepth TOC_DEPTH "max") (sdepth SECTION_DEPTH "max") (mouse MOUSE_HINT "underline") (buttons VIEW_BUTTONS "0") (ltoc LOCAL_TOC "1") (up LINK_UP :html-link-up) (home LINK_HOME :html-link-home)) (#$ . 17559)) | |
| 37 | (byte-code "\301\302\303\304\305DD\306\307\310\311\312\313\314\315\316& \210\301\317\303\304\320DD\321\307\310\311\312\313\322\315\323\324\325\326\325\327\330\"BBBBB& \210\301\331\303\304\332DD\333\307\310\311\312\313\334\315\335& \207" [org-html-infojs-opts-table custom-declare-variable org-html-use-infojs funcall function #[0 "\300\207" [when-configured] 1] "Non-nil when Sebastian Rose's Java Script org-info.js should be active.\nThis option can be nil or t to never or always use the script.\nIt can also be the symbol `when-configured', meaning that the\nscript will be linked into the export file if and only if there\nis a \"#+INFOJS_OPT:\" line in the buffer. See also the variable\n`org-html-infojs-options'." :group org-export-html :version "24.4" :package-version (Org . "8.0") :type (choice (const :tag "Never" nil) (const :tag "When configured in buffer" when-configured) (const :tag "Always" t)) org-html-infojs-options #[0 "\301\302\"\207" [org-html-infojs-opts-table mapcar #[257 "\211@\3008B\207" [2] 4 "\n\n(fn X)"]] 3] "Options settings for the INFOJS JavaScript.\nEach of the options must have an entry in `org-html-infojs-opts-table'.\nThe value can either be a string that will be passed to the script, or\na property. This property is then assumed to be a property that is defined\nby the Export/Publishing setup of Org.\nThe `sdepth' and `tdepth' parameters can also be set to \"max\", which\nmeans to use the maximum value consistent with other options." (Org . "8.0") set :greedy t :inline mapcar #[257 "\300\301@D\302E\207" [cons const (choice (symbol :tag "Publishing/Export property") (string :tag "Value"))] 4 "\n\n(fn X)"] org-html-infojs-template #[0 "\300\207" [#1="<script type=\"text/javascript\" src=\"%SCRIPT_PATH\">\n/**\n *\n * @source: %SCRIPT_PATH\n *\n * @licstart The following is the entire license notice for the\n * JavaScript code in %SCRIPT_PATH.\n *\n * Copyright (C) 2012-2018 Free Software Foundation, Inc.\n *\n *\n * The JavaScript code in this tag is free software: you can\n * redistribute it and/or modify it under the terms of the GNU\n * General Public License (GNU GPL) as published by the Free Software\n * Foundation, either version 3 of the License, or (at your option)\n * any later version. The code is distributed WITHOUT ANY WARRANTY;\n * without even the implied warranty of MERCHANTABILITY or FITNESS\n * FOR A PARTICULAR PURPOSE. See the GNU GPL for more details.\n *\n * As additional permission under GNU GPL version 3 section 7, you\n * may distribute non-source (e.g., minimized or compacted) forms of\n * that code without the copy of the GNU GPL normally required by\n * section 4, provided you include this license notice and a URL\n * through which recipients can access the Corresponding Source.\n *\n * @licend The above is the entire license notice\n * for the JavaScript code in %SCRIPT_PATH.\n *\n */\n</script>\n\n<script type=\"text/javascript\">\n\n/*\n@licstart The following is the entire license notice for the\nJavaScript code in this tag.\n\nCopyright (C) 2012-2018 Free Software Foundation, Inc.\n\nThe JavaScript code in this tag is free software: you can\nredistribute it and/or modify it under the terms of the GNU\nGeneral Public License (GNU GPL) as published by the Free Software\nFoundation, either version 3 of the License, or (at your option)\nany later version. The code is distributed WITHOUT ANY WARRANTY;\nwithout even the implied warranty of MERCHANTABILITY or FITNESS\nFOR A PARTICULAR PURPOSE. See the GNU GPL for more details.\n\nAs additional permission under GNU GPL version 3 section 7, you\nmay distribute non-source (e.g., minimized or compacted) forms of\nthat code without the copy of the GNU GPL normally required by\nsection 4, provided you include this license notice and a URL\nthrough which recipients can access the Corresponding Source.\n\n\n@licend The above is the entire license notice\nfor the JavaScript code in this tag.\n*/\n\n<!--/*--><![CDATA[/*><!--*/\n%MANAGER_OPTIONS\norg_html_manager.setup(); // activate after the parameters are set\n/*]]>*///-->\n</script>"] 1 #1#] "The template for the export style additions when org-info.js is used.\nOption settings will replace the %MANAGER-OPTIONS cookie." (Org . "8.0") string] 19) | |
| 38 | #@172 Install script in export options when appropriate. | |
| 39 | EXP-PLIST is a plist containing export options. BACKEND is the | |
| 40 | export back-end currently used. | |
| 41 | ||
| 42 | (fn EXP-PLIST BACKEND) | |
| 43 | (defalias 'org-html-infojs-install-script #[514 "\301\302\303\">\206/ \302\304\"?\206/ \302\304\"\305=\205/ \302\306\"\211?\206- \211\307\230\206- \310\311\"\262?\205t\302\312\"\302\313\"\302\314\"\211\250\203K ^\202L \302\306\"\302\315\"\316\211\203\211@\211@A@\236A\2119\203| \211\317>\204| \302\"\202} \211\262\203\227 \310\320\321\"\n\"\203\227 \322\323\n\"\202\230 \211\324\267\202\317 \325\326\327\211%\262\202\330!\250\203\330!\f^\262\f\202\330!\250\203\330! ^\262 \202\211\327=\204\333 \211\331\232\203\337 \332\202\374 \211\316=\204\353 \211\333\232\203\357 \334\202\374 \211;\203\370 \211\202\374 \320\335\"\262BB\262\266A\266\202\202Y \210\336 \313#\262 ^\262\337BB\262\340\341\342#\262\211\203`\211G\343V\203`\310\344\n\"\203`\345\327\211\f$\211\262\203`\336 \346\302\346\"\206Z\307\342Q#\262 \302 \313\"\204p\336 \313\327#\262 \n\266\211\207" [org-html-infojs-opts-table body-only plist-get :export-options :html-use-infojs when-configured :infojs-opt "" string-match "\\<view:nil\\>" :html-infojs-template :with-toc :headline-levels :html-infojs-options nil (t nil) format "\\<%s:\\(\\S-+\\)" match-string 1 #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (path 158 sdepth 171 tdepth 189)) replace-regexp-in-string "%SCRIPT_PATH" t read "t" "1" "nil" "0" "%s" plist-put "TOC_DEPTH" mapconcat #[257 "\300\301@A#\207" [format "org_html_manager.set(\"%s\", \"%s\");"] 5 "\n\n(fn X)"] "\n" 0 "%MANAGER_OPTIONS" replace-match :html-head-extra] 23 (#$ . 22255)]) | |
| 44 | (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315\316\317& \210\300\320\302\303\321DD\322\306\307\310\311\312\323\314\324& \210\300\325\302\303\326DD\327\306\307\310\311\312\330\314\303& \210\300\331\302\303\332DD\333\306\307\314\334&\210\300\335\302\303\336DD\337\306\307\314\334&\210\300\340\302\303\341DD\342\306\307\314\334&\210\300\343\302\303\344DD\345\306\307\314\346&\210\300\347\302\303\350DD\351\306\307\310\352\312\353\314\303& \210\300\354\302\303\355DD\356\306\307\310\311\312\357\314\324& \210\300\360\302\303\361DD\362\306\307\310\352\312\363\314\303& \210\300\364\302\303\365DD\366\306\307\310\311\312\367\314\370& \210\300\371\302\303\372DD\373\306\307\314\324&\210\300\374\302\303\375DD\376\306\307\310\311\312\377\314\324& \210\300\201@ \302\303\201A DD\201B \306\307\310\311\312\201C \314\201D & \207" [custom-declare-variable org-html-text-markup-alist funcall function #[0 "\300\207" [((bold . "<b>%s</b>") (code . "<code>%s</code>") (italic . "<i>%s</i>") (strike-through . "<del>%s</del>") (underline . "<span class=\"underline\">%s</span>") (verbatim . "<code>%s</code>"))] 1] "Alist of HTML expressions to convert text markup.\n\nThe key must be a symbol among `bold', `code', `italic',\n`strike-through', `underline' and `verbatim'. The value is\na formatting string to wrap fontified text with.\n\nIf no association can be found for a given markup, text will be\nreturned as-is." :group org-export-html :version "24.4" :package-version (Org . "8.0") :type (alist :key-type (symbol :tag "Markup type") :value-type (string :tag "Format string")) :options (bold code italic strike-through underline verbatim) org-html-indent #[0 "\300\207" [nil] 1] "Non-nil means to indent the generated HTML.\nWarning: non-nil may break indentation of source code blocks." (Org . "8.0") boolean org-html-format-drawer-function #[0 "\300\207" [#[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]] 1] "Function called to format a drawer in HTML code.\n\nThe function must accept two parameters:\n NAME the drawer name, like \"LOGBOOK\"\n CONTENTS the contents of the drawer.\n\nThe function should return the string to be exported.\n\nFor example, the variable could be set to the following function\nin order to mimic default behavior:\n\nThe default value simply returns the value of CONTENTS." (Org . "8.0") org-html-footnotes-section #[0 "\300\207" [#1="<div id=\"footnotes\">\n<h2 class=\"footnotes\">%s: </h2>\n<div id=\"text-footnotes\">\n%s\n</div>\n</div>"] 1 #1#] "Format for the footnotes section.\nShould contain a two instances of %s. The first will be replaced with the\nlanguage-specific word for \"Footnotes\", the second one will be replaced\nby the footnotes themselves." string org-html-footnote-format #[0 "\300\207" [#2="<sup>%s</sup>"] 1 #2#] "The format for the footnote reference.\n%s will be replaced by the footnote reference itself." org-html-footnote-separator #[0 "\300\207" [#3="<sup>, </sup>"] 1 #3#] "Text used to separate footnotes." org-html-toplevel-hlevel #[0 "\300\207" [2] 1] "The <H> level for level 1 headings in HTML export.\nThis is also important for the classes that will be wrapped around headlines\nand outline structure. If this variable is 1, the top-level headlines will\nbe <h1>, and the corresponding classes will be outline-1, section-number-1,\nand outline-text-1. If this is 2, all of these will get a 2 instead.\nThe default for this variable is 2, because we use <h1> for formatting the\ndocument title." integer org-html-format-headline-function #[0 "\300\207" [org-html-format-headline-default-function] 1] "Function to format headline text.\n\nThis function will be called with six arguments:\nTODO the todo keyword (string or nil).\nTODO-TYPE the type of todo (symbol: `todo', `done', nil)\nPRIORITY the priority of the headline (integer or nil)\nTEXT the main headline text (string).\nTAGS the tags (string or nil).\nINFO the export options (plist).\n\nThe function result will be used in the section format string." "26.1" (Org . "8.3") org-html-allow-name-attribute-in-anchors #[0 "\300\207" [nil] 1] "When nil, do not set \"name\" attribute in anchors.\nBy default, when appropriate, anchors are formatted with \"id\"\nbut without \"name\" attribute." (Org . "8.0") org-html-format-inlinetask-function #[0 "\300\207" [org-html-format-inlinetask-default-function] 1] "Function called to format an inlinetask in HTML code.\n\nThe function must accept seven parameters:\n TODO the todo keyword, as a string\n TODO-TYPE the todo type, a symbol among `todo', `done' and nil.\n PRIORITY the inlinetask priority, as a string\n NAME the inlinetask name, as a string.\n TAGS the inlinetask tags, as a list of strings.\n CONTENTS the contents of the inlinetask, as a string.\n INFO the export options, as a plist\n\nThe function should return the string to be exported." (Org . "8.3") org-html-with-latex #[0 "\207" [org-export-with-latex] 1] "Non-nil means process LaTeX math snippets.\n\nWhen set, the exporter will process LaTeX environments and\nfragments.\n\nThis option can also be set with the +OPTIONS line,\ne.g. \"tex:mathjax\". Allowed values are:\n\n nil Ignore math snippets.\n `verbatim' Keep everything in verbatim\n `mathjax', t Do MathJax preprocessing and arrange for MathJax.js to\n be loaded.\n SYMBOL Any symbol defined in `org-preview-latex-process-alist',\n e.g., `dvipng'." (Org . "8.0") (choice (const :tag "Do not process math in any way" nil) (const :tag "Leave math verbatim" verbatim) (const :tag "Use MathJax to display math" mathjax) (symbol :tag "Convert to image to display math" :value dvipng)) org-html-link-org-files-as-html #[0 "\300\207" [t] 1] "Non-nil means make file links to `file.org' point to `file.html'.\nWhen `org-mode' is exporting an `org-mode' file to HTML, links to\nnon-html files are directly put into a href tag in HTML.\nHowever, links to other Org files (recognized by the extension\n\".org\") should become links to the corresponding HTML\nfile, assuming that the linked `org-mode' file will also be\nconverted to HTML.\nWhen nil, the links still point to the plain \".org\" file." org-html-inline-images #[0 "\300\207" [t] 1] "Non-nil means inline images into exported HTML pages.\nThis is done using an <img> tag. When nil, an anchor with href is used to\nlink to the image." (Org . "8.1") org-html-inline-image-rules #[0 "\300\207" [(("file" . "\\.\\(jpeg\\|jpg\\|png\\|gif\\|svg\\)\\'") ("http" . "\\.\\(jpeg\\|jpg\\|png\\|gif\\|svg\\)\\'") ("https" . "\\.\\(jpeg\\|jpg\\|png\\|gif\\|svg\\)\\'"))] 1] "Rules characterizing image files that can be inlined into HTML.\nA rule consists in an association whose key is the type of link\nto consider, and value is a regexp that will be matched against\nlink's path." (Org . "8.0") (alist :key-type (string :tag "Type") :value-type (regexp :tag "Path"))] 14) | |
| 45 | #@70 Alist of characters to be converted by `org-html-encode-plain-text'. | |
| 46 | (defvar org-html-protect-char-alist '(("&" . "&") ("<" . "<") (">" . ">")) (#$ . 30999)) | |
| 47 | (byte-code "\301\302\303\304\305DD\306\307\310\311\312&\210\301\313\303\304\314DD\315\307\310\311\316&\210\301\317\303\304\320DD\321\307\310\322\323\324\325\311\326& \210\301\327\303\304\330DD\331\307\310\311\332&\210\301\333\303\304\334DD\335\307\310\311\336&\210\301\337\303\304\340DD\341\307\310\311\342&\210\301\343\303\304\344DD\345\307\310\311\346&\210\301\347\303\304\350DD\351\307\310\311\352&\210\301\353\303\304\354DD\355\307\310\311\352&\210\301\356\303\304\357DD\360\307\310\311\352&\210\301\361\303\304\362DD\363\307\310\311\316&\210\301\364\303\304\365DD\366\307\310\311\316&\210\301\367\303\304\370DD\371\307\310\311\372&\210\301\373\303\304\374DD\375\307\310\322\323\324\376\311\377& \210\301\201@ \303\304\201A DD\201B \307\310\322\323\324\201C \311\201D \201E \201F \201G \"\201H #& \210\301\201I \303\304\201J DD\201K \307\310\322\323\324\201L \311\352& \210\301\201M \303\304\201N DD\201O \307\310\322\323\324\201P \311\316& \210\301\201Q \303\304\201R DD\201S \307\310\322\323\324\201T \311\201U & \207" [org-html-doctype-alist custom-declare-variable org-html-htmlize-output-type funcall function #[0 "\300\207" [inline-css] 1] "Output type to be used by htmlize when formatting code snippets.\nChoices are `css' to export the CSS selectors only,`inline-css'\nto export the CSS attribute values inline in the HTML or `nil' to\nexport plain text. We use as default `inline-css', in order to\nmake the resulting HTML self-containing.\n\nHowever, this will fail when using Emacs in batch mode for export, because\nthen no rich font definitions are in place. It will also not be good if\npeople with different Emacs setup contribute HTML files to a website,\nbecause the fonts will represent the individual setups. In these cases,\nit is much better to let Org/Htmlize assign classes only, and to use\na style file to define the look of these classes.\nTo get a start for your css file, start Emacs session and make sure that\nall the faces you are interested in are defined, for example by loading files\nin all modes you want. Then, use the command\n`\\[org-html-htmlize-generate-css]' to extract class definitions." :group org-export-html :type (choice (const css) (const inline-css) (const nil)) org-html-htmlize-font-prefix #[0 "\300\207" [#1="org-"] 1 #1#] "The prefix for CSS class names for htmlize font specifications." string org-html-table-default-attributes #[0 "\300\207" [(:border "2" :cellspacing "0" :cellpadding "6" :rules "groups" :frame "hsides")] 1] "Default attributes and values which will be used in table tags.\nThis is a plist where attributes are symbols, starting with\ncolons, and values are strings.\n\nWhen exporting to HTML5, these values will be disregarded." :version "24.4" :package-version (Org . "8.0") (plist :key-type (symbol :tag "Property") :value-type (string :tag "Value")) org-html-table-header-tags #[0 "\300\207" [("<th scope=\"%s\"%s>" . "</th>")] 1] "The opening and ending tags for table header fields.\nThis is customizable so that alignment options can be specified.\nThe first %s will be filled with the scope of the field, either row or col.\nThe second %s will be replaced by a style entry to align the field.\nSee also the variable `org-html-table-use-header-tags-for-first-column'.\nSee also the variable `org-html-table-align-individual-fields'." (cons (string :tag "Opening tag") (string :tag "Closing tag")) org-html-table-data-tags #[0 "\300\207" [("<td%s>" . "</td>")] 1] "The opening and ending tags for table data fields.\nThis is customizable so that alignment options can be specified.\nThe first %s will be filled with the scope of the field, either row or col.\nThe second %s will be replaced by a style entry to align the field.\nSee also the variable `org-html-table-align-individual-fields'." (cons (string :tag "Opening tag") (string :tag "Closing tag")) org-html-table-row-open-tag #[0 "\300\207" [#2="<tr>"] 1 #2#] "The opening tag for table rows.\nThis is customizable so that alignment options can be specified.\nInstead of strings, these can be a Lisp function that will be\nevaluated for each row in order to construct the table row tags.\n\nThe function will be called with these arguments:\n\n `number': row number (0 is the first row)\n `group-number': group number of current row\n `start-group?': non-nil means the row starts a group\n `end-group?': non-nil means the row ends a group\n `top?': non-nil means this is the top row\n `bottom?': non-nil means this is the bottom row\n\nFor example:\n\n (setq org-html-table-row-open-tag\n (lambda (number group-number start-group? end-group-p top? bottom?)\n (cond (top? \"<tr class=\\\"tr-top\\\">\")\n (bottom? \"<tr class=\\\"tr-bottom\\\">\")\n (t (if (= (mod number 2) 1)\n \"<tr class=\\\"tr-odd\\\">\"\n \"<tr class=\\\"tr-even\\\">\")))))\n\nwill use the \"tr-top\" and \"tr-bottom\" classes for the top row\nand the bottom row, and otherwise alternate between \"tr-odd\" and\n\"tr-even\" for odd and even rows." (choice :tag "Opening tag" (string :tag "Specify") (function)) org-html-table-row-close-tag #[0 "\300\207" [#3="</tr>"] 1 #3#] "The closing tag for table rows.\nThis is customizable so that alignment options can be specified.\nInstead of strings, this can be a Lisp function that will be\nevaluated for each row in order to construct the table row tags.\n\nSee documentation of `org-html-table-row-open-tag'." (choice :tag "Closing tag" (string :tag "Specify") (function)) org-html-table-align-individual-fields #[0 "\300\207" [t] 1] "Non-nil means attach style attributes for alignment to each table field.\nWhen nil, alignment will only be specified in the column tags, but this\nis ignored by some browsers (like Firefox, Safari). Opera does it right\nthough." boolean org-html-table-use-header-tags-for-first-column #[0 "\300\207" [nil] 1] "Non-nil means format column one in tables with header tags.\nWhen nil, also column one will use data tags." org-html-table-caption-above #[0 "\300\207" [t] 1] "When non-nil, place caption string at the beginning of the table.\nOtherwise, place it near the end." org-html-tag-class-prefix #[0 "\300\207" [#4=""] 1 #4#] "Prefix to class names for TODO keywords.\nEach tag gets a class given by the tag itself, with this prefix.\nThe default prefix is empty because it is nice to just use the keyword\nas a class name. But if you get into conflicts with other, existing\nCSS classes, then this prefix can be very useful." org-html-extension #[0 "\300\207" [#5="html"] 1 #5#] "The extension for exported HTML files." org-html-xml-declaration #[0 "\300\207" [(("html" . "<?xml version=\"1.0\" encoding=\"%s\"?>") ("php" . "<?php echo \"<?xml version=\\\"1.0\\\" encoding=\\\"%s\\\" ?>\"; ?>"))] 1] "The extension for exported HTML files.\n%s will be replaced with the charset of the exported file.\nThis may be a string, or an alist with export extensions\nand corresponding declarations.\n\nThis declaration only applies when exporting to XHTML." (choice (string :tag "Single declaration") (repeat :tag "Dependent on extension" (cons (string :tag "Extension") (string :tag "Declaration")))) org-html-coding-system #[0 "\300\207" [utf-8] 1] "Coding system for HTML export.\nUse utf-8 as the default value." (Org . "8.0") coding-system org-html-doctype #[0 "\300\207" [#6="xhtml-strict"] 1 #6#] "Document type definition to use for exported HTML files.\nCan be set with the in-buffer HTML_DOCTYPE property or for\npublishing, with :html-doctype." (Org . "8.0") append (choice) mapcar #[257 "\300@D\207" [const] 3 "\n\n(fn X)"] ((string :tag "Custom doctype")) org-html-html5-fancy #[0 "\300\207" [nil] 1] "Non-nil means using new HTML5 elements.\nThis variable is ignored for anything other than HTML5 export.\n\nFor compatibility with Internet Explorer, it's probably a good\nidea to download some form of the html5shiv (for instance\nhttps://code.google.com/p/html5shiv/) and add it to your\nHTML_HEAD_EXTRA, so that your pages don't break for users of IE\nversions 8 and below." (Org . "8.0") org-html-container-element #[0 "\300\207" [#7="div"] 1 #7#] "HTML element to use for wrapping top level sections.\nCan be set with the in-buffer HTML_CONTAINER property or for\npublishing, with :html-container.\n\nNote that changing the default will prevent you from using\norg-info.js for your website." (Org . "8.0") org-html-divs #[0 "\300\207" [((preamble "div" "preamble") (content "div" "content") (postamble "div" "postamble"))] 1] "Alist of the three section elements for HTML export.\nThe car of each entry is one of `preamble', `content' or `postamble'.\nThe cdrs of each entry are the ELEMENT_TYPE and ID for each\nsection of the exported document.\n\nNote that changing the default will prevent you from using\norg-info.js for your website." (Org . "8.0") (list :greedy t (list :tag "Preamble" (const :format #4# preamble) (string :tag "element") (string :tag " id")) (list :tag "Content" (const :format #4# content) (string :tag "element") (string :tag " id")) (list :tag "Postamble" (const :format #4# postamble) (string :tag " id") (string :tag "element")))] 16) | |
| 48 | #@369 Alist of checkbox types. | |
| 49 | The cdr of each entry is an alist list three checkbox types for | |
| 50 | HTML export: `on', `off' and `trans'. | |
| 51 | ||
| 52 | The choices are: | |
| 53 | `unicode' Unicode characters (HTML entities) | |
| 54 | `ascii' ASCII characters | |
| 55 | `html' HTML checkboxes | |
| 56 | ||
| 57 | Note that only the ascii characters implement tri-state | |
| 58 | checkboxes. The other two use the `off' checkbox for `trans'. | |
| 59 | (defconst org-html-checkbox-types '((unicode (on . "☑") (off . "☐") (trans . "☐")) (ascii (on . "<code>[X]</code>") (off . "<code>[ ]</code>") (trans . "<code>[-]</code>")) (html (on . "<input type='checkbox' checked='checked' />") (off . "<input type='checkbox' />") (trans . "<input type='checkbox' />"))) (#$ . 40412)) | |
| 60 | (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315& \210\300\316\302\303\317DD\320\306\307\310\311\312\321\314\322& \210\300\323\302\303\324DD\325\306\307\312\326\314\327& \210\300\330\302\303\331DD\332\306\307\314\322&\210\300\333\302\303\334DD\335\306\307\314\336&\210\300\337\302\303\340DD\341\306\307\314\342&\210\300\343\302\303\344DD\345\306\307\314\322&\210\300\346\302\303\347DD\350\306\307\310\311\312\351\314\352& \210\300\353\302\303\354DD\355\306\307\314\356&\210\300\357\302\303\360DD\361\306\307\314\362&\210\300\363\302\303\364DD\365\306\307\314\366&\210\300\367\302\303\370DD\371\306\307\314\372&\210\300\373\302\303\374DD\375\306\307\310\311\312\376\314\377& \210\300\201@ \302\303\201A DD\201B \306\307\314\322&\210\300\201C \302\303\201D DD\201E \306\307\310\311\312\201F \314\377& \210\300\201G \302\303\201H DD\201I \306\307\310\311\312\201J \314\377& \210\201K \201G \201L \201M #\210\300\201N \302\303\201O DD\201P \306\307\310\311\312\201Q \314\322& \210\201K \201N \201L \201R #\210\300\201S \302\303\201T DD\201U \306\307\310\311\312\201V \314\322& \210\201K \201S \201L \201R #\210\300\201W \302\303\201X DD\201Y \306\307\310\201Z \312\201[ \314\201\\ & \210\300\201] \302\303\201^ DD\201_ \306\307\312\201` \314\377& \210\300\201a \302\303\201b DD\201c \306\307\312\201d \314\322& \210\300\201e \302\303\201f DD\201g \306\307\314\322&\210\300\201h \302\303\201i DD\201j \306\307\312\201k \314\322& \210\300\201l \302\303\201m DD\201n \306\307\314\322&\207" [custom-declare-variable org-html-checkbox-type funcall function #[0 "\300\207" [ascii] 1] "The type of checkboxes to use for HTML export.\nSee `org-html-checkbox-types' for for the values used for each\noption." :group org-export-html :version "24.4" :package-version (Org . "8.0") :type (choice (const :tag "ASCII characters" ascii) (const :tag "Unicode characters" unicode) (const :tag "HTML checkboxes" html)) org-html-metadata-timestamp-format #[0 "\300\207" [#1="%Y-%m-%d %a %H:%M"] 1 #1#] "Format used for timestamps in preamble, postamble and metadata.\nSee `format-time-string' for more information on its components." (Org . "8.0") string org-html-mathjax-options #[0 "\300\207" [((path "https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS_HTML") (scale "100") (align "center") (font "TeX") (linebreaks "false") (autonumber "AMS") (indent "0em") (multlinewidth "85%") (tagindent ".8em") (tagside "right"))] 1] "Options for MathJax setup.\n\nAlist of the following elements. All values are strings.\n\npath The path to MathJax.\nscale Scaling with HTML-CSS, MathML and SVG output engines.\nalign How to align display math: left, center, or right.\nfont The font to use with HTML-CSS and SVG output. As of MathJax 2.5\n the following values are understood: \"TeX\", \"STIX-Web\",\n \"Asana-Math\", \"Neo-Euler\", \"Gyre-Pagella\",\n \"Gyre-Termes\", and \"Latin-Modern\".\nlinebreaks Let MathJax perform automatic linebreaks. Valid values\n are \"true\" and \"false\".\nindent If align is not center, how far from the left/right side?\n Valid values are \"left\" and \"right\"\nmultlinewidth The width of the multline environment.\nautonumber How to number equations. Valid values are \"None\",\n \"all\" and \"AMS Math\".\ntagindent The amount tags are indented.\ntagside Which side to show tags/labels on. Valid values are\n \"left\" and \"right\"\n\nYou can also customize this for each buffer, using something like\n\n#+HTML_MATHJAX: align: left indent: 5em tagside: left font: Neo-Euler\n\nFor further information about MathJax options, see the MathJax documentation:\n\n http://docs.mathjax.org/" (Org . "8.3") (list :greedy t (list :tag "path (the path from where to load MathJax.js)" (const :format " " path) (string)) (list :tag "scale (scaling for the displayed math)" (const :format " " scale) (string)) (list :tag "align (alignment of displayed equations)" (const :format " " align) (string)) (list :tag "font (used to display math)" (const :format " " font) (choice (const "TeX") (const "STIX-Web") (const "Asana-Math") (const "Neo-Euler") (const "Gyre-Pagella") (const "Gyre-Termes") (const "Latin-Modern"))) (list :tag "linebreaks (automatic line-breaking)" (const :format " " linebreaks) (choice (const "true") (const "false"))) (list :tag "autonumber (when should equations be numbered)" (const :format " " autonumber) (choice (const "AMS") (const "None") (const "All"))) (list :tag "indent (indentation with left or right alignment)" (const :format " " indent) (string)) (list :tag "multlinewidth (width to use for the multline environment)" (const :format " " multlinewidth) (string)) (list :tag "tagindent (the indentation of tags from left or right)" (const :format " " tagindent) (string)) (list :tag "tagside (location of tags)" (const :format " " tagside) (choice (const "left") (const "right")))) org-html-mathjax-template #[0 "\300\207" [#2="<script type=\"text/x-mathjax-config\">\n MathJax.Hub.Config({\n displayAlign: \"%ALIGN\",\n displayIndent: \"%INDENT\",\n\n \"HTML-CSS\": { scale: %SCALE,\n linebreaks: { automatic: \"%LINEBREAKS\" },\n webFont: \"%FONT\"\n },\n SVG: {scale: %SCALE,\n linebreaks: { automatic: \"%LINEBREAKS\" },\n font: \"%FONT\"},\n NativeMML: {scale: %SCALE},\n TeX: { equationNumbers: {autoNumber: \"%AUTONUMBER\"},\n MultLineWidth: \"%MULTLINEWIDTH\",\n TagSide: \"%TAGSIDE\",\n TagIndent: \"%TAGINDENT\"\n }\n});\n</script>\n<script type=\"text/javascript\"\n src=\"%PATH\"></script>"] 1 #2#] "The MathJax template. See also `org-html-mathjax-options'." org-html-postamble #[0 "\300\207" [auto] 1] "Non-nil means insert a postamble in HTML export.\n\nWhen set to `auto', check against the\n`org-export-with-author/email/creator/date' variables to set the\ncontent of the postamble. When set to a string, use this string\nas the postamble. When t, insert a string as defined by the\nformatting string in `org-html-postamble-format'.\n\nWhen set to a function, apply this function and insert the\nreturned string. The function takes the property list of export\noptions as its only argument.\n\nSetting :html-postamble in publishing projects will take\nprecedence over this variable." (choice (const :tag "No postamble" nil) (const :tag "Auto postamble" auto) (const :tag "Default formatting string" t) (string :tag "Custom formatting string") (function :tag "Function (must return a string)")) org-html-postamble-format #[0 "\300\207" [(("en" "<p class=\"author\">Author: %a (%e)</p>\n<p class=\"date\">Date: %d</p>\n<p class=\"creator\">%c</p>\n<p class=\"validation\">%v</p>"))] 1] "Alist of languages and format strings for the HTML postamble.\n\nThe first element of each list is the language code, as used for\nthe LANGUAGE keyword. See `org-export-default-language'.\n\nThe second element of each list is a format string to format the\npostamble itself. This format string can contain these elements:\n\n %t stands for the title.\n %s stands for the subtitle.\n %a stands for the author's name.\n %e stands for the author's email.\n %d stands for the date.\n %c will be replaced by `org-html-creator-string'.\n %v will be replaced by `org-html-validation-link'.\n %T will be replaced by the export time.\n %C will be replaced by the last modification time.\n\nIf you need to use a \"%\" character, you need to escape it\nlike that: \"%%\"." (repeat (list (string :tag "Language") (string :tag "Format string"))) org-html-validation-link #[0 "\300\207" [#3="<a href=\"http://validator.w3.org/check?uri=referer\">Validate</a>"] 1 #3#] "Link to HTML validation service." org-html-creator-string #[0 "\301\302\303\304!\203 \304 \202 \305#\207" [emacs-version format "<a href=\"https://www.gnu.org/software/emacs/\">Emacs</a> %s (<a href=\"https://orgmode.org\">Org</a> mode %s)" fboundp org-version "unknown version"] 5] "Information about the creator of the HTML document.\nThis option can also be set on with the CREATOR keyword." (Org . "8.0") (string :tag "Creator string") org-html-preamble #[0 "\300\207" [t] 1] "Non-nil means insert a preamble in HTML export.\n\nWhen t, insert a string as defined by the formatting string in\n`org-html-preamble-format'. When set to a string, use this\nformatting string instead (see `org-html-postamble-format' for an\nexample of such a formatting string).\n\nWhen set to a function, apply this function and insert the\nreturned string. The function takes the property list of export\noptions as its only argument.\n\nSetting :html-preamble in publishing projects will take\nprecedence over this variable." (choice (const :tag "No preamble" nil) (const :tag "Default preamble" t) (string :tag "Custom formatting string") (function :tag "Function (must return a string)")) org-html-preamble-format #[0 "\300\207" [(("en" #4=""))] 1] "Alist of languages and format strings for the HTML preamble.\n\nThe first element of each list is the language code, as used for\nthe LANGUAGE keyword. See `org-export-default-language'.\n\nThe second element of each list is a format string to format the\npreamble itself. This format string can contain these elements:\n\n %t stands for the title.\n %s stands for the subtitle.\n %a stands for the author's name.\n %e stands for the author's email.\n %d stands for the date.\n %c will be replaced by `org-html-creator-string'.\n %v will be replaced by `org-html-validation-link'.\n %T will be replaced by the export time.\n %C will be replaced by the last modification time.\n\nIf you need to use a \"%\" character, you need to escape it\nlike that: \"%%\".\n\nSee the default value of `org-html-postamble-format' for an\nexample." (repeat (list (string :tag "Language") (string :tag "Format string"))) org-html-link-up #[0 "\300\207" [#4#] 1 #4#] "Where should the \"UP\" link of exported HTML pages lead?" (string :tag "File or URL") org-html-link-home #[0 "\300\207" [#4#] 1 #4#] "Where should the \"HOME\" link of exported HTML pages lead?" (string :tag "File or URL") org-html-link-use-abs-url #[0 "\300\207" [nil] 1] "Should we prepend relative links with HTML_LINK_HOME?" (Org . "8.1") boolean org-html-home/up-format #[0 "\300\207" [#5="<div id=\"org-div-home-and-up\">\n <a accesskey=\"h\" href=\"%s\"> UP </a>\n |\n <a accesskey=\"H\" href=\"%s\"> HOME </a>\n</div>"] 1 #5#] "Snippet used to insert the HOME and UP links.\nThis is a format string, the first %s will receive the UP link,\nthe second the HOME link. If both `org-html-link-up' and\n`org-html-link-home' are empty, the entire snippet will be\nignored." org-html-head-include-scripts #[0 "\300\207" [t] 1] "Non-nil means include the JavaScript snippets in exported HTML files.\nThe actual script is defined in `org-html-scripts' and should\nnot be modified." (Org . "8.0") org-html-head-include-default-style #[0 "\300\207" [t] 1] "Non-nil means include the default style in exported HTML files.\nThe actual style is defined in `org-html-style-default' and\nshould not be modified. Use `org-html-head' to use your own\nstyle information." (Org . "8.0") put safe-local-variable booleanp org-html-head #[0 "\300\207" [#4#] 1 #4#] "Org-wide head definitions for exported HTML files.\n\nThis variable can contain the full HTML structure to provide a\nstyle, including the surrounding HTML tags. You can consider\nincluding definitions for the following classes: title, todo,\ndone, timestamp, timestamp-kwd, tag, target.\n\nFor example, a valid value would be:\n\n <style type=\"text/css\">\n /*<![CDATA[*/\n p { font-weight: normal; color: gray; }\n h1 { color: black; }\n .title { text-align: center; }\n .todo, .timestamp-kwd { color: red; }\n .done { color: green; }\n /*]]>*/\n </style>\n\nIf you want to refer to an external style, use something like\n\n <link rel=\"stylesheet\" type=\"text/css\" href=\"mystyles.css\" />\n\nAs the value of this option simply gets inserted into the HTML\n<head> header, you can use it to add any arbitrary text to the\nheader.\n\nYou can set this on a per-file basis using #+HTML_HEAD:,\nor for publication projects using the :html-head property." (Org . "8.0") stringp org-html-head-extra #[0 "\300\207" [#4#] 1 #4#] "More head information to add in the HTML output.\n\nYou can set this on a per-file basis using #+HTML_HEAD_EXTRA:,\nor for publication projects using the :html-head-extra property." (Org . "8.0") org-html-viewport #[0 "\300\207" [((width "device-width") (initial-scale "1") (minimum-scale #4#) (maximum-scale #4#) (user-scalable #4#))] 1] "Viewport options for mobile-optimized sites.\n\nThe following values are recognized\n\nwidth Size of the viewport.\ninitial-scale Zoom level when the page is first loaded.\nminimum-scale Minimum allowed zoom level.\nmaximum-scale Maximum allowed zoom level.\nuser-scalable Whether zoom can be changed.\n\nThe viewport meta tag is inserted if this variable is non-nil.\n\nSee the following site for a reference:\nhttps://developer.mozilla.org/en-US/docs/Mozilla/Mobile/Viewport_meta_tag" "26.1" (Org . "8.3") (choice (const :tag "Disable" nil) (list :tag "Enable" (list :tag "Width of viewport" (const :format " " width) (choice (const :tag "unset" #4#) (string))) (list :tag "Initial scale" (const :format " " initial-scale) (choice (const :tag "unset" #4#) (string))) (list :tag "Minimum scale/zoom" (const :format " " minimum-scale) (choice (const :tag "unset" #4#) (string))) (list :tag "Maximum scale/zoom" (const :format " " maximum-scale) (choice (const :tag "unset" #4#) (string))) (list :tag "User scalable/zoomable" (const :format " " user-scalable) (choice (const :tag "unset" #4#) (const "true") (const "false"))))) org-html-klipsify-src #[0 "\300\207" [nil] 1] "When non-nil, source code blocks are editable in exported presentation." (Org . "9.1") org-html-klipse-css #[0 "\300\207" [#6="https://storage.googleapis.com/app.klipse.tech/css/codemirror.css"] 1 #6#] "Location of the codemirror CSS file for use with klipse." (Org . "9.1") org-html-klipse-js #[0 "\300\207" [#7="https://storage.googleapis.com/app.klipse.tech/plugin_prod/js/klipse_plugin.min.js"] 1 #7#] "Location of the klipse javascript file." org-html-klipse-selection-script #[0 "\300\207" [#8="window.klipse_settings = {selector_eval_html: '.src-html',\n selector_eval_js: '.src-js',\n selector_eval_python_client: '.src-python',\n selector_eval_scheme: '.src-scheme',\n selector: '.src-clojure',\n selector_eval_ruby: '.src-ruby'};"] 1 #8#] "Javascript snippet to activate klipse." (Org . "9.1") org-html-todo-kwd-class-prefix #[0 "\300\207" [#4#] 1 #4#] "Prefix to class names for TODO keywords.\nEach TODO keyword gets a class given by the keyword itself, with this prefix.\nThe default prefix is empty because it is nice to just use the keyword\nas a class name. But if you get into conflicts with other, existing\nCSS classes, then this prefix can be very useful."] 12) | |
| 61 | #@13 | |
| 62 | ||
| 63 | (fn INFO) | |
| 64 | (defalias 'org-html-xhtml-p #[257 "\301\302\"\227\303\304\305\306#)\266\203\207" [inhibit-changing-match-data plist-get :html-doctype "xhtml" nil t string-match] 9 (#$ . 56647)]) | |
| 65 | #@13 | |
| 66 | ||
| 67 | (fn INFO) | |
| 68 | (defalias 'org-html-html5-p #[257 "\300\301\"\227\211\302\235\207" [plist-get :html-doctype ("html5" "xhtml5" "<!doctype html>")] 4 (#$ . 56850)]) | |
| 69 | #@126 Non-nil when exporting to HTML5 with fancy elements. | |
| 70 | INFO is the current state of the export process, as a plist. | |
| 71 | ||
| 72 | (fn INFO) | |
| 73 | (defalias 'org-html--html5-fancy-p #[257 "\300\301\"\205\n \302!\207" [plist-get :html-html5-fancy org-html-html5-p] 4 (#$ . 57017)]) | |
| 74 | #@150 Return close-tag for string TAG. | |
| 75 | ATTR specifies additional attributes. INFO is a property list | |
| 76 | containing current export state. | |
| 77 | ||
| 78 | (fn TAG ATTR INFO) | |
| 79 | (defalias 'org-html-close-tag #[771 "\300\301\302P!\303!\203 \304\202 \305R\207" ["<" org-string-nw-p " " org-html-xhtml-p " />" ">"] 8 (#$ . 57285)]) | |
| 80 | #@243 Return correct HTML doctype tag. | |
| 81 | INFO is a plist used as a communication channel. Doctype tag is | |
| 82 | extracted from `org-html-doctype-alist', or the literal value | |
| 83 | of :html-doctype from INFO if :html-doctype is not found in the | |
| 84 | alist. | |
| 85 | ||
| 86 | (fn INFO) | |
| 87 | (defalias 'org-html-doctype #[257 "\301\302\"\303\"A\206 \211\207" [org-html-doctype-alist plist-get :html-doctype assoc] 5 (#$ . 57597)]) | |
| 88 | #@186 Return a list of attributes, as a string. | |
| 89 | ATTRIBUTES is a plist where values are either strings or nil. An | |
| 90 | attribute with a nil value will be omitted from the result. | |
| 91 | ||
| 92 | (fn ATTRIBUTES) | |
| 93 | (defalias 'org-html--make-attribute-string #[257 "\300\211\203> \211@\211\204 A\262\2027 \2119\203% \301!\302\300OB\262\2027 @\303\304\305\306!#\307\310#\240\266A\266\202\202 \311\312\237\313#\262\207" [nil symbol-name 1 replace-regexp-in-string "\"" """ org-html-encode-plain-text format "%s=\"%s\"" mapconcat identity " "] 11 (#$ . 57989)]) | |
| 94 | #@256 Wrap CONTENTS string within an appropriate environment for images. | |
| 95 | INFO is a plist used as a communication channel. When optional | |
| 96 | arguments CAPTION and LABEL are given, use them for caption and | |
| 97 | "id" attribute. | |
| 98 | ||
| 99 | (fn CONTENTS INFO &optional CAPTION LABEL) | |
| 100 | (defalias 'org-html--wrap-image #[1026 "\300!\301\203\f \302\202 \303\304!\203 \301\305\"\202 \306\203$ \202) \301\307 \"\304!\2044 \306\202A \301\203= \310\202> \311\"$\207" [org-html--html5-fancy-p format "\n<figure%s>\n%s%s\n</figure>" "\n<div%s class=\"figure\">\n%s%s\n</div>" org-string-nw-p " id=\"%s\"" "" "<p>%s</p>" "\n<figcaption>%s</figcaption>" "\n<p>%s</p>"] 12 (#$ . 58546)]) | |
| 101 | #@255 Return "img" tag with given SOURCE and ATTRIBUTES. | |
| 102 | SOURCE is a string specifying the location of the image. | |
| 103 | ATTRIBUTES is a plist, as returned by | |
| 104 | `org-export-read-attribute'. INFO is a plist used as | |
| 105 | a communication channel. | |
| 106 | ||
| 107 | (fn SOURCE ATTRIBUTES INFO) | |
| 108 | (defalias 'org-html--format-image #[771 "\301!\302\230\203 \303#\207\304\305\306\307\310\311\312\n\313\314\315#)\266\203\2031 \316\317\320\f\"!\2025 \321\n!F\"!#\207" [inhibit-changing-match-data file-name-extension "svg" org-html--svg-image org-html-close-tag "img" org-html--make-attribute-string org-combine-plists :src :alt "^ltxpng/" nil t string-match org-html-encode-plain-text org-find-text-property-in-string org-latex-src file-name-nondirectory] 17 (#$ . 59215)]) | |
| 109 | #@389 Return "object" embedding svg file SOURCE with given ATTRIBUTES. | |
| 110 | INFO is a plist used as a communication channel. | |
| 111 | ||
| 112 | The special attribute "fallback" can be used to specify a | |
| 113 | fallback image file to use if the object embedding is not | |
| 114 | supported. CSS class "org-svg" is assigned as the class of the | |
| 115 | object unless a different class is specified with an attribute. | |
| 116 | ||
| 117 | (fn SOURCE ATTRIBUTES INFO) | |
| 118 | (defalias 'org-html--svg-image #[771 "\300\301\"\302\303\304\305#!\306\307\203# \310\311\306\312 # #\202$ \313$\207" [plist-get :fallback org-html--make-attribute-string org-combine-plists (:class "org-svg") (:fallback nil) format "<object type=\"image/svg+xml\" data=\"%s\" %s>\n%s</object>" org-html-close-tag "img" "src=\"%s\" %s" "Sorry, your browser does not support SVG."] 15 (#$ . 59967)]) | |
| 119 | #@107 Transcode ELEMENT into a textarea block. | |
| 120 | ELEMENT is either a src block or an example block. | |
| 121 | ||
| 122 | (fn ELEMENT) | |
| 123 | (defalias 'org-html--textarea-block #[257 "\300!@\301\302\"\303\304\305\306\"\206 \307\305\310\"\206 \311!$\207" [org-export-unravel-code org-export-read-attribute :attr_html format "<p>\n<textarea cols=\"%s\" rows=\"%s\">\n%s</textarea>\n</p>" plist-get :width 80 :height org-count-lines] 9 (#$ . 60769)]) | |
| 124 | #@266 Non-nil when ELEMENT has a caption affiliated keyword. | |
| 125 | INFO is a plist used as a communication channel. This function | |
| 126 | is meant to be used as a predicate for `org-export-get-ordinal' or | |
| 127 | a value to `org-html-standalone-image-predicate'. | |
| 128 | ||
| 129 | (fn ELEMENT &optional INFO) | |
| 130 | (defalias 'org-html--has-caption-p #[513 "\300\211;\203 \301\302#\202 \303A@\"\207" [:caption get-text-property 0 plist-get] 8 (#$ . 61197)]) | |
| 131 | #@191 Convert the region between BEG and END to HTML, using htmlize.el. | |
| 132 | This is much like `htmlize-region-for-paste', only that it uses | |
| 133 | the settings define in the org-... variables. | |
| 134 | ||
| 135 | (fn BEG END) | |
| 136 | (defalias 'org-html-htmlize-region-for-paste #[514 "\n\305\"\306\307\310\311\312!\313\"\314$\216r\211q\210\315\f\316\"\315\f\317\"{,\207" [org-html-htmlize-output-type htmlize-output-type org-html-htmlize-font-prefix htmlize-css-name-prefix htmlize-buffer-places htmlize-region make-byte-code 0 "\301\300!\207" vconcat vector [kill-buffer] 2 plist-get content-start content-end] 9 (#$ . 61618)]) | |
| 137 | #@545 Create the CSS for all font definitions in the current Emacs session. | |
| 138 | Use this to create face definitions in your CSS style file that can then | |
| 139 | be used by code snippets transformed by htmlize. | |
| 140 | This command just produces a buffer that contains class definitions for all | |
| 141 | faces used in the current Emacs session. You can copy and paste the ones you | |
| 142 | need into your CSS file. | |
| 143 | ||
| 144 | If you then set `org-html-htmlize-output-type' to `css', calls | |
| 145 | to the function `org-html-htmlize-region-for-paste' will | |
| 146 | produce code that uses these same face definitions. | |
| 147 | (defalias 'org-html-htmlize-generate-css #[0 "\302\303\304\305#\204\f \306\307!\210\310\311!\203 \312\311!\210\313\314!r\211q\210\315\316\317\320\321!\322\"\323$\216\324 \325\326\304\211\211A\262\242\262\205C \327\330\"\211\262\203d 9\2033 \211\203W \211<\2043 \331\332\333!\304\334$c\210\2023 \335ed\"\210*\266*\210\336\311!\210eb\210\337\340\304\305#\203\202 e\316\224|\210\337\341\304\305#\203\220 \316\225Td|\210\342\343!\210\344\345!\203\236 \346\347!\210eb\207" [htmlize-output-type htmlize-css-name-prefix require htmlize nil t error "Please install htmlize from https://github.com/hniksic/emacs-htmlize" get-buffer "*html*" kill-buffer generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 face-list "org-" css face-attribute :inherit org-add-props copy-sequence "1" face htmlize-region pop-to-buffer-same-window re-search-forward "<style" "</style>" beginning-of-line 1 looking-at " +" replace-match ""] 11 (#$ . 62217) nil]) | |
| 148 | #@64 Build a string by concatenating N times STRING. | |
| 149 | ||
| 150 | (fn N STRING) | |
| 151 | (defalias 'org-html--make-string #[514 "\300\301\211W\203 \211P\262\210\211T\262\202 \211\262\266\202\207" [nil 0] 8 (#$ . 63784)]) | |
| 152 | #@96 Turn todo keyword KWD into a valid class name. | |
| 153 | Replaces invalid characters with "_". | |
| 154 | ||
| 155 | (fn KWD) | |
| 156 | (defalias 'org-html-fix-class-name #[257 "\300\301\302\303\304%\207" [replace-regexp-in-string "[^a-zA-Z0-9_]" "_" nil t] 7 (#$ . 63995)]) | |
| 157 | #@90 Format the footnote section. | |
| 158 | INFO is a plist used as a communication channel. | |
| 159 | ||
| 160 | (fn INFO) | |
| 161 | (defalias 'org-html-footnote-section #[257 "\300!\211\301\211\211\211\211:\203\214 @\262\211A\262\242\262\211A\262\242\262@\262\211:\2046 \211;\205> \302\202> \211@9\205> \211@\262\303=\203b \304\n\"\301\305\203T \306\202U \307\310\305\311\310##\266\202\202\200 \312\313\304\f\"\301\305\203t \306\202u \307\310\305\311\310##\266\202\"BB\262A\262\202 \211\237\266\206\211\205\264 \312\314\315\"\316\317\"\312\320\321\322\323\324\325\326 !\327\"\330\331%\332#\"#\207" [org-export-collect-footnote-definitions nil plain-text org-data org-export-data replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" format "<div class=\"footpara\">%s</div>" plist-get :html-footnotes-section org-html--translate "Footnotes" "\n%s\n" mapconcat make-byte-code 257 "\211@A\301\302\301\303\300\304\"\305\301\306\"\301\307\n\"\300$\"#\207" vconcat vector [format "<div class=\"footdef\">%s %s</div>\n" plist-get :html-footnote-format org-html--anchor "fn.%d" " class=\"footnum\" href=\"#fnr.%d\""] 13 "\n\n(fn FN)" "\n"] 20 (#$ . 64236)]) | |
| 162 | #@101 Return meta tags for exported document. | |
| 163 | INFO is a plist used as a communication channel. | |
| 164 | ||
| 165 | (fn INFO) | |
| 166 | (defalias 'org-html--build-meta-info #[257 "\302\303\304\305\"\"\306!\203 \211\202 \307\304\310\"\205/ \304\311\"\211\205- \312\313\314B\315 $!\262\304\316\"\304\317\" \203I \320\321!\203I \321 \322\"\206J \323\304\324\"\205\\ \325\326\304\n\327\"\330Q!\331\332\n!\203m \333\334\335\f#\202s \333\334\336\f#\"\337\340\341\304 \342\"\"\211\205\222 \333\334\331\343\344\345\346#\"#\337P\262\331\347\n\"\333\334\350#\337\306 !\205\266 \333\334\331\351!\"#\337P\306 !\205\314 \333\334\331\352!\"#\337P\306 !\205\342 \333\334\331\353!\"#\337P\260\n\207" [org-element-all-objects org-html-coding-system #[257 "\300\301\302\303!#\207" [replace-regexp-in-string "\"" """ org-html-encode-plain-text] 6 "\n\n(fn STR)"] org-export-data plist-get :title org-string-nw-p "‎" :with-author :author org-element-interpret-data org-element-map plain-text identity :description :keywords fboundp coding-system-get mime-charset "iso-8859-1" :time-stamp-file format-time-string "<!-- " :html-metadata-timestamp-format " -->\n" format org-html-html5-p org-html-close-tag "meta" "charset=\"%s\"" "http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"" "\n" cl-remove-if-not #[257 "\300A@!\207" [org-string-nw-p] 3 "\n\n(fn CELL)"] :html-viewport "name=\"viewport\" content=\"%s\"" mapconcat #[257 "\300\301@A@#\207" [format "%s=%s"] 5 "\n\n(fn ELM)"] ", " "<title>%s</title>\n" "name=\"generator\" content=\"Org mode\"" "name=\"author\" content=\"%s\"" "name=\"description\" content=\"%s\"\n" "name=\"keywords\" content=\"%s\""] 23 (#$ . 65417)]) | |
| 167 | #@124 Return information for the <head>..</head> of the HTML output. | |
| 168 | INFO is a plist used as a communication channel. | |
| 169 | ||
| 170 | (fn INFO) | |
| 171 | (defalias 'org-html--build-head #[257 "\303\304\305\"\205 \303!\303\304\306\"!\303\304\307\"!\304\310\"\2051 \311=\2051 \312\313\314\315\304 \310\"\"#\304\316\"\205: \n\260!\207" [org-html-style-default org-html-htmlize-output-type org-html-scripts org-element-normalize-string plist-get :html-head-include-default-style :html-head :html-head-extra :html-htmlized-css-url css org-html-close-tag "link" format "rel=\"stylesheet\" href=\"%s\" type=\"text/css\"" :html-head-include-scripts] 12 (#$ . 67118)]) | |
| 172 | #@110 Insert the user setup into the mathjax template. | |
| 173 | INFO is a plist used as a communication channel. | |
| 174 | ||
| 175 | (fn INFO) | |
| 176 | (defalias 'org-html--build-mathjax-config #[257 "\300\301\"\302>\205\200 \303\300\304\"\305\306\307\310\307&\205\200 \300\311\"\300\312\"\300\313\"\206) \314\211\203y \211@\211@A@\315\316\317!\320Q\"\203L \321\322\225\310O!@\262\211;\204W \323\324\"\262\315\325\317!\226P\"\203p \326\307\211\n$\262\202W \266A\266\202\202* \327!\262\266\203\207" [plist-get :with-latex (mathjax t) org-element-map :parse-tree (latex-fragment latex-environment) identity t nil :html-mathjax-template :html-mathjax-options :html-mathjax "" string-match "\\<" symbol-name ":" read-from-string 0 format "%s" "%" replace-match org-element-normalize-string] 13 (#$ . 67767)]) | |
| 177 | #@117 Return format specification for preamble and postamble. | |
| 178 | INFO is a plist used as a communication channel. | |
| 179 | ||
| 180 | (fn INFO) | |
| 181 | (defalias 'org-html-format-spec #[257 "\300\301\"\302\303\300\304\"\"B\305\303\300\306\"\"B\307\303\310\"\"B\311\312!B\313\303\300\314\"\"B\315\316\317\320\300 \321\"\322\"\323#B\324\300 \325\"B\326\300\n\327\"\312\n\205Y \330\331!8\"\262B\332\300 \333\"\206g \334B\257 \207" [plist-get :html-metadata-timestamp-format 116 org-export-data :title 115 :subtitle 100 org-export-get-date 84 format-time-string 97 :author 101 mapconcat #[257 "\300\301\211#\207" [format "<a href=\"mailto:%s\">%s</a>"] 5 "\n\n(fn E)"] split-string :email ",+ *" ", " 99 :creator 67 :input-file 5 file-attributes 118 :html-validation-link ""] 16 (#$ . 68562)]) | |
| 182 | #@167 Return document preamble or postamble as a string, or nil. | |
| 183 | TYPE is either `preamble' or `postamble', INFO is a plist used as a | |
| 184 | communication channel. | |
| 185 | ||
| 186 | (fn TYPE INFO) | |
| 187 | (defalias 'org-html--build-pre/postamble #[514 "\301\302\303\304\"!\"\305!\205\306!\203 !\202\341 ;\203) \307\"\202\341 \310=\203\273 \311\236A\312\236A\313\236A\314\236A\315\236A\301\316\"\205[ \317!\205[ \303\320\321\322 \"#\301 \323\"\205s \317!\205s \303\324\321\325\f\"#\301\n\326\"\205\213 \317!\205\213 \303\327\321\330 \"#\301 \331\"\205\242 \303\320\321\332\"\333\301\334\"!#\301\f\335\"\205\257 \303\336\"\303\337\"\260\266\205\202\341 \301\340=\203\307 \341\202\310 \342\"\301\343\"\307\344\345#\206\333 \344\346\345#A@\"\266\202\301\347\"\236\317!\205\303\350A@\3518$\352!\303\353A@\"Q\262\262\207" [org-html--pre/postamble-class plist-get intern format ":html-%s" org-html-format-spec functionp format-spec auto 100 97 101 99 118 :with-date org-string-nw-p "<p class=\"date\">%s: %s</p>\n" org-html--translate "Date" :with-author "<p class=\"author\">%s: %s</p>\n" "Author" :with-email "<p class=\"email\">%s: %s</p>\n" "Email" :time-stamp-file "Created" format-time-string :html-metadata-timestamp-format :with-creator "<p class=\"creator\">%s</p>\n" "<p class=\"validation\">%s</p>\n" preamble :html-preamble-format :html-postamble-format :language assoc-string t "en" :html-divs "<%s id=\"%s\" class=\"%s\">\n" 2 org-element-normalize-string "</%s>\n"] 19 (#$ . 69348)]) | |
| 188 | #@160 Return body of document string after HTML conversion. | |
| 189 | CONTENTS is the transcoded contents string. INFO is a plist | |
| 190 | holding export options. | |
| 191 | ||
| 192 | (fn CONTENTS INFO) | |
| 193 | (defalias 'org-html-inner-template #[514 "\300\301\"\211\205\f \302\"\262\303!Q\207" [plist-get :with-toc org-html-toc org-html-footnote-section] 6 (#$ . 70874)]) | |
| 194 | #@161 Return complete document string after HTML conversion. | |
| 195 | CONTENTS is the transcoded contents string. INFO is a plist | |
| 196 | holding export options. | |
| 197 | ||
| 198 | (fn CONTENTS INFO) | |
| 199 | (defalias 'org-html-template #[514 "\303!?\205T \304!\205T \305\306\"\211;\203 \211\206. \307\305\310\"\"A\206. \307\311\"A\206. \312\211?\2066 \211\312\230?\205R \313\314\313\203O \315\316!\203O \316\317\"\206P \320\"\"\266\202\321!\322\323\304!\203o \313\324\305\325\"\305\325\"#\202} \303!\205} \313\326\305\325\"\"\327Q\330\331!\332!\333!\334\335\305 \336\"\337\340\203\235 \341\202\236 \342\312\340\343\312##\266\202\305\f\344\"\337\340\203\267 \341\202\270 \342\312\340\343\312##\266\202\312\230\205\313 \211\312\230?\205\340 \313\305\345\"\206\332 \206\337 #\266\202\346\347 \"\350\305\351\"\236\313\352A@\3538#\262\305\354\"\205O\305\354\"\205\305\355\"\305\356\"\357!\205M\313\203$\360\202%\361\362\"\203K\313\2037\363\202A\322\364\365\337#\322\366R\362\"\"\202L\312#\266\203\313\367\350\305\351\"\236A@\"\346\370\"\305\371\"\205w\372\305\373\"\374 \375\n\376\260\377\260\207" [org-html-coding-system org-html-klipse-js org-html-klipse-css org-html-html5-p org-html-xhtml-p plist-get :html-xml-declaration assoc :html-extension "html" "" format "%s\n" fboundp coding-system-get mime-charset "iso-8859-1" org-html-doctype "\n" "<html" " xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"%s\" xml:lang=\"%s\"" :language " lang=\"%s\"" ">\n" "<head>\n" org-html--build-meta-info org-html--build-head org-html--build-mathjax-config "</head>\n" "<body>\n" :html-link-up nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'" :html-link-home :html-home/up-format org-html--build-pre/postamble preamble content :html-divs "<%s id=\"%s\">\n" 2 :with-title :title :subtitle org-html--html5-fancy-p "<header>\n<h1 class=\"title\">%s</h1>\n%s</header>" "<h1 class=\"title\">%s%s</h1>\n" org-export-data "<p class=\"subtitle\">%s</p>\n" org-html-close-tag "br" "<span class=\"subtitle\">%s</span>\n" "</%s>\n" postamble :html-klipsify-src "<script>" :html-klipse-selection-script "</script><script src=\"" "\"></script><link rel=\"stylesheet\" type=\"text/css\" href=\"" "\"/>" "</body>\n</html>"] 27 (#$ . 71209)]) | |
| 200 | #@115 Translate string S according to specified language. | |
| 201 | INFO is a plist used as a communication channel. | |
| 202 | ||
| 203 | (fn S INFO) | |
| 204 | (defalias 'org-html--translate #[514 "\300\301#\207" [org-export-translate :html] 6 (#$ . 73499)]) | |
| 205 | #@53 Format a HTML anchor. | |
| 206 | ||
| 207 | (fn ID DESC ATTRIBUTES INFO) | |
| 208 | (defalias 'org-html--anchor #[1028 "\300\301\"\205 \205 \302\303\"\205 \302\304\"Q\302\305\206$ \306#\207" [plist-get :html-allow-name-attribute-in-anchors format " id=\"%s\"" " name=\"%s\"" "<a%s>%s</a>" ""] 10 (#$ . 73720)]) | |
| 209 | #@49 Format TODO keywords into HTML. | |
| 210 | ||
| 211 | (fn TODO INFO) | |
| 212 | (defalias 'org-html--todo #[514 "\205 \301\302\235\203 \303\202 \304\305\306\"\206 \307\310!%\207" [org-done-keywords format "<span class=\"%s %s%s\">%s</span>" "done" "todo" plist-get :html-todo-kwd-class-prefix "" org-html-fix-class-name] 8 (#$ . 74019)]) | |
| 213 | #@149 Format a priority into HTML. | |
| 214 | PRIORITY is the character code of the priority or nil. INFO is | |
| 215 | a plist containing export options. | |
| 216 | ||
| 217 | (fn PRIORITY INFO) | |
| 218 | (defalias 'org-html--priority #[514 "\205 \300\301\"\207" [format "<span class=\"priority\">[%c]</span>"] 5 (#$ . 74344)]) | |
| 219 | #@83 Format TAGS into HTML. | |
| 220 | INFO is a plist containing export options. | |
| 221 | ||
| 222 | (fn TAGS INFO) | |
| 223 | (defalias 'org-html--tags #[514 "\205 \300\301\302\303\304\305\306\307!\310\"\311\312%\313#\"\207" [format "<span class=\"tag\">%s</span>" mapconcat make-byte-code 257 "\301\302\303\300\304\"\305!P#\207" vconcat vector [format "<span class=\"%s\">%s</span>" plist-get :html-tag-class-prefix org-html-fix-class-name] 6 "\n\n(fn TAG)" " "] 11 (#$ . 74624)]) | |
| 224 | #@167 Color CODE with htmlize library. | |
| 225 | CODE is a string representing the source code to colorize. LANG | |
| 226 | is the language used for CODE, as a string, or nil. | |
| 227 | ||
| 228 | (fn CODE LANG) | |
| 229 | (defalias 'org-html-fontify-code #[514 "\205\311 \211\204\f \303!\207\204 \303!\207\304\305\306\307#\204\" \310\311!\203( \312\313!\2040 \314\315!\210\303!\207\316 \"\2068 \211\262\211\205D \317\320\321\"!\322!\204P \303!\202\307 \n\323\324!r\211q\210\325\326\327\330\331!\332\"\333$\216 \210c\210\334 \210\212edb\210\306\210`W\203\213 \335``T\336\306$\210\337u\210\202t \266)\340 \210\341\306!\210\342ed\",\262\266\202\262\343\344\"\205\255 \326\225\211\205\265 \343\345\"\203\304 \211\203\304 O\202\305 \266\202\262\207" [org-html-htmlize-output-type org-src-lang-modes org-html-htmlize-font-prefix org-html-encode-plain-text require htmlize nil t error "Please install htmlize from https://github.com/hniksic/emacs-htmlize" fboundp htmlize-region-for-paste message "Cannot fontify src block (htmlize.el >= 1.34 required)" assoc-default intern format "%s-mode" functionp generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 org-font-lock-ensure put-text-property face 1 org-src-mode set-buffer-modified-p org-html-htmlize-region-for-paste string-match "\\`<pre[^>]*>\n?" "</pre>\\'"] 13 (#$ . 75081)]) | |
| 230 | #@422 Format CODE string as source code. | |
| 231 | Optional arguments LANG, REFS, RETAIN-LABELS and NUM-START are, | |
| 232 | respectively, the language of the source code, as a string, an | |
| 233 | alist between line numbers and references (as returned by | |
| 234 | `org-export-unravel-code'), a boolean specifying if labels should | |
| 235 | appear in the source code, and the number associated to the first | |
| 236 | line of code. | |
| 237 | ||
| 238 | (fn CODE &optional LANG REFS RETAIN-LABELS NUM-START) | |
| 239 | (defalias 'org-html-do-format-code #[1281 "\300\301\"\211G\205 \302\303\304\\!G\"\305\"\306\307\310\311\312\313\f\f\n#\314\"\315\316%\n$\207" [split-string "\n" format "%%%ds: " number-to-string org-html-fontify-code org-export-format-code make-byte-code 771 "\301\205 \303\304\303\302\"\"\205 \300\205 \303\305\"Q\262\211\204! \207\303\306#\207" vconcat vector [format "<span class=\"linenr\">%s</span>" " (%s)" "<span id=\"coderef-%s\" class=\"coderef-off\">%s</span>"] 8 "\n\n(fn LOC LINE-NUM REF)"] 19 (#$ . 76459)]) | |
| 240 | #@164 Format contents of ELEMENT as source code. | |
| 241 | ELEMENT is either an example block or a src block. INFO is | |
| 242 | a plist used as a communication channel. | |
| 243 | ||
| 244 | (fn ELEMENT INFO) | |
| 245 | (defalias 'org-html-format-code #[514 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304!\211@A\305\211;\203. \301\302#\2024 \303A@\"\266\202\306\"\307%\207" [:language get-text-property 0 plist-get org-export-unravel-code :retain-labels org-export-get-loc org-html-do-format-code] 14 (#$ . 77436)]) | |
| 246 | #@304 Build a table of contents. | |
| 247 | DEPTH is an integer specifying the depth of the table. INFO is | |
| 248 | a plist used as a communication channel. Optional argument SCOPE | |
| 249 | is an element defining the scope of the table. Return the table | |
| 250 | of contents as a string, or nil if it is empty. | |
| 251 | ||
| 252 | (fn DEPTH INFO &optional SCOPE) | |
| 253 | (defalias 'org-html-toc #[770 "\300\301\302\303\304\305!\306\"\307\310%\311#\"\211\205Q \312\313!\314Q\203' \211\202O \315!\2031 \316\2022 \317\320\321\"\322\323\"\320\324\325\326 \"$\262\320\327\"R\262\262\207" [mapcar make-byte-code 257 "\301\300\"\302\300\"B\207" vconcat vector [org-html--format-toc-headline org-export-get-relative-level] 5 "\n\n(fn HEADLINE)" org-export-collect-headlines "<div id=\"text-table-of-contents\">" org-html--toc-text "</div>\n" org-html--html5-fancy-p "nav" "div" format "<%s id=\"table-of-contents\">\n" plist-get :html-toplevel-hlevel "<h%d>%s</h%d>\n" org-html--translate "Table of Contents" "</%s>\n"] 14 (#$ . 77930)]) | |
| 254 | #@185 Return innards of a table of contents, as a string. | |
| 255 | TOC-ENTRIES is an alist where key is an entry title, as a string, | |
| 256 | and value is its relative level, as an integer. | |
| 257 | ||
| 258 | (fn TOC-ENTRIES) | |
| 259 | (defalias 'org-html--toc-text #[257 "\211@ASC\211\242\300\301\302\303\304\305!\306\"\307\310%\311#\312\242Z\313\"P\207" [mapconcat make-byte-code 257 "\211@A\211\300\242Z\211\301V\203 \211S\202 \211[\300\240\210\302\301V\203% \303\202, \301W\205, \304\"\301V\2037 \303\2028 \305P\266\202P\207" vconcat vector [0 org-html--make-string "\n<ul>\n<li>" "</li>\n</ul>\n" "</li>\n<li>"] 9 "\n\n(fn ENTRY)" "" org-html--make-string "</li>\n</ul>\n"] 10 (#$ . 78921)]) | |
| 260 | #@130 Return an appropriate table of contents entry for HEADLINE. | |
| 261 | INFO is a plist used as a communication channel. | |
| 262 | ||
| 263 | (fn HEADLINE INFO) | |
| 264 | (defalias 'org-html--format-toc-headline #[514 "\300\"\301\302\"\205, \303\211;\203 \304\305#\202 \301A@\"\266\202\211\205* \306\"\262\211\205G \307\211;\203? \304\305#\202E \301A@\"\266\202\301\310\"\205e \311\211;\203] \304\305#\202c \301A@\"\266\202\312\313\"\314\315!#\301\316\"\317=\205\202 \320\"\321\322\323\n\211;\203\224 \304\305#\202\232 \301A@\"\266\202\206\245 \324\n\n\"\325 \"?\205\300 \326 \"\205\300 \327\330\n\331#\332P\301 \333\" \334&P#\207" [org-export-get-headline-number plist-get :with-todo-keywords :todo-keyword get-text-property 0 org-export-data :todo-type :with-priority :priority org-export-data-with-backend org-export-get-alt-title org-export-toc-entry-backend html :with-tags t org-export-get-tags format "<a href=\"#%s\">%s</a>" :CUSTOM_ID org-export-get-reference org-export-low-level-p org-export-numbered-headline-p mapconcat number-to-string "." ". " :html-format-headline-function :section-number] 19 (#$ . 79587)]) | |
| 265 | #@152 Build a list of listings. | |
| 266 | INFO is a plist used as a communication channel. Return the list | |
| 267 | of listings as a string, or nil if it is empty. | |
| 268 | ||
| 269 | (fn INFO) | |
| 270 | (defalias 'org-html-list-of-listings #[257 "\300!\211\205> \301\302\303\"\304\305\306\307\"$\262\310\311C\304\312\306\313 \"\"\314\315\316\317\320\321\f#\322\"\323\324%\325#\266\202\326\260\207" [org-export-collect-listings "<div id=\"list-of-listings\">\n" plist-get :html-toplevel-hlevel format "<h%d>%s</h%d>\n" org-html--translate "List of Listings" "<div id=\"text-list-of-listings\">\n<ul>\n" 0 "<span class=\"listing-number\">%s</span>" "Listing %d:" mapconcat make-byte-code 257 "\303\211;\203 \304\305#\202 \306A@\"\266\202\205 \307\300\"\310\311\312\"\206) \311!\300\"\313\314\2035 \315\2026 \316\317\314\320\317##\266\202\321\204S \322\302\301\211\242T\240\"\323Q\202` \322\324\322\302\301\211\242T\240\"$\325Q\207" vconcat vector [:name get-text-property 0 plist-get org-export-get-reference org-export-data org-export-get-caption t nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" "<li>" format " " "<a href=\"#%s\">%s %s</a>" "</li>"] 11 "\n\n(fn ENTRY)" "\n" "\n</ul>\n</div>\n</div>"] 16 (#$ . 80738)]) | |
| 271 | #@148 Build a list of tables. | |
| 272 | INFO is a plist used as a communication channel. Return the list | |
| 273 | of tables as a string, or nil if it is empty. | |
| 274 | ||
| 275 | (fn INFO) | |
| 276 | (defalias 'org-html-list-of-tables #[257 "\300!\211\205> \301\302\303\"\304\305\306\307\"$\262\310\311C\304\312\306\313 \"\"\314\315\316\317\320\321\f#\322\"\323\324%\325#\266\202\326\260\207" [org-export-collect-tables "<div id=\"list-of-tables\">\n" plist-get :html-toplevel-hlevel format "<h%d>%s</h%d>\n" org-html--translate "List of Tables" "<div id=\"text-list-of-tables\">\n<ul>\n" 0 "<span class=\"table-number\">%s</span>" "Table %d:" mapconcat make-byte-code 257 "\303\211;\203 \304\305#\202 \306A@\"\266\202\205 \307\300\"\310\311\312\"\206) \311!\300\"\313\314\2035 \315\2026 \316\317\314\320\317##\266\202\321\204S \322\302\301\211\242T\240\"\323Q\202` \322\324\322\302\301\211\242T\240\"$\325Q\207" vconcat vector [:name get-text-property 0 plist-get org-export-get-reference org-export-data org-export-get-caption t nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" "<li>" format " " "<a href=\"#%s\">%s %s</a>" "</li>"] 11 "\n\n(fn ENTRY)" "\n" "\n</ul>\n</div>\n</div>"] 16 (#$ . 81980)]) | |
| 277 | #@147 Transcode BOLD from Org to HTML. | |
| 278 | CONTENTS is the text with bold markup. INFO is a plist holding | |
| 279 | contextual information. | |
| 280 | ||
| 281 | (fn BOLD CONTENTS INFO) | |
| 282 | (defalias 'org-html-bold #[771 "\300\301\302\303\"\236A\206\f \304\"\207" [format bold plist-get :html-text-markup-alist "%s"] 8 (#$ . 83204)]) | |
| 283 | #@176 Transcode a CENTER-BLOCK element from Org to HTML. | |
| 284 | CONTENTS holds the contents of the block. INFO is a plist | |
| 285 | holding contextual information. | |
| 286 | ||
| 287 | (fn CENTER-BLOCK CONTENTS INFO) | |
| 288 | (defalias 'org-html-center-block #[771 "\300\301\"\207" [format "<div class=\"org-center\">\n%s</div>"] 6 (#$ . 83503)]) | |
| 289 | #@138 Transcode a CLOCK element from Org to HTML. | |
| 290 | CONTENTS is nil. INFO is a plist used as a communication | |
| 291 | channel. | |
| 292 | ||
| 293 | (fn CLOCK CONTENTS INFO) | |
| 294 | (defalias 'org-html-clock #[771 "\301\302\303\304\211;\203 \305\306#\202 \307A@\"\266\202!\310\211;\203- \305\306#\2023 \307A@\"\266\202\211\205= \301\311\"\262$\207" [org-clock-string format "<p>\n<span class=\"timestamp-wrapper\">\n<span class=\"timestamp-kwd\">%s</span> <span class=\"timestamp\">%s</span>%s\n</span>\n</p>" org-timestamp-translate :value get-text-property 0 plist-get :duration " <span class=\"timestamp\">(%s)</span>"] 13 (#$ . 83807)]) | |
| 295 | #@125 Transcode CODE from Org to HTML. | |
| 296 | CONTENTS is nil. INFO is a plist holding contextual | |
| 297 | information. | |
| 298 | ||
| 299 | (fn CODE CONTENTS INFO) | |
| 300 | (defalias 'org-html-code #[771 "\300\301\302\303\"\236A\206\f \304\305\306\211;\203 \307\310#\202# \302A@\"\266\202!\"\207" [format code plist-get :html-text-markup-alist "%s" org-html-encode-plain-text :value get-text-property 0] 12 (#$ . 84427)]) | |
| 301 | #@164 Transcode a DRAWER element from Org to HTML. | |
| 302 | CONTENTS holds the contents of the block. INFO is a plist | |
| 303 | holding contextual information. | |
| 304 | ||
| 305 | (fn DRAWER CONTENTS INFO) | |
| 306 | (defalias 'org-html-drawer #[771 "\300\301\"\302\211;\203 \303\304#\202 \300A@\"\266\202\"\207" [plist-get :html-format-drawer-function :drawer-name get-text-property 0] 10 (#$ . 84815)]) | |
| 307 | #@202 Transcode a DYNAMIC-BLOCK element from Org to HTML. | |
| 308 | CONTENTS holds the contents of the block. INFO is a plist | |
| 309 | holding contextual information. See `org-export-data'. | |
| 310 | ||
| 311 | (fn DYNAMIC-BLOCK CONTENTS INFO) | |
| 312 | (defalias 'org-html-dynamic-block #[771 "\207" [] 4 (#$ . 85182)]) | |
| 313 | #@158 Transcode an ENTITY object from Org to HTML. | |
| 314 | CONTENTS are the definition itself. INFO is a plist holding | |
| 315 | contextual information. | |
| 316 | ||
| 317 | (fn ENTITY CONTENTS INFO) | |
| 318 | (defalias 'org-html-entity #[771 "\300\211;\203 \301\302#\202 \303A@\"\207" [:html get-text-property 0 plist-get] 9 (#$ . 85458)]) | |
| 319 | #@153 Transcode a EXAMPLE-BLOCK element from Org to HTML. | |
| 320 | CONTENTS is nil. INFO is a plist holding contextual | |
| 321 | information. | |
| 322 | ||
| 323 | (fn EXAMPLE-BLOCK CONTENTS INFO) | |
| 324 | (defalias 'org-html-example-block #[771 "\300\301\"\302\303\"\203 \304!\202W \305\306\307\211;\203# \310\311#\202) \302A@\"\266\202\312\2037 \313\314\"\203; \202@ \315\314#!\316!\203M \317P\202N \320\266\202\321\"#\207" [org-export-read-attribute :attr_html plist-get :textarea org-html--textarea-block format "<pre class=\"example\"%s>\n%s</pre>" :name get-text-property 0 org-html--make-attribute-string plist-member :id plist-put org-string-nw-p " " "" org-html-format-code] 12 (#$ . 85760)]) | |
| 325 | #@154 Transcode a EXPORT-SNIPPET object from Org to HTML. | |
| 326 | CONTENTS is nil. INFO is a plist holding contextual | |
| 327 | information. | |
| 328 | ||
| 329 | (fn EXPORT-SNIPPET CONTENTS INFO) | |
| 330 | (defalias 'org-html-export-snippet #[771 "\300!\301=\205 \302\211;\203 \303\304#\202 \305A@\"\266\202\207" [org-export-snippet-backend html :value get-text-property 0 plist-get] 9 (#$ . 86436)]) | |
| 331 | #@151 Transcode a EXPORT-BLOCK element from Org to HTML. | |
| 332 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 333 | ||
| 334 | (fn EXPORT-BLOCK CONTENTS INFO) | |
| 335 | (defalias 'org-html-export-block #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\230\2055 \305\306\211;\203, \301\302#\2022 \303A@\"\266\202!\207" [:type get-text-property 0 plist-get "HTML" org-remove-indentation :value] 10 (#$ . 86800)]) | |
| 336 | #@149 Transcode a FIXED-WIDTH element from Org to HTML. | |
| 337 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 338 | ||
| 339 | (fn FIXED-WIDTH CONTENTS INFO) | |
| 340 | (defalias 'org-html-fixed-width #[771 "\300\301\302\303\304\211;\203 \305\306#\202 \307A@\"\266\202!!\"\207" [format "<pre class=\"example\">\n%s</pre>" org-html-do-format-code org-remove-indentation :value get-text-property 0 plist-get] 13 (#$ . 87217)]) | |
| 341 | #@163 Transcode a FOOTNOTE-REFERENCE element from Org to HTML. | |
| 342 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 343 | ||
| 344 | (fn FOOTNOTE-REFERENCE CONTENTS INFO) | |
| 345 | (defalias 'org-html-footnote-reference #[771 "\300\"\211\211:\204 \211;\205 \301\202 \211@9\205 \211@\262\302=\205& \303\304\"\262\305\"\306\307\310\"\203< \311\202= \312#\306\303\313\"\314\306\315\" $\"\266\202P\207" [org-export-get-previous-element plain-text footnote-reference plist-get :html-footnote-separator org-export-get-footnote-number format "fnr.%d%s" org-export-footnote-first-reference-p "" ".100" :html-footnote-format org-html--anchor " class=\"footref\" href=\"#fn.%d\""] 14 (#$ . 87636)]) | |
| 346 | #@171 Transcode a HEADLINE element from Org to HTML. | |
| 347 | CONTENTS holds the contents of the headline. INFO is a plist | |
| 348 | holding contextual information. | |
| 349 | ||
| 350 | (fn HEADLINE CONTENTS INFO) | |
| 351 | (defalias 'org-html-headline #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202?\205!\304\"\305\"\306\"\303\307\"S\\\303\310\"\205W \311\211;\203D \301\302#\202J \303A@\"\266\202\211\205U \312\"\262\211\205s \313\211;\203k \301\302#\202q \303A@\"\266\202\303\314\"\205\223 \315\211;\203\213 \301\302#\202\221 \303A@\"\266\202\312\316\n\211;\203\244 \301\302#\202\252 \303A@\"\266\202\"\303\317\"\205\275 \320\n \"\303 \321\"&\n\206\321 \322\323\324\325\211;\203\343 \301\302#\202\351 \303A@\"\266\202\326\"\327\211;\203\301\302#\202\303A@\"\266\202E\"\211@\330\331\332\333\334\335!\336\"\337\340%A\322#\341\"\203w\f\2031\342\2022\343\344\"\205C\345\346\347\350\351\"#\352\203O\353\202P\354\324\324\355\n\324\211$ Q&\356\357\"\205q\346\360\"R\262\202 \361\211;\203\207\301\302#\202\215\303A@\"\266\202\211:\204\232\324\202\247\211@9\203\246\211AA\202\247\211\262@\346\362\363\"\364\326\"P\346\365\"\205\305\366Q\346\367 \205\340\346\370\330\371 \372##P&\211:\204\367\211;\205\377\373\202\377\211@9\205\377\211@\262\374=\203 \202\375\322#\fP\363\"&\266\202\266\215\207" [:footnote-section-p get-text-property 0 plist-get org-export-numbered-headline-p org-export-get-headline-number org-export-get-relative-level :html-toplevel-hlevel :with-todo-keywords :todo-keyword org-export-data :todo-type :with-priority :priority :title :with-tags org-export-get-tags :html-format-headline-function "" delq nil :CUSTOM_ID org-export-get-reference :ID mapconcat make-byte-code 257 "\301\302!\203 \303P\202 \304\211\300$\207" vconcat vector [org-html--anchor org-uuidgen-p "ID-" nil] 6 "\n\n(fn ID)" org-export-low-level-p "ol" "ul" org-export-first-sibling-p apply format "<%s class=\"org-%s\">\n" make-list 2 org-html-format-list-item ordered unordered org-html--anchor "\n" org-export-last-sibling-p "</%s>\n" :HTML_CONTAINER_CLASS "<%s id=\"%s\" class=\"%s\">%s%s</%s>\n" org-html--container "outline-container-" "outline-%d" " " "\n<h%d id=\"%s\">%s%s</h%d>\n" "<span class=\"section-number-%d\">%s</span> " number-to-string "." plain-text section org-html-section] 35 (#$ . 88335)]) | |
| 352 | #@139 Default format function for a headline. | |
| 353 | See `org-html-format-headline-function' for details. | |
| 354 | ||
| 355 | (fn TODO TODO-TYPE PRIORITY TEXT TAGS INFO) | |
| 356 | (defalias 'org-html-format-headline-default-function #[1542 "\300\"\301\"\302\"\211\205 \303\211\205 \303 \205 \304\260\207" [org-html--todo org-html--priority org-html--tags " " "   "] 16 (#$ . 90783)]) | |
| 357 | #@22 | |
| 358 | ||
| 359 | (fn HEADLINE INFO) | |
| 360 | (defalias 'org-html--container #[514 "\300\211;\203 \301\302#\202 \303A@\"\266\202\206) \304\"\305U\203( \303\306\"\207\307\207" [:HTML_CONTAINER get-text-property 0 plist-get org-export-get-relative-level 1 :html-container "div"] 8 (#$ . 91163)]) | |
| 361 | #@158 Transcode an HORIZONTAL-RULE object from Org to HTML. | |
| 362 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 363 | ||
| 364 | (fn HORIZONTAL-RULE CONTENTS INFO) | |
| 365 | (defalias 'org-html-horizontal-rule #[771 "\300\301\302#\207" [org-html-close-tag "hr" nil] 7 (#$ . 91449)]) | |
| 366 | #@184 Transcode an INLINE-SRC-BLOCK element from Org to HTML. | |
| 367 | CONTENTS holds the contents of the item. INFO is a plist holding | |
| 368 | contextual information. | |
| 369 | ||
| 370 | (fn INLINE-SRC-BLOCK CONTENTS INFO) | |
| 371 | (defalias 'org-html-inline-src-block #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\305\211;\203' \301\302#\202- \303A@\"\266\202\"\306\211;\203@ \301\302#\202F \303A@\"\266\202\205O \307\"\211\204W \310\202[ \311\312\"\262\311\313$\207" [:language get-text-property 0 plist-get org-html-fontify-code :value :name org-export-get-reference "" format " id=\"%s\"" "<code class=\"src src-%s\"%s>%s</code>"] 11 (#$ . 91723)]) | |
| 372 | #@173 Transcode an INLINETASK element from Org to HTML. | |
| 373 | CONTENTS holds the contents of the block. INFO is a plist | |
| 374 | holding contextual information. | |
| 375 | ||
| 376 | (fn INLINETASK CONTENTS INFO) | |
| 377 | (defalias 'org-html-inlinetask #[771 "\300\301\"\205( \302\211;\203 \303\304#\202 \300A@\"\266\202\211\205& \305\"\262\211\205C \306\211;\203; \303\304#\202A \300A@\"\266\202\300\307\"\205a \310\211;\203Y \303\304#\202_ \300A@\"\266\202\305\311\211;\203r \303\304#\202x \300A@\"\266\202\"\300\312\"\205\211 \313\"\300\314\"\f\f&\207" [plist-get :with-todo-keywords :todo-keyword get-text-property 0 org-export-data :todo-type :with-priority :priority :title :with-tags org-export-get-tags :html-format-inlinetask-function] 16 (#$ . 92369)]) | |
| 378 | #@151 Default format function for inlinetasks. | |
| 379 | See `org-html-format-inlinetask-function' for details. | |
| 380 | ||
| 381 | (fn TODO TODO-TYPE PRIORITY TEXT TAGS CONTENTS INFO) | |
| 382 | (defalias 'org-html-format-inlinetask-default-function #[1799 "\300\301\302 &\303\304\305#$\207" [format "<div class=\"inlinetask\">\n<b>%s</b>%s\n%s</div>" org-html-format-headline-default-function org-html-close-tag "br" nil] 16 (#$ . 93133)]) | |
| 383 | #@153 Transcode ITALIC from Org to HTML. | |
| 384 | CONTENTS is the text with italic markup. INFO is a plist holding | |
| 385 | contextual information. | |
| 386 | ||
| 387 | (fn ITALIC CONTENTS INFO) | |
| 388 | (defalias 'org-html-italic #[771 "\300\301\302\303\"\236A\206\f \304\"\207" [format italic plist-get :html-text-markup-alist "%s"] 8 (#$ . 93551)]) | |
| 389 | #@153 Format CHECKBOX into HTML. | |
| 390 | INFO is a plist holding contextual information. See | |
| 391 | `org-html-checkbox-type' for customization options. | |
| 392 | ||
| 393 | (fn CHECKBOX INFO) | |
| 394 | (defalias 'org-html-checkbox #[514 "\301\302\"\236A\236A\207" [org-html-checkbox-types plist-get :html-checkbox-type] 6 (#$ . 93860)]) | |
| 395 | #@100 Format a list item into HTML. | |
| 396 | ||
| 397 | (fn CONTENTS TYPE CHECKBOX INFO &optional TERM-COUNTER-ID HEADLINE) | |
| 398 | (defalias 'org-html-format-list-item #[1540 "\203 \300\301\302!\"\202 \303\304\"\205 \305P\306\307\310#\311 !\203. \203. \312\202/ \303\313\267\202\222 \211\203B \300\314\"\202C \303\300\315#\205R PP\266\202\202\223 \211\203d \300\316\"\202e \303\300\315#\205t PP\266\202\202\223 \211\206\200 \317\262\300\320P#\321P\262\202\223 \310 \322=?\205\234 \311 !\205\273 \f\310\323\203\260 \324\202\261 \325\303\323\326\303##\266\202 \327\267\202\317 \330\202\320 \330\202\320 \331\202\320 \310\260\207" [format " class=\"%s\"" symbol-name "" org-html-checkbox " " org-html-close-tag "br" nil org-string-nw-p "\n" #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 54 unordered 88 descriptive 122)) " value=\"%s\"" "<li%s%s>" " id=\"%s\"" "(no term)" "<dt%s>%s</dt>" "<dd>" descriptive replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'" #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 195 unordered 199 descriptive 203)) "</li>" "</dd>"] 22 (#$ . 94157)]) | |
| 399 | #@160 Transcode an ITEM element from Org to HTML. | |
| 400 | CONTENTS holds the contents of the item. INFO is a plist holding | |
| 401 | contextual information. | |
| 402 | ||
| 403 | (fn ITEM CONTENTS INFO) | |
| 404 | (defalias 'org-html-item #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\262\304\211;\203) \301\302#\202/ \303A@\"\266\202\305\211;\203@ \301\302#\202F \303A@\"\266\202\306\211;\203X \301\302#\202^ \303A@\"\266\202\307\211;\203p \301\302#\202v \303A@\"\266\202\211\205\201 \310\"\262\311 \206\220 %\207" [:parent get-text-property 0 plist-get :type :counter :checkbox :tag org-export-data org-html-format-list-item] 14 (#$ . 95377)]) | |
| 405 | #@141 Transcode a KEYWORD element from Org to HTML. | |
| 406 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 407 | ||
| 408 | (fn KEYWORD CONTENTS INFO) | |
| 409 | (defalias 'org-html-keyword #[771 "\302\211;\203 \303\304#\202 \305A@\"\266\202\306\211;\203& \303\304#\202, \305A@\"\266\202\307\230\2038 \211\202\207 \310\230\205\207 \311\312\313\"\203q \312\314\"\205T \315\316\304\"!\317\320\311\312#)\266\203\321\205k #\266\202\202\206 \211\322\230\203} \323!\202\206 \211\324\230\205\206 \325!)\207" [case-fold-search inhibit-changing-match-data :key get-text-property 0 plist-get :value "HTML" "TOC" t string-match "\\<headlines\\>" "\\<[0-9]+\\>" string-to-number match-string "\\<local\\>" nil org-html-toc "listings" org-html-list-of-listings "tables" org-html-list-of-tables] 13 (#$ . 96024)]) | |
| 410 | #@371 Format a LaTeX fragment LATEX-FRAG into HTML. | |
| 411 | PROCESSING-TYPE designates the tool used for conversion. It can | |
| 412 | be `mathjax', `verbatim', nil, t or symbols in | |
| 413 | `org-preview-latex-process-alist', e.g., `dvipng', `dvisvgm' or | |
| 414 | `imagemagick'. See `org-html-with-latex' for more information. | |
| 415 | INFO is a plist containing export properties. | |
| 416 | ||
| 417 | (fn LATEX-FRAG PROCESSING-TYPE INFO) | |
| 418 | (defalias 'org-html-format-latex #[771 "\302\211\303=\204? \304 \206 \305\306\307\"!\310\311\"\211\205% \312\313\314\315\"\315#\315P\262\316 !\317\320!!P\262\321!\262\211P\262\266\322\323!r\211q\210\324\325\326\327\330!\331\"\332$\216c\210\333\334\211\334\335\334\f&\210\336 *\262\207" [temporary-file-directory org-preview-latex-image-directory "" mathjax buffer-file-name make-temp-name expand-file-name "latex" plist-get :latex-header mapconcat #[257 "\300P\207" ["#+LATEX_HEADER: "] 3 "\n\n(fn LINE)"] org-split-string "\n" file-name-as-directory file-name-sans-extension file-name-nondirectory file-name-directory generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 org-format-latex nil "Creating LaTeX Image..." buffer-string] 15 (#$ . 96840)]) | |
| 419 | #@161 Transcode a LATEX-ENVIRONMENT element from Org to HTML. | |
| 420 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 421 | ||
| 422 | (fn LATEX-ENVIRONMENT CONTENTS INFO) | |
| 423 | (defalias 'org-html-latex-environment #[771 "\301\302\"\303\304\211;\203 \305\306#\202 \301A@\"\266\202!\307\310\"\311>\2031 \312\313#\202[ \236\203Z \312#\211\205U \314\315\"\205U \316\317\320\321\"#\"\262\202[ \207" [org-preview-latex-process-alist plist-get :with-latex org-remove-indentation :value get-text-property 0 org-export-read-attribute :attr_html (t mathjax) org-html-format-latex mathjax string-match "file:\\([^]]*\\)" org-html--wrap-image org-html--format-image match-string 1] 12 (#$ . 98059)]) | |
| 424 | #@154 Transcode a LATEX-FRAGMENT object from Org to HTML. | |
| 425 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 426 | ||
| 427 | (fn LATEX-FRAGMENT CONTENTS INFO) | |
| 428 | (defalias 'org-html-latex-fragment #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\304\305\"\211\306>\203) \307\310#\202N \211\236\203M \307#\211\205H \311\312\"\205H \313\314\315\"\316#\262\202N \207" [org-preview-latex-process-alist :value get-text-property 0 plist-get :with-latex (t mathjax) org-html-format-latex mathjax string-match "file:\\([^]]*\\)" org-html--format-image match-string 1 nil] 10 (#$ . 98767)]) | |
| 429 | #@146 Transcode a LINE-BREAK object from Org to HTML. | |
| 430 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 431 | ||
| 432 | (fn LINE-BREAK CONTENTS INFO) | |
| 433 | (defalias 'org-html-line-break #[771 "\300\301\302#\303P\207" [org-html-close-tag "br" nil "\n"] 7 (#$ . 99370)]) | |
| 434 | #@26 | |
| 435 | ||
| 436 | (fn DATA BACKEND INFO) | |
| 437 | (defalias 'org-html-image-link-filter #[771 "\301#\207" [org-html-inline-image-rules org-export-insert-image-links] 7 (#$ . 99636)]) | |
| 438 | #@316 Non-nil when LINK is meant to appear as an image. | |
| 439 | INFO is a plist used as a communication channel. LINK is an | |
| 440 | inline image when it has no description and targets an image | |
| 441 | file (see `org-html-inline-image-rules' for more information), or | |
| 442 | if its description is a single link targeting an image file. | |
| 443 | ||
| 444 | (fn LINK INFO) | |
| 445 | (defalias 'org-html-inline-image-p #[514 "\211:\204\n \301\202 \211@9\203 \211AA\202 \211\262\204$ \302\303\304\"\"\207\305C\306\211:\2041 \301\202> \211@9\203= \211AA\202> \211\262\307B\310\311\312\313\314 \"\315\"\316\317%\320%\262?\207" [org-element-all-objects nil org-export-inline-image-p plist-get :html-inline-image-rules 0 org-element-map plain-text make-byte-code 257 "\211\211:\204 \211;\205 \302\202 \211@9\205 \211@\262\211\303\267\202A \304!\202B \301\242\305U\2030 \306\202B \301\211\242T\240\210\307\310\300\311\"\"?\202B \306\207" vconcat vector [plain-text #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-text 31 link 37)) org-string-nw-p 1 t org-export-inline-image-p plist-get :html-inline-image-rules] 7 "\n\n(fn OBJ)" t] 13 (#$ . 99804)]) | |
| 446 | #@594 Non-nil if ELEMENT is a standalone image. | |
| 447 | ||
| 448 | INFO is a plist holding contextual information. | |
| 449 | ||
| 450 | An element or object is a standalone image when | |
| 451 | ||
| 452 | - its type is `paragraph' and its sole content, save for white | |
| 453 | spaces, is a link that qualifies as an inline image; | |
| 454 | ||
| 455 | - its type is `link' and its containing paragraph has no other | |
| 456 | content save white spaces. | |
| 457 | ||
| 458 | Bind `org-html-standalone-image-predicate' to constrain paragraph | |
| 459 | further. For example, to check for only captioned standalone | |
| 460 | images, set it to: | |
| 461 | ||
| 462 | (lambda (paragraph) (org-element-property :caption paragraph)) | |
| 463 | ||
| 464 | (fn ELEMENT INFO) | |
| 465 | (defalias 'org-html-standalone-image-p #[514 "\211:\204 \211;\205 \302\202 \211@9\205 \211@\262\211\303\267\202@ \202A \304\211;\2033 \305\306#\2029 \307A@\"\266\202\262\202A \310\262\211\211:\204R \211;\205Z \302\202Z \211@9\205Z \211@\262\311=\205\255 \312\300!\203m !\205\255 \3132\255 \306C\314\211:\204~ \310\202\213 \211@9\203\212 \211AA\202\213 \211\262\302 B\315\316\317\320\321\n \"\322\"\323\324%\310\325&\210\211\242\326U\2620\207" [org-html-standalone-image-predicate org-element-all-objects plain-text #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (paragraph 31 link 35)) :parent get-text-property 0 plist-get nil paragraph fboundp exit org-element-map make-byte-code 257 "\211\211:\204 \211;\205 \302\202 \211@9\205 \211@\262\211\303\267\2027 \304!\2028 \301\211\242T\240\305V\2068 \306\300\"?\2028 \307\262\205A \310\311\312\"\207" vconcat vector [plain-text #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-text 31 link 37)) org-string-nw-p 1 org-html-inline-image-p t throw exit nil] 5 "\n\n(fn OBJ)" link 1] 14 (#$ . 100953)]) | |
| 466 | #@199 Transcode a LINK object from Org to HTML. | |
| 467 | DESC is the description part of the link, or the empty string. | |
| 468 | INFO is a plist holding contextual information. See | |
| 469 | `org-export-data'. | |
| 470 | ||
| 471 | (fn LINK DESC INFO) | |
| 472 | (defalias 'org-html-link #[771 "\301\302\211;\203 \303\304#\202 \305A@\"\266\202\306\211;\203' \303\304#\202- \305A@\"\266\202\307!\310\235\203C \311\312\313Q!!\202\345 \314\230\203\344 \315\316\"!\262\305\317\"\205r \305\317\"\320\321\203g \322\202h \323\324\321\325\324##\266\202\211\203\213 \305\326\"\203\213 \327!\203\213 \330!P\262\210\"\262\331\211;\203\243 \303\304#\202\251 \305A@\"\266\202\211\204\263 \202\337 \332!\333=\203\301 P\202\337 \334\335\306\f\211;\203\325 \303\304#\202\333 \305A@\"\266\202\"Q\262\202\345 \336!\337\211;\203\372 \303\304#\202 \305A@\"\266\202\262\211\211:\204\211;\205\340\202\211@9\205\211@\262\341=\203/\342\n \"\203/\211\2021 \262\343\341\344 \345%=\205D\346\347\"\266\202\350!\307!\203U\351P\202V\324\262\352\n\353#\206w\305\354\"\203~\355\n\305\n\356\"\"\203~\357\n#\202w\360\230\203\242\361\n \"\211\204\222\202\235\362\363\364\f\"$\262\202w\365\235\203 \366\230\203\267\367\n \"\202\275\370\n \"\211\211:\204\314\211;\205\324\340\202\324\211@9\205\324\211@\262\211\340=\203\370\371P \f\"\362\372\f\206\362%\266\202\202\211\204#\362\373\206 \374\375\211;\203\303\304#\202\305A@\"\266\202 \"\"\202\211\376=\203\231\377\211;\2038\303\304#\202>\305A@\"\266\202\206H\364 \"\201@ \f\"\203k\204k\201A \201B \201C \"\201D #\202\215\206\215\374\201E \211;\203\202\303\304#\202\210\305A@\"\266\202\f\"\362\363$\266\202\202\364 \"\201F \203\253\320\202\325\201G \f\"\203\312\201H \343\341\344\345%\f\341\201G $\202\325\201H \f\320\201F $\206\374\211\204\344\201I \202\374\211\247\203\361\201B !\202\374\201A \201B \201D #\362\363$)\266\203\262\262\202w\201J \230\203C\201K \201L !P\362\201M \362\201N \211#\362\201O \n\f\"\201P \"\"%\262\202w\203[\203[\362\201Q \201L !$\202w\203s\201L !\362\201Q \312!$\262\202w\362\373\"\207" [org-html-standalone-image-predicate #[514 "\300\301\"\203 \302\303\"\227\304\230\203 \305!\303\300\306\"Q\207\207" [plist-get :html-link-org-files-as-html file-name-extension "." ".org" file-name-sans-extension :html-extension] 7 "\n\n(fn RAW-PATH INFO)"] :type get-text-property 0 plist-get :path org-string-nw-p ("http" "https" "ftp" "mailto" "news") url-encode-url org-link-unescape ":" "file" org-export-file-uri org-publish-file-relative-name :html-link-home nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" :html-link-use-abs-url file-name-absolute-p file-name-as-directory :search-option string-to-char 35 "#" org-publish-resolve-external-link org-export-get-parent-element :parent plain-text link org-html-inline-image-p org-element-map identity t org-export-read-attribute :attr_html org-html--make-attribute-string " " org-export-custom-protocol-maybe html :html-inline-images org-export-inline-image-p :html-inline-image-rules org-html--format-image "radio" org-export-resolve-radio-link format "<a href=\"#%s\"%s>%s</a>" org-export-get-reference ("custom-id" "fuzzy" "id") "fuzzy" org-export-resolve-fuzzy-link org-export-resolve-id-link "ID-" "<a href=\"%s#%s\"%s>%s</a>" "<i>%s</i>" org-export-data :raw-link headline :CUSTOM_ID org-export-numbered-headline-p mapconcat number-to-string org-export-get-headline-number "." :title org-html--has-caption-p org-html-standalone-image-p org-export-get-ordinal "No description for this link" "coderef" "coderef-" org-html-encode-plain-text "<a href=\"#%s\" %s%s>%s</a>" "class=\"coderef\" onmouseover=\"CodeHighlightOn(this, '%s');\" onmouseout=\"CodeHighlightOff(this, '%s');\"" org-export-get-coderef-format org-export-resolve-coderef "<a href=\"%s\"%s>%s</a>"] 21 (#$ . 102714)]) | |
| 473 | #@153 Transcode a NODE-PROPERTY element from Org to HTML. | |
| 474 | CONTENTS is nil. INFO is a plist holding contextual | |
| 475 | information. | |
| 476 | ||
| 477 | (fn NODE-PROPERTY CONTENTS INFO) | |
| 478 | (defalias 'org-html-node-property #[771 "\300\301\302\211;\203 \303\304#\202 \305A@\"\266\202\306\211;\203) \303\304#\202/ \305A@\"\266\202\211\203; \307P\202< \310\262#\207" [format "%s:%s" :key get-text-property 0 plist-get :value " " ""] 12 (#$ . 106731)]) | |
| 479 | #@187 Transcode a PARAGRAPH element from Org to HTML. | |
| 480 | CONTENTS is the contents of the paragraph, as a string. INFO is | |
| 481 | the plist used as a communication channel. | |
| 482 | ||
| 483 | (fn PARAGRAPH CONTENTS INFO) | |
| 484 | (defalias 'org-html-paragraph #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\262\211\211:\204) \211;\2051 \305\2021 \211@9\2051 \211@\262\306\307\310\311\"!\236A@\206D \312\313=\203\206 \314\"\204\206 \315\316#\211A?\205| \211@\211:\204p \211;\205x \305\202x \211@9\205x \211@\262\317>\262\203\206 \202\320\"\203\356 \321\322 !\"\323\324!\204\243 \211\202\275 \325\326\327\330\n\"\331\332 \333\334\335% \336\320$\"\337R)\262\340 \211;\203\320 \302\303#\202\326 \304A@\"\266\202\205\341 \341 \"\342 $\266\202\202\326\343\324!\203\374 \344P\202\375 \312\n$\207" [org-html-standalone-image-predicate :parent get-text-property 0 plist-get plain-text ((footnote-definition " class=\"footpara\"") (org-data " class=\"footpara\"")) org-html--make-attribute-string org-export-read-attribute :attr_html "" item org-export-get-previous-element org-export-get-next-element 2 (nil plain-list) org-html-standalone-image-p org-export-data org-export-get-caption org-html--has-caption-p org-string-nw-p "<span class=\"figure-number\">" format org-html--translate "Figure %d:" org-export-get-ordinal org-element-map link identity t nil " </span>" :name org-export-get-reference org-html--wrap-image "<p%s%s>\n%s</p>" " "] 19 (#$ . 107165)]) | |
| 485 | #@168 Transcode a PLAIN-LIST element from Org to HTML. | |
| 486 | CONTENTS is the contents of the list. INFO is a plist holding | |
| 487 | contextual information. | |
| 488 | ||
| 489 | (fn PLAIN-LIST CONTENTS INFO) | |
| 490 | (defalias 'org-html-plain-list #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\211\304\267\202) \305\2020 \306\2020 \307\2020 \211\310\311\"\262\262\312\313\"\314\315\"\312\316\317\320\321\322\323\n\303 \321\"D\324#\325\326\203X \327\202Y \330\331\326\332\331##\266\202#!%\207" [:type get-text-property 0 plist-get #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 29 unordered 33 descriptive 37)) "ol" "ul" "dl" error "Unknown HTML list type: %s" format "org-%s" org-export-read-attribute :attr_html "<%s %s>\n%s</%s>" org-html--make-attribute-string plist-put :class mapconcat identity " " nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'"] 22 (#$ . 108652)]) | |
| 491 | #@60 Convert special characters in STRING to HTML. | |
| 492 | ||
| 493 | (fn STRING) | |
| 494 | (defalias 'org-html-convert-special-strings #[257 "\211\203 \211@\211@A\301\302$\262\266A\266\202\202 \207" [org-html-special-string-regexps replace-regexp-in-string t] 10 (#$ . 109589)]) | |
| 495 | #@135 Convert plain text characters from TEXT to HTML equivalent. | |
| 496 | Possible conversions are set in `org-html-protect-char-alist'. | |
| 497 | ||
| 498 | (fn TEXT) | |
| 499 | (defalias 'org-html-encode-plain-text #[257 "\211\203 \211@\301@A\302\211%\262A\266\202\202 \207" [org-html-protect-char-alist replace-regexp-in-string t] 9 (#$ . 109855)]) | |
| 500 | #@141 Transcode a TEXT string from Org to HTML. | |
| 501 | TEXT is the string to transcode. INFO is a plist holding | |
| 502 | contextual information. | |
| 503 | ||
| 504 | (fn TEXT INFO) | |
| 505 | (defalias 'org-html-plain-text #[514 "\300!\262\301\302\"\203 \303\304$\262\301\305\"\203\" \306!\262\301\307\"\2037 \310\311\312\313\314#\315P#\262\211\207" [org-html-encode-plain-text plist-get :with-smart-quotes org-export-activate-smart-quotes :html :with-special-strings org-html-convert-special-strings :preserve-breaks replace-regexp-in-string "\\(\\\\\\\\\\)?[ ]*\n" org-html-close-tag "br" nil "\n"] 9 (#$ . 110178)]) | |
| 506 | #@144 Transcode a PLANNING element from Org to HTML. | |
| 507 | CONTENTS is nil. INFO is a plist used as a communication | |
| 508 | channel. | |
| 509 | ||
| 510 | (fn PLANNING CONTENTS INFO) | |
| 511 | (defalias 'org-html-planning #[771 "\303\304\305\306\307\310\311\312!\313\"\314\315%\316\211;\203! \317\320#\202' \321A@\"\266\202B \322 \211;\203; \317\320#\202A \321A@\"\266\202B\n\323\n\211;\203U \317\320#\202[ \321A@\"\266\202BE\324#\325\326\203k \327\202l \330\324\326\331\324##\266\202\"\207" [org-closed-string org-deadline-string org-scheduled-string format "<p><span class=\"timestamp-wrapper\">%s</span></p>" mapconcat make-byte-code 257 "\211A\211\205 @\301\302\303\304!\300\"#\262\207" vconcat vector [format "<span class=\"timestamp-kwd\">%s</span> <span class=\"timestamp\">%s</span> " org-html-plain-text org-timestamp-translate] 9 "\n\n(fn PAIR)" :closed get-text-property 0 plist-get :deadline :scheduled "" nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'"] 16 (#$ . 110771)]) | |
| 512 | #@183 Transcode a PROPERTY-DRAWER element from Org to HTML. | |
| 513 | CONTENTS holds the contents of the drawer. INFO is a plist | |
| 514 | holding contextual information. | |
| 515 | ||
| 516 | (fn PROPERTY-DRAWER CONTENTS INFO) | |
| 517 | (defalias 'org-html-property-drawer #[771 "\300!\205\n \301\302\"\207" [org-string-nw-p format "<pre class=\"example\">\n%s</pre>"] 6 (#$ . 111771)]) | |
| 518 | #@174 Transcode a QUOTE-BLOCK element from Org to HTML. | |
| 519 | CONTENTS holds the contents of the block. INFO is a plist | |
| 520 | holding contextual information. | |
| 521 | ||
| 522 | (fn QUOTE-BLOCK CONTENTS INFO) | |
| 523 | (defalias 'org-html-quote-block #[771 "\300\301\302\211;\203 \303\304#\202 \305A@\"\266\202\306\307\"\310\203* \311\312\"\203. \2023 \313\312#!\314!\203@ \315P\202A \316\266\203#\207" [format "<blockquote%s>\n%s</blockquote>" :name get-text-property 0 plist-get org-export-read-attribute :attr_html org-html--make-attribute-string plist-member :id plist-put org-string-nw-p " " ""] 12 (#$ . 112112)]) | |
| 524 | #@168 Transcode a SECTION element from Org to HTML. | |
| 525 | CONTENTS holds the contents of the section. INFO is a plist | |
| 526 | holding contextual information. | |
| 527 | ||
| 528 | (fn SECTION CONTENTS INFO) | |
| 529 | (defalias 'org-html-section #[771 "\300!\211\204 \202V \301\"\302\303\"S\\\304\"\205% \305\306\307\"\310#\311\312\313\211;\2038 \314\315#\202> \302A@\"\266\202\206M \206M \316\"\206S \317$\266\202\207" [org-export-get-parent-headline org-export-get-relative-level plist-get :html-toplevel-hlevel org-export-numbered-headline-p mapconcat number-to-string org-export-get-headline-number "-" format "<div class=\"outline-text-%d\" id=\"text-%s\">\n%s</div>\n" :CUSTOM_ID get-text-property 0 org-export-get-reference ""] 15 (#$ . 112710)]) | |
| 530 | #@161 Transcode a RADIO-TARGET object from Org to HTML. | |
| 531 | TEXT is the text of the target. INFO is a plist holding | |
| 532 | contextual information. | |
| 533 | ||
| 534 | (fn RADIO-TARGET TEXT INFO) | |
| 535 | (defalias 'org-html-radio-target #[771 "\300\"\301\302$\207" [org-export-get-reference org-html--anchor nil] 9 (#$ . 113445)]) | |
| 536 | #@178 Transcode a SPECIAL-BLOCK element from Org to HTML. | |
| 537 | CONTENTS holds the contents of the block. INFO is a plist | |
| 538 | holding contextual information. | |
| 539 | ||
| 540 | (fn SPECIAL-BLOCK CONTENTS INFO) | |
| 541 | (defalias 'org-html-special-block #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\305!\205 \211\235\306\307\"\204A \304\310\"\311\310\203< \312Q\202> #\266\202\206F \313\314\211;\203V \302\303#\202\\ \304A@\"\266\202\315\203j \316\317\"\203n \202s \311\317#!\320!\203\200 \312P\202\201 \313\203\222 \321\322 %\202\230 \321\323#\266\204\207" [org-html-html5-elements :type get-text-property 0 plist-get org-html--html5-fancy-p org-export-read-attribute :attr_html :class plist-put " " "" :name org-html--make-attribute-string plist-member :id org-string-nw-p format "<%s%s>\n%s</%s>" "<div%s>\n%s\n</div>"] 16 (#$ . 113744)]) | |
| 542 | #@169 Transcode a SRC-BLOCK element from Org to HTML. | |
| 543 | CONTENTS holds the contents of the item. INFO is a plist holding | |
| 544 | contextual information. | |
| 545 | ||
| 546 | (fn SRC-BLOCK CONTENTS INFO) | |
| 547 | (defalias 'org-html-src-block #[771 "\300\301\302#\203\f \303!\207\304\211;\203 \305\306#\202! \307A@\"\266\202\310\"\311\211;\2036 \305\306#\202< \307A@\"\266\202\205E \312\"\211\203P \313\314\"\202Q \315\262\307\316\"\205] \317\235\204i \313\320#\202\321 \313\321\322 !\211\204w \315\202\251 \313\323\313\324\325\f\"\326 \327\330$\"\"\313\331\332 \"\327\333\203\233 \334\202\234 \335\315\333\336\315##\266\202#\262\262\203\307 \313\337\n\340\230\203\300 \341\202\301 \315\n%\202\320 \313\342 $#\207" [org-export-read-attribute :attr_html :textarea org-html--textarea-block :language get-text-property 0 plist-get org-html-format-code :name org-export-get-reference format " id=\"%s\"" "" :html-klipsify-src ("javascript" "js" "ruby" "scheme" "clojure" "php" "html") "<pre class=\"example\"%s>\n%s</pre>" "<div class=\"org-src-container\">\n%s%s\n</div>" org-export-get-caption "<span class=\"listing-number\">%s </span>" org-html--translate "Listing %d:" org-export-get-ordinal nil org-html--has-caption-p "<label class=\"org-src-name\">%s%s</label>" org-export-data replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'" "<pre><code class=\"src src-%s\"%s%s>%s</code></pre>" "html" " data-editor-type=\"html\"" "<pre class=\"src src-%s\"%s>%s</pre>"] 23 (#$ . 114602)]) | |
| 548 | #@160 Transcode a STATISTICS-COOKIE object from Org to HTML. | |
| 549 | CONTENTS is nil. INFO is a plist holding contextual information. | |
| 550 | ||
| 551 | (fn STATISTICS-COOKIE CONTENTS INFO) | |
| 552 | (defalias 'org-html-statistics-cookie #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304\305\"\207" [:value get-text-property 0 plist-get format "<code>%s</code>"] 9 (#$ . 116117)]) | |
| 553 | #@177 Transcode STRIKE-THROUGH from Org to HTML. | |
| 554 | CONTENTS is the text with strike-through markup. INFO is a plist | |
| 555 | holding contextual information. | |
| 556 | ||
| 557 | (fn STRIKE-THROUGH CONTENTS INFO) | |
| 558 | (defalias 'org-html-strike-through #[771 "\300\301\302\303\"\236A\206\f \304\"\207" [format strike-through plist-get :html-text-markup-alist "%s"] 8 (#$ . 116478)]) | |
| 559 | #@167 Transcode a SUBSCRIPT object from Org to HTML. | |
| 560 | CONTENTS is the contents of the object. INFO is a plist holding | |
| 561 | contextual information. | |
| 562 | ||
| 563 | (fn SUBSCRIPT CONTENTS INFO) | |
| 564 | (defalias 'org-html-subscript #[771 "\300\301\"\207" [format "<sub>%s</sub>"] 6 (#$ . 116828)]) | |
| 565 | #@171 Transcode a SUPERSCRIPT object from Org to HTML. | |
| 566 | CONTENTS is the contents of the object. INFO is a plist holding | |
| 567 | contextual information. | |
| 568 | ||
| 569 | (fn SUPERSCRIPT CONTENTS INFO) | |
| 570 | (defalias 'org-html-superscript #[771 "\300\301\"\207" [format "<sup>%s</sup>"] 6 (#$ . 117098)]) | |
| 571 | #@148 Transcode a TABLE-CELL element from Org to HTML. | |
| 572 | CONTENTS is nil. INFO is a plist used as a communication | |
| 573 | channel. | |
| 574 | ||
| 575 | (fn TABLE-CELL CONTENTS INFO) | |
| 576 | (defalias 'org-html-table-cell #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\262\305!\304\306\"\204( \307\202? \310\311\300!\2037 \2037 \312\2028 \313\314\"\"\203^ \315\316\203N \317\202O \320\307\316\321\307##\266\202\307\230\203a \322\262\323\"\203\206 \324\"\325U\203\206 \304\326\"\327\310@\330#AR\262\202\276 \304\331\"\203\255 \332\"A\303U\203\255 \304\326\"\327\310@\333#AR\262\202\276 \304\334\"\327\310@\"AR\262\207" [org-html-format-table-no-css :parent get-text-property 0 plist-get org-export-get-parent-table :html-table-align-individual-fields "" format boundp " align=\"%s\"" " class=\"org-%s\"" org-export-table-cell-alignment nil replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "[ \n ]+\\'" " " org-export-table-has-header-p org-export-table-row-group 1 :html-table-header-tags "\n" "col" :html-table-use-header-tags-for-first-column org-export-table-cell-address "row" :html-table-data-tags] 15 (#$ . 117374)]) | |
| 577 | #@166 Transcode a TABLE-ROW element from Org to HTML. | |
| 578 | CONTENTS is the contents of the row. INFO is a plist used as a | |
| 579 | communication channel. | |
| 580 | ||
| 581 | (fn TABLE-ROW CONTENTS INFO) | |
| 582 | (defalias 'org-html-table-row #[771 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304=\205\300 \305\"\306\"\307\"\310\"\311\232\2056 \211\312\232\313\232\205? \314\232\303\315\"\316!\203_ \211\211 &\262\202c \211\211\262\262\303\317\"\316!\203\205 \211\211\n &\262\202\211 \211\211\262\262\320U\204\226 \321\202\246 \322\323\f!\n\"\203\245 \324\202\246 \325\205\255 \211@\326 \326\260\205\275 AQ\266\211\207" [:type get-text-property 0 plist-get standard org-export-table-row-group org-export-table-row-number org-export-table-row-starts-rowgroup-p org-export-table-row-ends-rowgroup-p (top) (below top) (above) (bottom above) :html-table-row-open-tag functionp :html-table-row-close-tag 1 ("<tbody>" . "\n</tbody>") org-export-table-has-header-p org-export-get-parent-table ("<thead>" . "\n</thead>") ("<tbody>" . "\n</tbody>") "\n"] 19 (#$ . 118531)]) | |
| 583 | #@101 Transcode the first row of TABLE. | |
| 584 | INFO is a plist used as a communication channel. | |
| 585 | ||
| 586 | (fn TABLE INFO) | |
| 587 | (defalias 'org-html-table-first-row-data-cells #[514 "\300\301\302\303%\304!\211\204* \211:\204 \305\202% \211@9\203$ \211AA\202% \211\262\202D \211:\2044 \305\202A \211@9\203@ \211AA\202A \211\262A\207" [org-element-map table-row #[257 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304=?\205 \211\207" [:type get-text-property 0 plist-get rule] 7 "\n\n(fn ROW)"] first-match org-export-table-has-special-column-p nil] 8 (#$ . 119625)]) | |
| 588 | #@101 Format table.el tables into HTML. | |
| 589 | INFO is a plist used as a communication channel. | |
| 590 | ||
| 591 | (fn TABLE INFO) | |
| 592 | (defalias 'org-html-table--table\.el-table #[514 "\300\211;\203 \301\302#\202 \303A@\"\266\202\304=\205\210 \305\306!\210r\307\310!q\210\311 \210p)\312\313!r\211q\210\314\302\315\316\317!\320\"\321$\216\322\211;\203M \301\302#\202S \303A@\"\266\202c\210\323b\210\324\325\326\327#\210\330\331\"\210*\210r\211q\210\332 \326\333\203w \334\202x \335\336\333\337\336##\266\202\340 \210)\262\207" [:type get-text-property 0 plist-get table\.el require table get-buffer-create "*org-export-table*" erase-buffer generate-new-buffer " *temp*" make-byte-code "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 :value 1 re-search-forward "^[ ]*|[^|]" nil t table-generate-source html buffer-string replace-regexp-in-string "\\`\\([ ]*\n\\)+" "\\`[ \n ]+" "" "[ \n ]+\\'" kill-buffer] 12 (#$ . 120185)]) | |
| 593 | #@159 Transcode a TABLE element from Org to HTML. | |
| 594 | CONTENTS is the contents of the table. INFO is a plist holding | |
| 595 | contextual information. | |
| 596 | ||
| 597 | (fn TABLE CONTENTS INFO) | |
| 598 | (defalias 'org-html-table #[771 "\301\211;\203 \302\303#\202 \304A@\"\266\202\305=\203! \306\"\207\307!\310\311\312$\313\314\315\211;\203< \302\303#\202B \304A@\"\266\202\205O \316\317\"D\320!?\205\\ \304\321\"\322\323\n\"#!\324\300!\203q \203q \325\202r \326\327\330\331\332\232\203 \332\202\202 \333P\204\213 \332\202\254 \330\304\n\334\"\203\230 \335\202\231 \336\337\330\340\341\" \"\342\343 \"R\" \f# %\207" [org-html-format-table-no-css :type get-text-property 0 plist-get table\.el org-html-table--table\.el-table org-export-get-caption org-export-get-ordinal nil org-html--has-caption-p org-html--make-attribute-string org-combine-plists :name :id org-export-get-reference org-html-html5-p :html-table-attributes org-export-read-attribute :attr_html boundp "align=\"%s\"" "class=\"org-%s\"" #[771 "\300\301\302\303\304\305\"\306\"\307\310%\311\"\312#\207" [mapconcat make-byte-code 257 "\302\301\"\303\301\"\205\f \304\305\306\307\310\311\305\300\"P\301#\"\312\301\"\205\" \313Q\207" vconcat vector [org-export-table-cell-alignment org-export-table-cell-starts-colgroup-p "\n<colgroup>" format "\n%s" org-html-close-tag "col" " " org-export-table-cell-ends-colgroup-p "\n</colgroup>"] 11 "\n\n(fn TABLE-CELL)" org-html-table-first-row-data-cells "\n"] 11 "\n\n(fn ALIGNSPEC TABLE INFO)"] format "<table%s>\n%s\n%s\n%s</table>" "" " " :html-table-caption-above "<caption class=\"t-above\">%s</caption>" "<caption class=\"t-bottom\">%s</caption>" "<span class=\"table-number\">" org-html--translate "Table %d:" "</span> " org-export-data] 19 (#$ . 121129)]) | |
| 599 | #@138 Transcode a TARGET object from Org to HTML. | |
| 600 | CONTENTS is nil. INFO is a plist holding contextual | |
| 601 | information. | |
| 602 | ||
| 603 | (fn TARGET CONTENTS INFO) | |
| 604 | (defalias 'org-html-target #[771 "\300\"\301\302\211$\207" [org-export-get-reference org-html--anchor nil] 9 (#$ . 122915)]) | |
| 605 | #@144 Transcode a TIMESTAMP object from Org to HTML. | |
| 606 | CONTENTS is nil. INFO is a plist holding contextual | |
| 607 | information. | |
| 608 | ||
| 609 | (fn TIMESTAMP CONTENTS INFO) | |
| 610 | (defalias 'org-html-timestamp #[771 "\300\301!\"\302\303\304\305\306#\"\207" [org-html-plain-text org-timestamp-translate format "<span class=\"timestamp-wrapper\"><span class=\"timestamp\">%s</span></span>" replace-regexp-in-string "--" "–"] 10 (#$ . 123188)]) | |
| 611 | #@162 Transcode UNDERLINE from Org to HTML. | |
| 612 | CONTENTS is the text with underline markup. INFO is a plist | |
| 613 | holding contextual information. | |
| 614 | ||
| 615 | (fn UNDERLINE CONTENTS INFO) | |
| 616 | (defalias 'org-html-underline #[771 "\300\301\302\303\"\236A\206\f \304\"\207" [format underline plist-get :html-text-markup-alist "%s"] 8 (#$ . 123610)]) | |
| 617 | #@133 Transcode VERBATIM from Org to HTML. | |
| 618 | CONTENTS is nil. INFO is a plist holding contextual | |
| 619 | information. | |
| 620 | ||
| 621 | (fn VERBATIM CONTENTS INFO) | |
| 622 | (defalias 'org-html-verbatim #[771 "\300\301\302\303\"\236A\206\f \304\305\306\211;\203 \307\310#\202# \302A@\"\266\202!\"\207" [format verbatim plist-get :html-text-markup-alist "%s" org-html-encode-plain-text :value get-text-property 0] 12 (#$ . 123935)]) | |
| 623 | #@166 Transcode a VERSE-BLOCK element from Org to HTML. | |
| 624 | CONTENTS is verse block contents. INFO is a plist holding | |
| 625 | contextual information. | |
| 626 | ||
| 627 | (fn VERSE-BLOCK CONTENTS INFO) | |
| 628 | (defalias 'org-html-verse-block #[771 "\300\301\302\303\304\305\306\307#\300\310\311!\"\302\312P #\266\202#\"\207" [format "<p class=\"verse\">\n%s</p>" replace-regexp-in-string "^[ ]+" #[257 "\300G\301\"\207" [org-html--make-string " "] 4 "\n\n(fn M)"] org-html-close-tag "br" nil "\\(?:%s\\)?[ ]*\n" regexp-quote "\n"] 14 (#$ . 124340)]) | |
| 629 | #@82 Filter to indent the HTML and convert HTML entities. | |
| 630 | ||
| 631 | (fn CONTENTS BACKEND INFO) | |
| 632 | (defalias 'org-html-final-function #[771 "\300\301!r\211q\210\302\303\304\305\306!\307\"\310$\216c\210\311\312!\210\313\314\"\203& \315ed\"\210\316ed\"*\207" [generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 set-auto-mode t plist-get :html-indent indent-region buffer-substring-no-properties] 10 (#$ . 124865)]) | |
| 633 | #@1005 Export current buffer to an HTML buffer. | |
| 634 | ||
| 635 | If narrowing is active in the current buffer, only export its | |
| 636 | narrowed part. | |
| 637 | ||
| 638 | If a region is active, export that region. | |
| 639 | ||
| 640 | A non-nil optional argument ASYNC means the process should happen | |
| 641 | asynchronously. The resulting buffer should be accessible | |
| 642 | through the `org-export-stack' interface. | |
| 643 | ||
| 644 | When optional argument SUBTREEP is non-nil, export the sub-tree | |
| 645 | at point, extracting information from the headline properties | |
| 646 | first. | |
| 647 | ||
| 648 | When optional argument VISIBLE-ONLY is non-nil, don't export | |
| 649 | contents of hidden elements. | |
| 650 | ||
| 651 | When optional argument BODY-ONLY is non-nil, only write code | |
| 652 | between "<body>" and "</body>" tags. | |
| 653 | ||
| 654 | EXT-PLIST, when provided, is a property list with external | |
| 655 | parameters overriding Org default settings, but still inferior to | |
| 656 | file-local settings. | |
| 657 | ||
| 658 | Export is done in a buffer named "*Org HTML Export*", which | |
| 659 | will be displayed when `org-export-show-temporary-export-buffer' | |
| 660 | is non-nil. | |
| 661 | ||
| 662 | (fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST) | |
| 663 | (defalias 'org-html-export-as-html #[1280 "\300\301\302\303&\207" [org-export-to-buffer html "*Org HTML Export*" #[0 "\300\301!\207" [set-auto-mode t] 2]] 14 (#$ . 125341) nil]) | |
| 664 | #@212 Assume the current region has Org syntax, and convert it to HTML. | |
| 665 | This can be used in any buffer. For example, you can write an | |
| 666 | itemized list in Org syntax in an HTML buffer and use this command | |
| 667 | to convert it. | |
| 668 | (defalias 'org-html-convert-region-to-html #[0 "\300\301!\207" [org-export-replace-region-by html] 2 (#$ . 126541) nil]) | |
| 669 | #@890 Export current buffer to a HTML file. | |
| 670 | ||
| 671 | If narrowing is active in the current buffer, only export its | |
| 672 | narrowed part. | |
| 673 | ||
| 674 | If a region is active, export that region. | |
| 675 | ||
| 676 | A non-nil optional argument ASYNC means the process should happen | |
| 677 | asynchronously. The resulting file should be accessible through | |
| 678 | the `org-export-stack' interface. | |
| 679 | ||
| 680 | When optional argument SUBTREEP is non-nil, export the sub-tree | |
| 681 | at point, extracting information from the headline properties | |
| 682 | first. | |
| 683 | ||
| 684 | When optional argument VISIBLE-ONLY is non-nil, don't export | |
| 685 | contents of hidden elements. | |
| 686 | ||
| 687 | When optional argument BODY-ONLY is non-nil, only write code | |
| 688 | between "<body>" and "</body>" tags. | |
| 689 | ||
| 690 | EXT-PLIST, when provided, is a property list with external | |
| 691 | parameters overriding Org default settings, but still inferior to | |
| 692 | file-local settings. | |
| 693 | ||
| 694 | Return output file's name. | |
| 695 | ||
| 696 | (fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST) | |
| 697 | (defalias 'org-html-export-to-html #[1280 "\303\304\305\"\206 \206 \306P\307\" \310\311 &)\207" [org-html-extension org-html-coding-system org-export-coding-system "." plist-get :html-extension "html" org-export-output-file-name org-export-to-file html] 15 (#$ . 126880) nil]) | |
| 698 | #@233 Publish an org file to HTML. | |
| 699 | ||
| 700 | FILENAME is the filename of the Org file to be published. PLIST | |
| 701 | is the property list for the given project. PUB-DIR is the | |
| 702 | publishing directory. | |
| 703 | ||
| 704 | Return output file name. | |
| 705 | ||
| 706 | (fn PLIST FILENAME PUB-DIR) | |
| 707 | (defalias 'org-html-publish-to-html #[771 "\301\302\303\304\305\"\206 \206 \306P%\207" [org-html-extension org-publish-org-to html "." plist-get :html-extension "html"] 10 (#$ . 128072)]) | |
| 708 | (provide 'ox-html) | |
