MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.117.158.174
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/org/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/org/org-html.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:07:24 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/org-html.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\210\313\314\315\316\311\304\317\320&\210\313\321\322\323\311\304\317\320&\210\313\324\325\326\311\304\327\330\317\320&	\210\313\331\305\332\311\304\317\333&\210\313\334\335\336\311\304\317\320&\210\313\337\340\341\311\304\317\342&\210\313\343\344\345\311\304\317\346&\207" [require org-exp format-spec custom-declare-group org-export-html nil "Options specific for HTML export of Org-mode files." :tag "Org Export HTML" :group org-export custom-declare-variable org-export-html-footnotes-section "<div id=\"footnotes\">\n<h2 class=\"footnotes\">%s: </h2>\n<div id=\"text-footnotes\">\n%s\n</div>\n</div>" "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." :type string org-export-html-footnote-format "<sup>%s</sup>" "The format for the footnote reference.\n%s will be replaced by the footnote reference itself." org-export-html-footnote-separator "<sup>, </sup>" "Text used to separate footnotes." :version "24.1" org-export-html-coding-system "Coding system for HTML export, defaults to `buffer-file-coding-system'." coding-system org-export-html-extension "html" "The extension for exported HTML files." org-export-html-xml-declaration '(("html" . "<?xml version=\"1.0\" encoding=\"%s\"?>") ("php" . "<?php echo \"<?xml version=\\\"1.0\\\" encoding=\\\"%s\\\" ?>\"; ?>")) "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." (choice (string :tag "Single declaration") (repeat :tag "Dependent on extension" (cons (string :tag "Extension") (string :tag "Declaration")))) org-export-html-style-include-scripts t "Non-nil means include the JavaScript snippets in exported HTML files.\nThe actual script is defined in `org-export-html-scripts' and should\nnot be modified." boolean] 10)
#@69 Basic JavaScript that is needed by HTML files produced by Org-mode.
(defvar org-export-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-2013 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>" (#$ . 2624))
#@280 The default style specification for exported HTML files.
Please use the variables `org-export-html-style' and
`org-export-html-style-extra' to add to this style.  If you wish to not
have the default style included, customize the variable
`org-export-html-style-include-default'.
(defconst org-export-html-style-default "<style type=\"text/css\">\n <!--/*--><![CDATA[/*><!--*/\n  html { font-family: Times, serif; font-size: 12pt; }\n  .title  { text-align: center; }\n  .todo   { color: red; }\n  .done   { color: green; }\n  .tag    { background-color: #add8e6; font-weight:normal }\n  .target { }\n  .timestamp { color: #bebebe; }\n  .timestamp-kwd { color: #5f9ea0; }\n  .right  {margin-left:auto; margin-right:0px;  text-align:right;}\n  .left   {margin-left:0px;  margin-right:auto; text-align:left;}\n  .center {margin-left:auto; margin-right:auto; text-align:center;}\n  p.verse { margin-left: 3% }\n  pre {\n	border: 1pt solid #AEBDCC;\n	background-color: #F3F5F7;\n	padding: 5pt;\n	font-family: courier, monospace;\n        font-size: 90%;\n        overflow:auto;\n  }\n  table { border-collapse: collapse; }\n  td, th { vertical-align: top;  }\n  th.right  { text-align:center;  }\n  th.left   { text-align:center;   }\n  th.center { text-align:center; }\n  td.right  { text-align:right;  }\n  td.left   { text-align:left;   }\n  td.center { text-align:center; }\n  dt { font-weight: bold; }\n  div.figure { padding: 0.5em; }\n  div.figure p { text-align: center; }\n  div.inlinetask {\n    padding:10px;\n    border:2px solid gray;\n    margin:10px;\n    background: #ffffcc;\n  }\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 { font-size:10px; font-weight:bold;\n                               white-space:nowrap; }\n  .org-info-js_search-highlight {background-color:#ffff00; color:#000000;\n                                 font-weight:bold; }\n  /*]]>*/-->\n</style>" (#$ . 4408))
(byte-code "\300\301\302\303\304\305\306\307&\210\310\301\311\312#\210\300\313\314\315\304\305\306\316&\210\310\313\311\317#\210\300\320\314\321\304\305\306\316&\210\310\320\311\317#\210\300\322\323\324\304\305\325\326\306\327&	\207" [custom-declare-variable org-export-html-style-include-default t "Non-nil means include the default style in exported HTML files.\nThe actual style is defined in `org-export-html-style-default' and should\nnot be modified.  Use the variables `org-export-html-style' to add\nyour own style information." :group org-export-html :type boolean put safe-local-variable booleanp org-export-html-style "" "Org-wide style definitions for exported HTML files.\n\nThis variable needs to contain the full HTML structure to provide a style,\nincluding the surrounding HTML tags.  If you set the value of this variable,\nyou should consider to include definitions for the following classes:\n title, todo, done, 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'd like to refer to an external style file, 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 <head> header,\nyou can \"misuse\" it to add arbitrary text to the header.\nSee also the variable `org-export-html-style-extra'." string stringp org-export-html-style-extra "Additional style information for HTML export.\nThe value of this variable is inserted into the HTML buffer right after\nthe value of `org-export-html-style'.  Use this variable for per-file\nsettings of style information, and do not forget to surround the style\nsettings with <style>...</style> tags." org-export-html-mathjax-options '((path "http://orgmode.org/mathjax/MathJax.js") (scale "100") (align "center") (indent "2em") (mathml nil)) "Options for MathJax setup.\n\npath        The path where to find MathJax\nscale       Scaling for the HTML-CSS backend, usually between 100 and 133\nalign       How to align display math: left, center, or right\nindent      If align is not center, how far from the left/right side?\nmathml      Should a MathML player be used if available?\n            This is faster and reduces bandwidth use, but currently\n            sometimes has lower spacing quality.  Therefore, the default is\n            nil.  When browsers get better, this switch can be flipped.\n\nYou can also customize this for each buffer, using something like\n\n#+MATHJAX: scale:\"133\" align:\"right\" mathml:t path:\"/MathJax/\"" :version "24.1" (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 "indent (indentation with left or right alignment)" (const :format "       " indent) (string)) (list :tag "mathml (should MathML display be used is possible)" (const :format "       " mathml) (boolean)))] 10)
#@51 Insert the user setup into the matchjax template.
(defalias 'org-export-html-mathjax-config #[(template options in-buffer) "\306\211\307\310\306\311\312
\"\210\313
\236A@\314\315\"\203'\316\317\225\306O!@\2041\n	\314\320\"\203B\321\n\322\211$\314\323\"\203S\321	\322\211$-\207" [x no yes val name options nil "   " "// " mapc #[(e) "@A@\305\306\307	!\310Q\"\203\311\312\225\313O!@\n;\204&\314\315\n\"\316\317\307	!\226P\n\f\320\211%\211\207" [e name val in-buffer template string-match "\\<" symbol-name ":" read-from-string 0 nil format "%s" replace-regexp-in-string "%" t] 6] mathml string-match "\\<mathml:" read-from-string 0 ":MMLYES:" replace-match t ":MMLNO:" in-buffer template] 5 (#$ . 9815)])
(byte-code "\300\301\302\303\304\305\306\307\310\311&	\210\300\312\313\314\304\305\310\311&\210\300\315\313\316\304\305\310\311&\210\300\317\320\321\304\305\306\307\310\311&	\210\300\322\323\324\304\305\310\325&\210\300\326\327\330\304\305\306\307\310\311&	\210\300\331\332\333\304\305\310\334&\210\300\335\336\337\304\305\306\307\310\311&	\210\300\340\341\342\304\305\310\311&\210\300\343\344\345\304\305\310\311&\210\300\346\323\347\304\305\310\350&\210\300\351\352\353\304\305\310\354&\210\300\355\356\357\304\305\310\360&\210\300\361\362\363\304\305\310\311&\210\300\364\365\366\304\367\310\370&\210\300\371\372\373\304\367\310\374&\210\300\375\376\377\304\367\310\201@&\210\300\201A\323\201B\304\367\306\307\310\350&	\210\300\201C\201D\201E\304\367\310\350&\210\300\201F\201G\201H\304\305\310\311&\207" [custom-declare-variable org-export-html-mathjax-template "<script type=\"text/javascript\" src=\"%PATH\">\n/**\n *\n * @source: %PATH\n *\n * @licstart  The following is the entire license notice for the\n *  JavaScript code in %PATH.\n *\n * Copyright (C) 2012-2013  MathJax\n *\n * Licensed under the Apache License, Version 2.0 (the \"License\");\n * you may not use this file except in compliance with the License.\n * You may obtain a copy of the License at\n *\n *     http://www.apache.org/licenses/LICENSE-2.0\n *\n * Unless required by applicable law or agreed to in writing, software\n * distributed under the License is distributed on an \"AS IS\" BASIS,\n * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\n * See the License for the specific language governing permissions and\n * limitations under the License.\n *\n * @licend  The above is the entire license notice\n * for the JavaScript code in %PATH.\n *\n */\n\n/*\n@licstart  The following is the entire license notice for the\nJavaScript code below.\n\nCopyright (C) 2012-2013 Free Software Foundation, Inc.\n\nThe JavaScript code below 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 below.\n*/\n<!--/*--><![CDATA[/*><!--*/\n    MathJax.Hub.Config({\n        // Only one of the two following lines, depending on user settings\n        // First allows browser-native MathML display, second forces HTML/CSS\n        :MMLYES: config: [\"MMLorHTML.js\"], jax: [\"input/TeX\"],\n        :MMLNO: jax: [\"input/TeX\", \"output/HTML-CSS\"],\n        extensions: [\"tex2jax.js\",\"TeX/AMSmath.js\",\"TeX/AMSsymbols.js\",\n                     \"TeX/noUndefined.js\"],\n        tex2jax: {\n            inlineMath: [ [\"\\\\(\",\"\\\\)\"] ],\n            displayMath: [ ['$$','$$'], [\"\\\\[\",\"\\\\]\"], [\"\\\\begin{displaymath}\",\"\\\\end{displaymath}\"] ],\n            skipTags: [\"script\",\"noscript\",\"style\",\"textarea\",\"pre\",\"code\"],\n            ignoreClass: \"tex2jax_ignore\",\n            processEscapes: false,\n            processEnvironments: true,\n            preview: \"TeX\"\n        },\n        showProcessingMessages: true,\n        displayAlign: \"%ALIGN\",\n        displayIndent: \"%INDENT\",\n\n        \"HTML-CSS\": {\n             scale: %SCALE,\n             availableFonts: [\"STIX\",\"TeX\"],\n             preferredFont: \"TeX\",\n             webFont: \"TeX\",\n             imageFont: \"TeX\",\n             showMathMenu: true,\n        },\n        MMLorHTML: {\n             prefer: {\n                 MSIE:    \"MML\",\n                 Firefox: \"MML\",\n                 Opera:   \"HTML\",\n                 other:   \"HTML\"\n             }\n        }\n    });\n/*]]>*///-->\n</script>" "The MathJax setup for XHTML files." :group org-export-html :version "24.1" :type string org-export-html-tag-class-prefix #1="" "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-export-html-todo-kwd-class-prefix "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." org-export-html-headline-anchor-format "<a name=\"%s\" id=\"%s\"></a>" "Format for anchors in HTML headlines.\nIt requires to %s: both will be replaced by the anchor referring\nto the headline (e.g. \"sec-2\").  When set to `nil', don't insert\nHTML anchors in headlines." org-export-html-preamble t "Non-nil means insert a preamble in HTML export.\n\nWhen `t', insert a string as defined by one of the formatting\nstrings in `org-export-html-preamble-format'.  When set to a\nstring, this string overrides `org-export-html-preamble-format'.\nWhen set to a function, apply this function and insert the\nreturned string.  The function takes no argument, but you can\nuse `opt-plist' to access the current export options.\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 format string") (function :tag "Function (must return a string)")) org-export-html-preamble-format '(("en" #1#)) "Alist of languages and format strings for the HTML preamble.\n\nTo enable the HTML exporter to use these formats, you need to set\n`org-export-html-preamble' to `t'.\n\nThe first element of each list is the language code, as used for\nthe #+LANGUAGE keyword.\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%a stands for the author's name.\n%e stands for the author's email.\n%d stands for the date.\n\nIf you need to use a \"%\" character, you need to escape it\nlike that: \"%%\"." org-export-html-postamble 'auto "Non-nil means insert a postamble in HTML export.\n\nWhen `t', insert a string as defined by the format string in\n`org-export-html-postamble-format'.  When set to a string, this\nstring overrides `org-export-html-postamble-format'.  When set to\n'auto, discard `org-export-html-postamble-format' and honor\n`org-export-author/email/creator-info' variables.  When set to a\nfunction, apply this function and insert the returned string.\nThe function takes no argument, but you can use `opt-plist' to\naccess the current export options.\n\nSetting :html-postamble in publishing projects will take\nprecedence over this variable." (choice (const :tag "No postamble" nil) (const :tag "Auto preamble" 'auto) (const :tag "Default format string" t) (string :tag "Custom format string") (function :tag "Function (must return a string)")) org-export-html-postamble-format '(("en" "<p class=\"author\">Author: %a (%e)</p>\n<p class=\"date\">Date: %d</p>\n<p class=\"creator\">Generated by %c</p>\n<p class=\"xhtml-validation\">%v</p>\n")) "Alist of languages and format strings for the HTML postamble.\n\nTo enable the HTML exporter to use these formats, you need to set\n`org-export-html-postamble' to `t'.\n\nThe first element of each list is the language code, as used for\nthe #+LANGUAGE keyword.\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%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 information about Org/Emacs versions.\n%v will be replaced by `org-export-html-validation-link'.\n\nIf you need to use a \"%\" character, you need to escape it\nlike that: \"%%\"." org-export-html-home/up-format "<div id=\"org-div-home-and-up\" style=\"text-align:right;font-size:70%%;white-space:nowrap;\">\n <a accesskey=\"h\" href=\"%s\"> UP </a>\n |\n <a accesskey=\"H\" href=\"%s\"> HOME </a>\n</div>" "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-export-html-link-up' and\n`org-export-html-link-home' are empty, the entire snippet will be\nignored." org-export-html-toplevel-hlevel 2 "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." org-export-html-link-org-files-as-html "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-mode files (recognized by the\nextension `.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." boolean org-export-html-inline-images 'maybe "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.  If this option is `maybe', then images in links with\nan empty description will be inlined, while images with a description will\nbe linked only." (choice (const :tag "Never" nil) (const :tag "Always" t) (const :tag "When there is no description" maybe)) org-export-html-inline-image-extensions '("png" "jpeg" "jpg" "gif" "svg") "Extensions of image files that can be inlined into HTML." (repeat (string :tag "Extension")) org-export-html-table-tag "<table border=\"2\" cellspacing=\"0\" cellpadding=\"6\" rules=\"groups\" frame=\"hsides\">" "The HTML tag that is used to start a table.\nThis must be a <table> tag, but you may change the options like\nborders and spacing." org-export-table-header-tags '("<th scope=\"%s\"%s>" . "</th>") "The opening tag 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-export-html-table-use-header-tags-for-first-column'.\nSee also the variable `org-export-html-table-align-individual-fields'." org-export-tables (cons (string :tag "Opening tag") (string :tag "Closing tag")) org-export-table-data-tags '("<td%s>" . "</td>") "The opening tag 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-export-html-table-align-individual-fields'." (cons (string :tag "Opening tag") (string :tag "Closing tag")) org-export-table-row-tags '("<tr>" . "</tr>") "The opening tag for table data fields.\nThis is customizable so that alignment options can be specified.\nInstead of strings, these can be Lisp forms that will be evaluated\nfor each row in order to construct the table row tags.  During evaluation,\nthe variable `head' will be true when this is a header line, nil when this\nis a body line.  And the variable `nline' will contain the line number,\nstarting from 1 in the first header line.  For example\n\n  (setq org-export-table-row-tags\n        (cons '(if head\n                   \"<tr>\"\n                 (if (= (mod nline 2) 1)\n                     \"<tr class=\\\"tr-odd\\\">\"\n                   \"<tr class=\\\"tr-even\\\">\"))\n              \"</tr>\"))\n\nwill give even lines the class \"tr-even\" and odd lines the class \"tr-odd\"." (cons (choice :tag "Opening tag" (string :tag "Specify") (sexp)) (choice :tag "Closing tag" (string :tag "Specify") (sexp))) org-export-html-table-align-individual-fields "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." org-export-html-table-use-header-tags-for-first-column nil "Non-nil means format column one in tables with header tags.\nWhen nil, also column one will use data tags." org-export-html-validation-link "<a href=\"http://validator.w3.org/check?uri=referer\">Validate XHTML 1.0</a>" "Link to HTML validation service."] 10)
#@61 If non-nil, write container for HTML-helper-mode timestamp.
(defvar org-export-html-with-timestamp nil (#$ . 23944))
#@64 The HTML tag used as timestamp delimiter for HTML-helper-mode.
(defvar org-export-html-html-helper-timestamp "\n<p><br/><br/>\n<!-- hhmts start --> <!-- hhmts end --></p>\n" (#$ . 24067))
(byte-code "\300\301\302\303\304\305\306\307\310\311&	\210\312\313\314\315\316\317\304\305&\210\300\320\321\322\304\313\310\323&\210\300\324\325\326\304\313\310\327&\210\300\330\314\331\304\313\310\332&\207" [custom-declare-variable org-export-html-protect-char-alist '(("&" . "&amp;") ("<" . "&lt;") (">" . "&gt;")) "Alist of characters to be converted by `org-html-protect'." :group org-export-html :version "24.1" :type (repeat (cons (string :tag "Character") (string :tag "HTML equivalent"))) custom-declare-group org-export-htmlize nil "Options for processing examples with htmlize.el." :tag "Org Export Htmlize" org-export-htmlize-output-type 'inline-css "Output type to be used by htmlize when formatting code snippets.\nChoices are `css', to export the CSS selectors only, or `inline-css', to\nexport the CSS attribute values inline in the HTML.  We use as default\n`inline-css', in order to make 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-export-htmlize-generate-css] to extract class definitions." (choice (const css) (const inline-css)) org-export-htmlize-css-font-prefix "org-" "The prefix for CSS class names for htmlize font specifications." string org-export-htmlized-org-css-url "URL pointing to a CSS file defining text colors for htmlized Emacs buffers.\nNormally when creating an htmlized version of an Org buffer, htmlize will\ncreate CSS to define the font colors.  However, this does not work when\nconverting in batch mode, and it also can look bad if different people\nwith different fontification setup work on the same website.\nWhen this variable is non-nil, creating an htmlized version of an Org buffer\nusing `org-export-as-org' will remove the internal CSS section and replace it\nwith a link to this URL." (choice (const :tag "Keep internal css" nil) (string :tag "URL or local href"))] 10)
#@158 The name of the container DIV that holds all the page contents.

This variable is obsolete since Org version 7.7.
Please set `org-export-html-divs' instead.
(defvar org-export-html-content-div "content" (#$ . 26708))
(byte-code "\300\301\302\303\304\305\306\307\310\311&	\210\300\312\313\314\304\305\306\307\310\315&	\207" [custom-declare-variable org-export-html-divs '("preamble" "content" "postamble") "The name of the main divs for HTML export.\nThis is a list of three strings, the first one for the preamble\nDIV, the second one for the content DIV and the third one for the\npostamble DIV." :group org-export-html :version "24.1" :type (list (string :tag " Div for the preamble:") (string :tag "  Div for the content:") (string :tag "Div for the postamble:")) org-export-html-date-format-string "%Y-%m-%dT%R%z" "Format string to format the date and time.\n\nThe default is an extended format of the ISO 8601 specification." string] 10)
#@72 Hook run during HTML export, after blockquote, verse, center are done.
(defvar org-export-html-after-blockquotes-hook nil (#$ . 27657))
#@56 Hook run at the end of HTML export, in the new buffer.
(defvar org-export-html-final-hook nil (#$ . 27799))
#@36 Convert LaTeX fragments to images.
(defalias 'org-export-html-preprocess #[(parameters) "\203Y\306	\307\"\203Y\310\n\311\312!!P\313\314\313\211\306	\307\"\315=\203%\315\202V\306	\307\"\316=\2032\316\202V\306	\307\"\317=\203?\316\202V\306	\307\"\320=\203L\320\202V\306	\307\"\321=\205V\321&\210eb\210\313\211\322\323\313\317#\205\232\324\325\224\326\"\204`\327\325!\330 \331\216\332\333
\"\203\212
\325\224\313O\202\214
*\334\335\336
\f#\317\211#\210\202`*\207" [org-current-export-file parameters org-latex-preview-ltxpng-directory org-current-export-dir l1 label plist-get :LaTeX-fragments org-format-latex file-name-sans-extension file-name-nondirectory nil "Creating LaTeX image %s" verbatim mathjax t imagemagick dvipng re-search-forward "\\\\ref{\\([^{}\n]+\\)}" get-text-property 1 org-protected match-string match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "\\`[a-z]\\{1,10\\}:\\(.+\\)" replace-match format "[[#%s][%s]]" save-match-data-internal] 10 (#$ . 27913)])
#@264 Export the outline as HTML and immediately open it with a browser.
If there is an active region, export only the region.
The prefix ARG specifies how many levels of the outline should become
headlines.  The default is 3.  Lower levels will become bulleted lists.
(defalias 'org-export-as-html-and-open #[(arg) "\303!\210\304	!\210\n\205\305p!\207" [arg buffer-file-name org-export-kill-product-buffer-when-displayed org-export-as-html org-open-file kill-buffer] 2 (#$ . 28981) "P"])
#@256 Call the function `org-export-as-html'.
This function can be used in batch processing as:
emacs   --batch
        --load=$HOME/lib/emacs/org.el
        --eval "(setq org-export-headline-levels 2)"
        --visit=MyFile --funcall org-export-as-html-batch
(defalias 'org-export-as-html-batch #[nil "\301!\207" [org-export-headline-levels org-export-as-html] 2 (#$ . 29474)])
#@141 Call `org-export-as-html` with output to a temporary buffer.
No file is created.  The prefix ARG is passed through to `org-export-as-html'.
(defalias 'org-export-as-html-to-buffer #[(arg) "\302\303\304#\210	\205
\305\304!\207" [arg org-export-show-temporary-export-buffer org-export-as-html nil "*Org HTML Export*" switch-to-buffer-other-window] 4 (#$ . 29856) "P"])
#@229 Assume the current region has org-mode syntax, and convert it to HTML.
This can be used in any buffer.  For example, you could write an
itemized list in org-mode syntax in an HTML buffer and then use this
command to convert it.
(defalias 'org-replace-region-by-html #[(beg end) "\306\211\211\211\307 \310\216\311\312!\203\313
\314\315$\202@
{\316\317!r	q\210\320 \210c\210\312 \210\313ed\314\315$)\321	!\210*
|\210\nc,\207" [pop-up-frames buf html reg #1=#:wconfig beg nil current-window-configuration ((set-window-configuration #1#)) derived-mode-p org-mode org-export-region-as-html t string get-buffer-create "*Org tmp*" erase-buffer kill-buffer end] 5 (#$ . 30232) "r"])
#@691 Convert region from BEG to END in org-mode buffer to HTML.
If prefix arg BODY-ONLY is set, omit file header, footer, and table of
contents, and only produce the region of converted text, useful for
cut-and-paste operations.
If BUFFER is a buffer or a string, use/create that buffer as a target
of the converted HTML.  If BUFFER is the symbol `string', return the
produced HTML as a string and leave not buffer behind.  For example,
a Lisp program could call this function in the following way:

  (setq html (org-export-region-as-html beg end t 'string))

When called interactively, the output buffer is selected, and shown
in a window.  A non-interactive call will only return the buffer.
(defalias 'org-export-region-as-html #[(beg end &optional body-only buffer) "\306\307!\203\310\311\211\312\211\313\n\314\311#
b\210\315`!\210b\210\316\312\n $\317\320!\203\265\312!\f\204;!\205\263\"\321=\203I\f\242\321=\202K\"\203\206\322 \203\206\323 \203\206#\203i\324\325#\"\210\312#\202\206\326 \327 U\204\206\330\325!\204}\331\325!\204\206\324\325\326 \327 {\"\210!\204\243\f\332=\204\235\f\242\321=\203\243\fA\204\243\312\211\202\263\f\242\321=\203\255\fA\312$\333\334!)\210\306\307!\203\307\335	!\203\307\336	!\202\310	,\207" [buffer rtn ext-plist zmacs-regions transient-mark-mode end called-interactively-p any "*Org HTML Export*" t nil plist-put :ignore-subtree-p set-mark org-export-as-html fboundp deactivate-mark only region-active-p display-selections-p x-set-selection PRIMARY region-beginning region-end x-selection-owner-p x-selection-exists-p lambda run-hooks deactivate-mark-hook bufferp switch-to-buffer-other-window beg body-only force select-active-regions saved-region-selection mark-active] 5 (#$ . 30933) "r\nP"])
(defvar html-table-tag nil)
(defvar org-par-open nil)
#@244 Function to convert link URLs to exportable URLs.
Takes two arguments, TYPE and PATH.
Returns exportable url as (TYPE PATH), or nil to signal that it
didn't handle this case.
Intended to be locally bound around a call to `org-export-as-html'.
(defconst org-html-cvt-link-fn nil (#$ . 32769))
#@151 Convert an org filename to an equivalent html filename.
If TYPE is not file, just return `nil'.
See variable `org-export-html-link-org-files-as-html'
(defalias 'org-html-cvt-org-as-html #[(opt-plist type path) "\305 \306\216	\205#\n\307\230\205#\310\311\"\205#\307\312\211\224O\313\314\f\315\"QD*\207" [save-match-data-internal org-export-html-link-org-files-as-html type path opt-plist match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "file" string-match "\\.org$" 0 "." plist-get :html-extension] 6 (#$ . 33068)])
#@284 Return non-nil if link FILENAME should be inlined.
The decision to inline the FILENAME link is based on the current
settings.  DESCP is the boolean of whether there was a link
description.  See variables `org-export-html-inline-images' and
`org-export-html-inline-image-extensions'.
(defalias 'org-html-should-inline-p #[(filename descp) "\304=\204\205	?\205\305\n\"\207" [org-export-html-inline-images descp filename org-export-html-inline-image-extensions t org-file-image-p] 3 (#$ . 33645)])
#@365 Make an HTML link.
OPT-PLIST is an options list.
TYPE is the device-type of the link (THIS://foo.html).
PATH is the path of the link (http://THIS#location).
FRAGMENT is the fragment part of the link, if any (foo.html#THIS).
DESC is the link description, if any.
ATTR is a string of other attributes of the "a" element.
MAY-INLINE-P allows inlining it as an image.
(defalias 'org-html-make-link #[(opt-plist type path fragment desc attr may-inline-p) "\306 \307\216	\310\230\203!\311	!\203\312\313	!P\202	D\2020\314\230\203-\315	D\2020	D
\203>\316
\f#\206H\316\317\f#\206H\f\211 @ \211!A@)\"\203s\320\230\204s\321\230\204s\310\230\204s\322\230\203\200#\203\200\"\323#Q\"\324\"!$\203\236\310\230\204\236\322\230\204\236\325$Q\202\240$)\"%\203\276#\204\276\326\327\"&#\210\330\"&\"\202\323\331\"\332'\205\313\333'P\334\335(!\336\260.\207" [save-match-data-internal path filename type components-1 org-html-cvt-link-fn match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "file" file-name-absolute-p "file://" expand-file-name "" nil apply org-html-cvt-org-as-html "http" "https" "coderef" "#" org-export-html-format-href ":" message "image %s %s" org-export-html-format-image "<a href=\"" "\"" " " ">" org-export-html-format-desc "</a>" opt-plist components-2 x thefile fragment str may-inline-p org-par-open attr desc] 8 (#$ . 34156)])
#@86 Return ORG-LINE with markup of Org mode links.
OPT-PLIST is the export options list.
(defalias 'org-html-handle-links #[(org-line opt-plist) "\306\203\307!\202\f	\310\n\311\"\312\211\211\211\211\211\211\211\211\211\211@ABCDEFGHIJ\313KLJ#\203#\306\224J\314 M\315\216\316\317\320L\"!*C\321\225\203`\317\321L\"\202{\314 M\322\216\323C!\206r\313\324C\"*\203z\325\202{\326G\327C!C\330\306\331C#B\332\225\205\225\317\332L\"\321\225\203\244G\333CQ\202\246C
\205\257
\f\232?@
\206\266\fA@\203\334AN\"\203\314 M\335\216\313\336A\"\203\334A\306\225\312OA*\337\340A\341\314 M\342\216\313\343B\"*\205\370B\344P\345B\346\347A!\350\260\351\"AG\326\232\203?\352C!\353U\203C\354\312O\202CO\355\n\345\211\356\314 M\357\216\316O!*\312\"AB\312&D)\202\nG\360\232\203}\361C!\211F\203}\314 M\362\216\363F\307P!\"F\355\n\325F\364C!\205m\365CPAB\312&D*\202\nG\366\235\203\234\355\nGC\312AB\367C@\"&D\202\nG\370\235\203\266\355\nGC\312AB\312&D\202\nG\371\230\203\362\372\373C\"Q\372\374Q\211#R\355\nG\345Q\372\375C@\205\336A\"\376CS\"A\"R\312&D*\202\n\377\321\376GT\"8\211E!\203\314 M\201\\\216E\316C!
\201]#*D\202\nG\325\230\203\360\314 M\201^\216\313\201_C\"\203H\201`\345\201a\312C$\317\354C\"D\202LC\312D\211U@VU\211WA@)\211X\205\207\313\201bX\"?\205\207\313\201cX\"?\205\207\313\201dX\"?\205\207\356\316X!!Y\313\336A\"\203\274\201`\345\201a\211A$Z\313\201eZ\"\203\266\201`\345\201a\211Z$\202\270Z)\202\276A[\377H!\203\326HVI\"\204\326A\202\351\355\n\325VY[B\367V@\"&D.\202\n\201fG\333\314 M\201g\216\316C!*\201h\260D\201`D\201a\211L$LJDG\\J\2024L.\207" [buffer-file-name default-directory opt-plist link desc2 desc1 0 file-name-directory plist-get :link-validation-function nil string-match match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-link-unescape match-string 3 2 ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) file-name-absolute-p "^\\.\\.?/" "file" "internal" org-extract-attributes get-text-property org-attributes 5 ":" org-file-image-p ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "^file:" org-add-props "<img src=\"" "\" " ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "width=" " " "" "alt=\"" file-name-nondirectory "\"/>" (org-protected t) string-to-char 35 1 org-html-make-link org-solidify-link-text ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "id" org-id-find-id-file ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) file-relative-name org-uuidgen-p "ID-" ("http" "https") org-html-should-inline-p ("ftp" "mailto" "news") "coderef" format "coderef-%s" "class=\"coderef\" onmouseover=\"CodeHighlightOn(this, '%s');\" onmouseout=\"CodeHighlightOff(this, '%s');\"" org-export-get-coderef-format assoc functionp descp desc attr path rpl fnc id-file type link-validate current-dir start org-bracket-link-analytic-regexp++ org-line save-match-data-internal org-export-html-inline-image-extensions frag-0 org-current-export-file coderef-str attr-1 org-export-code-refs org-link-protocols components path-1 x fragment-0 fragment-1 desc-1 desc-2 ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) html ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "::\\(.*\\)" replace-match t "^[0-9]*$" "^\\*" "^/.*/$" "\\.org$" "<i>&lt;" ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "&gt;</i>"] 15 (#$ . 35611)])
#@792 Export the outline as a pretty HTML file.
If there is an active region, export only the region.  The prefix
ARG specifies how many levels of the outline should become
headlines.  The default is 3.  Lower levels will become bulleted
lists.  EXT-PLIST is a property list with external parameters overriding
org-mode's default settings, but still inferior to file-local
settings.  When TO-BUFFER is non-nil, create a buffer with that
name and export to that buffer.  If TO-BUFFER is the symbol
`string', don't leave any buffer behind but just return the
resulting HTML as a string.  When BODY-ONLY is set, don't produce
the file header and footer, simply return the content of
<body>...</body>, without even the body tags themselves.  When
PUB-DIR is set, use this as the publishing directory.
(defalias 'org-export-as-html #[(arg &optional ext-plist to-buffer body-only pub-dir) "\306\307!\210\204-	\204-\n\204-\310 \203)\302r\310 q\210\n)\311\f!L\210*\202-\312\313!\210\314\315!\210\316\305
\"\210\316\317\"\210\316\320\"\210\316\321\"\210\322\323\324 @\325 #!A	\206]\326A\327\"\326A\330\"\205hB\326A\331\"\326A\332\"\333\326A\334\"\205}C\260D\326A\335\"E\336\211FG\336\211HIJK\337 \211L\205\242\340 ML\205\253\341 N\326A\342\"?\205\315L\205\315\212Mb\210\343 \205\314\344\345\211\"NY)\211O\203\352\212Mb\210P J\203\344\346\202\345\347\\)\202\353\347QO\203\373\350AM\"\202\375A\211RAS\206\f\351\352A\"T\nU\347V\353\211WX\336\211YZ\336\211[\\?\205P\354\355O\203;\356\340 \357\345#\206>\360\n!!\361EQ\362S\206N\351\352A\"!\"]\n\203\\\363\n!\202^^_\336`\203y\364=\203s\365\366!\202}\365!\202}\367]!a\370b\336\"c\371\326A\372\"!d\371\326A\373\"!ef\206\236\353g\371O\203\253\374 \206\323\326A\375\"\206\323	\204\304\326A\376\"\204\304\377 \206\323\n\203\320\355\360\n!!\206\323\201\300!h\326A\201\301\"\205\370\201\302\201\303\326A\201\301\"\"\205\370\326A\201\301\"i\326A\201\304\"\205\201\302\201\303\326A\201\304\"\"\205\326A\201\304\"j\201\305A\375h#\211Ak\326A\201\306\"l\201\307m\201\310Qn\201\311om\"p\336\211qr\336s\326A\201\312\"t\326A\201\313\"u\371\326A\201\314\"!v\371\326A\201\315\"!w\326A\201\316\"x\336y\347z\336{\347|\201\317\201}!\205\234}~\206\245~\200\206\256~\201\200\205\310\201\320\201\321!\205\310\201\321\200\201\322\"\202L\203\324\340 \202\325eL\203\337\341 \202\340d{\203\336\211\204\205\201\323\201\324!\206\356\336\201\325\345#\206\375\353\207\201\311\201\326\207\"\210\201\311\201\327\207\"\211\201\330\201\331\203\201\332\345\201\333\201\334\376\326A\376\"\201\335\326A\201\335\"\201\336\326A\201\336\"\201\337\326A\201\337\"\201\340\326A\201\340\"\201\341\326A\201\341\"\201\342\326A\201\342\"\201\343\326A\201\343\"\201\344\326A\201\344\"\201\345\326A\201\345\"\201\346\326A\201\346\"\201\347\326A\201\350\"\201\351\326A\201\351\"&\201\352\"\212\326A\201\351\"\201\215=\204\314\204\203\342\326A\201\351\"\345=\203\342\201\353\213\214\326A\201\354\"\206\336\353#\202\343\353\215\336\211\216\217\336\211\220\221\336\211\222\223\336\211\224\225\336\211\226\227\336\211\230\231\336\211\232\233\336\211\234\235\336\236\345\237\201\355\201\356 \345\211\240\241\201\357ed\201\360#\210*!\210)\314\315!\210\201\361\212Q\"\211\242\243\201\362 \210d\203h\201\302\201\363d\"\203h\201\364d!d\202ud\204u\201\364\244!d\201\365u\245\"\206\211\201\365\201\366\245\"yaq\210\345\237\201\367 \210)\201\370 \210\201\371 \210\201\320\201\372!\203\263\201\372\200!\210\336KJ\246\201\373\201\374\247\"\210\250\203\322\201\375\250!\202\324\251[\252\250\203\344\252[^\202\346[\\	\204O\201\311\201\376\201\311\253;\203\253\206\201\365E\253\"A\206\201\365\201\377\253\"A\206\353\202\206\"\201\"u\211h\202\2060\201hdewvD\215i\204Hj\203a\201\311\254i\206Tjj\206[i#\333P\202b\353&c\210\326A\201\"\2034\326A\201\"\353\255\211\256;\203\245\201\256\201hB\201eB\201dB\201tBF\"\255\202\201\256!\203\316\201\257@\201	\261\210\256 ;\203\306\256 c\210\201\nc\210\202\201\201\365y@\260\"\211\261A@)\206\362\201\365\201\366\260\"\211\261A@)\201hB\201eB\201dB\201tBF\"\255\201\256!\203\255\353\232\2043\201\257@\201	\261\210\255c\210\201\nc\210*\201\311\201\262\206C\257A@\"\201\fh\201
\261\210\252\203\260\201\311\201\263\201y8\263$GBG\201GBG\201GBG\201\201\212\"\212\243\242SV\203\236\243S\243\201GBG\202\205\201GBGH\205\256G\237G\347z\201\362 \210\201 \210\212\211A\212@\211W\211X\203\330\201\201\215\210\202\275q\203\347\201c\210\201 \210\201\346\336[\252\205\370V[XzA&\210[\347V\203I\203\201c\210\212eb\210\201\201\336\345#\203;\201\346!\234B\234\201\201\345\336#\210\347\224b\210\202)\234\203\\\201\311\264\201 y8\201!\201\"\234\237\333##\333\261\210\201# \211\265\203m\333\265\333\261\210)	\204\347\201c\210\326A\201$\"\201!\201%\201&t\201'\"\201(#\201)\201* \201+\201,\266!R\267t\270\326A\201$\"\203\346\201-\201.\2578\201	\261\210\270;\203\362\201\270\201eB\201tB\201dB\201/\267B\2010gB\257\"c\210\202\341\201\270!\203\n\270 ;\203\341\270 c\210\202\341\270\2011=\203\232\326A\2012\"\2031\2013\201.y8\2014d\2015\261\210\326A\2016\"\203Re\203R\2017yA@\2014e\2015\261\210\326A\2018\"\203lt\203l\2019t\2015\261\210\326A\201:\"\203\221\201;\201)\201* \201+\201,\266!\2015\260\261\210g\333\261\210\202\341\201\201\365y@\271\"\211\261A@)\206\276\201\365\201\366\271\"\211\261A@)\201eB\201tB\201dB\201/\267B\2010gB\257\"c\210\201<c\210+\272\203\360\273c\210	\204\371\201=c\210\326A\201>\"\204	\201? \210\274\201@\201\274!=\203	\201A \210eb\210G\203\212	\201\201B\336\345#\204:	\201\201C\336\345#\203G	\347\224b\210\201\353!\210\202\\	Ib\210\201D\201E!\203\\	\347\225b\210\333c\210\201Fc\210`\275\201\373\201GG\"\210\201c\210\201H\201I\275\345#\203\211	\201\353!\210\202s	)eb\210\201\201J\336\345#\203\242	\201\353!\210\202\215	eb\210eb\210\336\211\211\276\277\275\201K`\201L\"\211\275\203\364	\201M\275\201L\"\276\201K\275\201L\"\277\275b\210\275\277|\210\201\311\201N\201O\276\201P\"\"c\210\202\261	+eb\210\201D\201Q!\203\n\201\353!\210\201\357ed\201R#\210\306\201S!\210\204!\n\201T \210eb\210\201U\201V!\2044\n\314\201W!\210\364=\203F\ned{\201Xp!\210\202G\np.S\207" [to-buffer body-only buffer-file-name value var org-todo-line-regexp run-hooks org-export-first-hook buffer-base-buffer make-local-variable error "Need a file name to be able to export" message "Exporting..." set-default org-deadline-line-regexp org-done-keywords org-maybe-keyword-time-regexp org-export-process-option-filters org-combine-plists org-default-export-plist org-infile-export-plist plist-get :body-only :style-include-default :style :style-extra "\n" :style-include-scripts :html-extension nil org-region-active-p region-beginning region-end :ignore-subtree-p org-at-heading-p org-end-of-subtree t 1 0 org-export-add-subtree-options org-export-directory :html #1="" expand-file-name file-name-sans-extension org-entry-get "EXPORT_FILE_NAME" file-name-nondirectory "." file-name-as-directory file-name-directory string get-buffer-create "*Org HTML Export*" find-file-noselect make-vector org-html-expand :date :author org-export-get-title-from-subtree :title :skip-before-1st-heading org-export-grab-title-from-buffer ext-plist opt-plist org-export-html-style-default org-export-html-scripts style html-extension valid thetoc have-headings first-heading-pos org-odd-levels-only odd region-p rbeg rend subtree-p outline-level level-offset org-export-opt-plist pub-dir org-current-export-dir org-current-export-file level org-line origline txt todo umax umax-toc filename default-directory current-dir auto-insert buffer org-level-max org-levels-open date author org-export-html-validation-link html-validation-link title link-up link-home dummy html-table-tag org-quote-string quote-re0 org-heading-keyword-regexp-format quote-re inquote infixed inverse email language keywords description num lang-words head-count cnt start buffer-file-coding-system coding-system org-export-html-coding-system coding-system-for-write save-buffer-coding-system charset region org-export-have-math org-export-footnotes-seen org-export-footnotes-data custom-id footnote-def-prefix footnote-ref-prefix lines org-export-html-mathjax-template org-export-html-mathjax-options mathjax table-open table-buffer table-orig-buffer ind rpl path attr desc descp desc1 desc2 link snumber fnc footnotes footref-seen href inhibit-read-only inhibit-modification-hooks buffer-undo-list org-min-level org-last-level org-export-html-date-format-string org-export-language-setup case-fold-search org-export-plist-vars arg org-export-headline-levels org-export-with-toc org-export-html-xml-declaration org-export-html-home/up-format html-pre-real-contents html-pre org-export-html-divs org-export-html-preamble-format x org-export-html-content-div org-export-html-toplevel-hlevel org-export-html-footnotes-section bib emacs-major-version creator-info html-post org-export-html-postamble-format org-export-html-with-timestamp org-export-html-html-helper-timestamp major-mode beg n end "UNTITLED" :link-up string-match "\\S-" :link-home plist-put :html-table-tag "^ *" "\\( +\\|[ 	]*$\\)" format :email :language :keywords :description :section-numbers boundp fboundp coding-system-get mime-charset org-footnote-all-labels with-defs "CUSTOM_ID" "fn-%s" "fnr-%s" org-split-string org-export-preprocess-string :emph-multiline :for-backend html :drawers :todo-keywords :tasks :tags :priority :footnotes :timestamps :archived-trees :select-tags :exclude-tags :add-text :text :LaTeX-fragments "[
\n]" org-export-html-mathjax-config :mathjax set-buffer-modified-p buffer-modified-p remove-text-properties (:org-license-to-kill t) org-get-min-level org-init-section-numbers "%" format-time-string assoc "en" erase-buffer fundamental-mode org-install-letbind set-buffer-file-coding-system mapc #[(x) "\302\3038!\304	@\"L\207" [x opt-plist make-local-variable 2 plist-get] 4] prefix-numeric-value "%s\n<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"\n               \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"%s\" xml:lang=\"%s\">\n<head>\n<title>%s</title>\n<meta http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"/>\n<meta name=\"title\" content=\"%s\"/>\n<meta name=\"generator\" content=\"Org-mode\"/>\n<meta name=\"generated\" content=\"%s\"/>\n<meta name=\"author\" content=\"%s\"/>\n<meta name=\"description\" content=\"%s\"/>\n<meta name=\"keywords\" content=\"%s\"/>\n%s\n%s\n</head>\n<body>\n%s\n" "html" "iso-8859-1" :html-preamble format-spec 116 97 100 101 functionp "<div id=\"" "\">\n" "\n</div>\n" "\n<div id=\"%s\">" "\n<h1 class=\"title\">" "</h1>\n" "<h%d>%s</h%d>\n" 3 "<div id=\"text-table-of-contents\">\n" "<ul>\n<li>" mapcar #[(org-line) "\306	\"\203`\307\310\311	#\204`\312\313\314\225\314\224#\315\f!\316 \317\216\320\321\322\323	\"!!*,-\203B\324\224\203B\322\324	\".\235?\206T-\205T\f/U\205T\325	0\f#1\306\326,\"\203g\327\330\312\331,$,\3062,\"\203y\327\332\312\211,$,\333\f!34\203\2354\250\203\2204\fY\202\2224\203\2353\334,Q,\f5/]X\203\2546T6\f/X\203`\f7V\203\332\f7Z88S\2118\310Y\203\324\3359B9\202\300\3369B9\f7W\2037\fZ88S\2118\310Y\203\373\3379B9\202\347\3369B9\306:	\"\203\327\340\322\314	\"\341Q\312\211	$\202\306\342,\"\203-\327\332\312\211,$,\202\343\344\345\346\3473\"#;\350\351;<\"A\206E;!;\3461\203R\352\202S\353;,#9B9\f7	\207" [org-todo-line-regexp org-line have-headings level-offset level save-match-data-internal string-match get-text-property 0 org-protected t - 1 org-tr-level match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-html-expand org-export-cleanup-toc-line match-string 3 2 org-search-todo-below "[ 	]+:\\([[:alnum:]_@:]+\\):[ 	]*$" replace-match "&nbsp;&nbsp;&nbsp;<span class=\"tag\">\\1</span>" nil #1# org-section-number " " "\n<ul>\n<li>" "\n" "</li>\n</ul>" "@<span class=\"target\">" "@</span> " "&lt;\\(&lt;\\)+\\|&gt;\\(&gt;\\)+" replace-regexp-in-string "\\." "-" format "sec-%s" org-solidify-link-text assoc "</li>\n<li><a href=\"#%s\"><span class=\"todo\">%s</span></a>" "</li>\n<li><a href=\"#%s\">%s</a>" txt org-export-mark-todo-in-toc org-done-keywords umax-toc lines todo quote-re0 snumber num umax head-count org-last-level cnt thetoc org-any-target-regexp href org-export-preferred-target-alist] 6] "</li>\n</ul>\n" "</div>\n" org-open-par nextline (byte-code "\203\306	\n\"\203\307c\210\310 \210\311\203#\312\n!\313\261\210\314\315\311\"\210\203]\306\316\n\"\203]\f\204:\317\320 \210\321c\210\312\322\323\n\"!\313\261\210
\203P\306\316
@\"\204X\311\307c\210\310 \210\314\315\311\"\210\324\325\326\n#\203\336\327\325\326\n#\206n\330\nGW\204\336\311\324\325\331\n#@A\332\333`\334Z\317#\203\221\322\335!A\336\337!\210\n\313\261\210
\203\320
@G\325U\204\263@\203\263@\324\325\331
@#\232\203\320
@G\325U\204\304\324\325\326
@#\203\320
\211A@\313\261\210\202\226A\203\330\340c\210*\314\315\311\"\210\n\341\232\203\362\320 \210\342c\210\310 \210\314\315\311\"\210\n\343\232\203\320 \210\344c\210\310 \210\314\315\311\"\210\n\345\232\203\320 \210\346c\210\317\211BC\314\315\311\"\210\n\347\232\2034\350c\210\311B\310 \210\311C\314\315\311\"\210\n\351\232\203H\320 \210\352c\210\310 \210\314\315\311\"\210\n\353\232\203\\\320 \210\354c\210\310 \210\314\315\311\"\210\355\356!\210C\203\215\357\n!\211D\325V\203\201\360\361\362D\363_\364\"\365#\366\367\n!Q\306\370\n\"\204\214\n\371P)\325E\306\372\nE#\203\324\335\224\326\n#\203\251\335\225E\202\220\363\225\203\306\336\373\374\375\322\335\n\"!\375\322\335\n\"!#\317\211\n$\202\220F\203\347\376\n!\377\232\203\347\336\201e\322\335\n\"\201fQ\317\211\n$\202\220\336\201g\375\322\335\n\"!\201h\322\335\n\"\201i\260\317\211\n$\202\220\201j\n!\306G\n\"\204\"\306\201k\n\"\204\"\201l\n!\201m\nH\"I\203r\306I\n\"\203r\363\224\203r\n\325\363\224O\201n\322\363\n\"J\235\203T\201o\202W\201p\366\201q\322\363\n\"!\201r\322\363\n\"\201s\n\363\225\311O\260	K\203,\325E\306\201t\nE#\203,\324\363\224\326\n#\204\231\324\363\224\201u\n#\204\240\363\225E\202z\322\363\n\"\311\211LMN\201vNO\"\211L\203\316L\211AT\241\210\373\201wLA\"M\202\332\365MN\335BOBO\336\373\201x\373P\201yQ\201zR\201{\260\"P\322\335\n\"\206\373\365NMN\211&\201| S\201}\216\306\201~\n\325\225\311O\"*\203!T\202\"\365P\317\211\n$+\202z\306\201\n\"\203\250\201\200\201\201\335\225\335\224U#!V\322\363\n\"\206M\365W\306XW\"\203a\336\365\317\211W$WVYZ]X\203q[T[\\\206w`\\\201\202VWYF\205\214VYX[H&\210\306]\n\"\203\366\320 \210\201\203c\210\317\202\366^\203\374\306\201\204\n\"\203\374_\204\304\317_\311\211`a\n`B`baBa
\203\337\306\201\204
@\"\204\366\311_`\237`a\237a\320 \210\201\205`a\"c\210\202\366\324\325\201\206\n#\203!\201\207\n\324\325\201\206\n#\324\325\201\210\n#\324\325\201\211\n#$\306\201\212\n\"\203AB\2037\201\213c\210\202<\201\214c\210\314\315\311\"\210\306\201\215\n\"\203M\310 \210K\203\246\201\216\201c!\203m\306\201\217cP\n\"\203m\314\315\311\"\210\306\201\220\n\"\203\246\320 \210\322\335\n\"N\317B\336\373\201\221\373P\201\222R\201\223Q\201{\260\"PN\211\211$\317\211\n$)\306\370\n\"\203\271\336\201\224\317\211\n$\202\304d\203\304\n\201\224P\325EB\203\360\306\201\225\nE#\203\360\324\325\224\326\n#\204\351\336\201\226\317\211\n$\325\225E\202\307)\n\313\261\210\311\207" [inquote org-outline-regexp-bol org-line org-export-with-fixed-width infixed lines string-match "</pre>\n" org-open-par nil org-html-protect "\n" throw nextline "^[ 	]*:\\(\\([ 	]\\|$\\)\\(.*\\)\\)" t org-close-par-maybe "<pre class=\"example\">\n" match-string 3 get-text-property 0 org-protected next-single-property-change 10000 original-indentation re-search-backward "\\(<p>\\)\\([ 	
\n]*\\)\\=" 100 1 replace-match "\\2\n" "<p>\n" "ORG-BLOCKQUOTE-START" "<blockquote>\n" "ORG-BLOCKQUOTE-END" "\n</blockquote>\n" "ORG-VERSE-START" "\n<p class=\"verse\">\n" "ORG-VERSE-END" "</p>\n" "ORG-CENTER-START" "\n<div style=\"text-align: center\">" "ORG-CENTER-END" "\n</div>" run-hooks org-export-html-after-blockquotes-hook org-get-string-indentation mapconcat identity make-list 2 "\\nbsp" #1# " " org-trim "\\\\\\\\[ 	]*$" "\\\\" "<<<?\\([^<>]*\\)>>>?\\((INVISIBLE)\\)?[ 	]*\n?" format "@<a name=\"%s\" id=\"%s\">@</a>" org-solidify-link-text string-to-char 42 ind par org-par-open inverse i start org-export-with-toc org-table-hline-regexp opt-plist org-todo-line-regexp org-done-keywords org-export-with-footnotes a extra n footref-seen org-export-html-footnote-format footnote-ref-prefix footnote-def-prefix save-match-data-internal org-export-html-footnote-separator level-offset level txt quote-re0 umax umax-toc head-count first-heading-pos quote-re org-export-with-tables table-open table-buffer table-orig-buffer origline footnote-section-tag-regexp org-export-preserve-breaks "@<span class=\"target\">" "@</span> " "@<a name=\"" "\" class=\"target\">" "@</a> " org-html-handle-time-stamps "^[ 	]*\\([+]-\\||[ ]\\)[-+ |]*[+|][ 	]*$" org-html-expand org-html-handle-links "<span class=\"" "done" "todo" org-export-html-get-todo-kwd-class-name "\">" "</span>" "\\([^* 	].*?\\)\\[\\([0-9]+\\)\\]" org-footnote assoc ".%d" "%s" "<a class=\"footref\" name=\"" ".%s%s\" href=\"#" ".%s\">%s</a>" match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "\\`\\[[0-9]+\\]" "^\\(\\*+\\)\\(?: +\\(.*?\\)\\)?[ 	]*$" org-tr-level - org-html-level-start "<pre>" "^\\([ 	]*\\)\\(|\\|\\+-+\\+\\)" org-format-table-html list-item org-html-export-list-line list-struct list-prevs "^[ 	]*-\\{5,\\}[ 	]*$" "\n</p>\n<hr/>\n<p>\n" "\n<hr/>\n" "^ [-+*]-\\|^[ 	]*$" boundp "^" "^[ 	]*\\[\\([0-9]+\\)\\]" "<p class=\"footnote\">" "<a class=\"footnum\" name=\"" ".%s\" href=\"#" "<br/>" "\\\\par\\>" "</p ><p >"] 12) "</pre>\n" org-html-level-start re-search-forward "\\(\\(<p class=\"footnote\">\\)[^]*?\\)\\(\\(\\2\\)\\|\\'\\)" match-string replace-match "\\4" 4 mapconcat identity org-export-html-get-bibliography :html-postamble #[(e) "\301\302\211#\207" [e format "<a href=\"mailto:%s\">%s</a>"] 4] split-string ",+ *" ", " "<a href=\"http://orgmode.org\">Org</a> version " org-version " with <a href=\"http://www.gnu.org/software/emacs/\">Emacs</a> version " number-to-string "\n<div id=\"" 2 99 118 auto :time-stamp-file "<p class=\"date\">" ": " "</p>\n" :author-info "<p class=\"author\">" :email-info "<p class=\"email\">" :creator-info "<p class=\"creator\">" "\n</div>" "\n</body>\n</html>\n" :buffer-will-be-killed normal-mode default-value html-mode "<p>\\s-*\\[TABLE-OF-CONTENTS\\]\\s-*</p>" "\\[TABLE-OF-CONTENTS\\]" looking-at "\\s-*</p>" "<div id=\"table-of-contents\">\n" insert re-search-backward "<li>[ 
\n	]*</li>\n?" "<p>[ 
\n	]*</p>" next-single-property-change org-whitespace get-text-property "<span style=\"visibility:hidden;\">%s</span>" make-string 120 "\\s-+\n" (display t) org-export-html-final-hook save-buffer org-export-push-to-kill-ring "HTML" "Exporting... done" kill-buffer] 36 (#$ . 39417) "P"])
#@68 Make sure the S is valid as a href reference in an XHTML document.
(defalias 'org-export-html-format-href #[(s) "\303 \304\216\305\306\307\n	#\203\305\224\310\\\311\312\313\211\n$\202+\n\207" [save-match-data-internal start s match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) 0 string-match "&" 3 replace-match "&amp;" t] 5 (#$ . 59322)])
#@54 Make sure the S is valid as a description in a link.
(defalias 'org-export-html-format-desc #[(s) "\203\302\303\304#\204\305 \306\216\307!*\207\207" [s save-match-data-internal get-text-property 1 org-protected match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-html-do-expand] 4 (#$ . 59722)])
#@46 Create image tag with source and attributes.
(defalias 'org-export-html-format-image #[(src par-open) "\306 \307\216\310\311	!\n\"\203\312\313\n\314\315\n\"#\202\202\314\316\n\"\314\317\n\"\314\320\n\"\205/\321!\211\205O\312\322\203?\323\202@\324
\203M\312\325\326
!\"\202N\324#\312\327\n\310\330\f\206Y\324\"\203c\331\fP\202j\331\f\332\n\333\260#\205\200\312\334\335\336Q\203~\335\202\324#Q+*\207" [save-match-data-internal org-latex-preview-ltxpng-directory src caption attr label match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match regexp-quote format "<img src=\"%s\" alt=\"%s\"/>" org-find-text-property-in-string org-latex-src org-caption org-attributes org-label org-html-do-expand "%s<div %sclass=\"figure\">\n<p>" "</p>\n" "" "id=\"%s\" " org-solidify-link-text "<img src=\"%s\"%s />" "\\<alt=" " " " alt=\"" "\"" "</p>%s\n</div>%s" "\n<p>" "</p>" org-par-open] 10 (#$ . 60082)])
#@46 Find bibliography, cut it out and return it.
(defalias 'org-export-html-get-bibliography #[nil "\300\301\215\207" [exit (byte-code "\304\211\305\304\212eb\210\306\307\304\310#\203N\311\224\306\312\304\310#\203N	\313\311!\314\230\203,\305\202-\315\\\211\311U\203\316\317!\203>\305u\210`{`|\210\320\321\"\210\202-\304\207" [bib cnt end beg nil 1 re-search-forward "^[ 	]*<div \\(id\\|class\\)=\"bibliography\"" t 0 "</?div\\>" match-string "<div" -1 looking-at ">" throw exit] 5)] 2 (#$ . 61065)])
#@98 Find out which HTML converter to use and return the HTML code.
NO-CSS is passed to the exporter.
(defalias 'org-format-table-html #[(lines olines &optional no-css) ";\203\n\304\305\"\306\307@\"\203\310\311	#\207\312\n?\"\206#\313!\207" [lines no-css olines org-export-prefer-native-exporter-for-tables org-split-string "\n" string-match "^[ 	]*|" org-format-org-table-html nil org-format-table-table-html-using-table-generate-source org-format-table-table-html] 4 (#$ . 61586)])
#@287 Format a table into HTML.
LINES is a list of lines.  Optional argument SPLICE means, do not
insert header and surrounding <table> tags, just format the lines.
Optional argument NO-CSS means use XHTML attributes instead of CSS
for formatting.  This is required for the DocBook exporter.
(defalias 'org-format-org-table-html #[(lines &optional splice no-css) "\306\307!\210\310\311@\"\203A\237\310\311@\"\203A\237	\203(\312!\313\314@\"\313\315@\"\313\316@\"\313\317@\"\320,
\",-\205T\321\322\323\324A\"\".\325/\322\21101\3222\3253\322\21145\322\21167\322\21189\322\211:;\322\211<=\322\211>?\n\205\220\326\n!\f\203\237@\203\237\323\327\f\"A\203\247\322.A\204\273.\203\265\330\202\266\3317B7\3324\211A@\2115\203\320\333\334\215\210\202\276A\204\3404\203\340\3357B7A\204\353\3367B77\2377A\204TB@\204\337BABB\3252\340\3410\342#7B7>\237>9\203%7@\3437ABB7\n\2040C\344=\203=\345\346\n\2067\342\"7B7\203M\320,\345\347\350!\"\",,7B7\323\3517\"7\340\3527\353#\353P.\207" [lines org-export-table-remove-special-lines caption label col-cookies attributes require org-table string-match "^[ 	]*|-" org-table-clean-before-export org-find-text-property-in-string org-caption org-label org-col-cookies org-attributes org-export-splice-attributes delq nil mapcar #[(x) "\301\302\"\207" [x string-match "^[ 	]*|-"] 3] 0 org-html-do-expand #[(x) "@SAB\207" [x] 2] "<thead>" "<tbody>" t next-line (byte-code "\306\307\"\203+	\204$\n\203\310\202\311B\f\203\"\312B\202$\313\313\314\315\316\"\210\317\320\"\204B\321G\322\"\211GT\323\324@!\324A!\325\326\327#QB\313\207" [org-line splice head html lines tbopen string-match "^[ 	]*|-" "</thead>" "</tbody>" "<tbody>" nil throw next-line t org-split-string "[ 	]*|[ 	]*" make-vector 0 -1 eval mapconcat #[(x) "T\306\307\"\nW\203(\310\f\"\203(
\f
\f
\f
HTI\210*\203:\306@\311	#\fAQ\207\312U\203R\203R\306@\313	#\fAQ\207\306@	\"\fAQ\207" [i ali nfields org-table-number-regexp x fnum format "@@class%03d@@" string-match "col" 0 "row" #1=#:v #2=#:v head org-export-table-header-tags org-export-html-table-use-header-tags-for-first-column org-export-table-data-tags] 4] #3="" fields fnum nfields nline i org-export-table-row-tags rowstart rowend] 6) "</tbody>" "</table>\n" :start mapconcat #[(x) "\211A@\nT\306\n\"A@\203\306\211\n\"A@\307\"A\202/\310\f!
\245V\203.\311\202/\312\211B\313\203A\314\202B\315	\316>\203X\203Q\317\202R\320\321\202Y\322	\323>\203h\324\325\202i\322$\207" [org-table-colgroup-info gr i col-cookies x nline assoc (("l" . "left") ("r" . "right") ("c" . "center")) float "right" "left" format "%s<col align=\"%s\" />%s" "%s<col class=\"%s\" />%s" (:start :startend) "</colgroup>\n<colgroup>" "<colgroup>" t #3# (:end :startend) nil "</colgroup>" org-table-number-fraction align aligns no-css colgropen] 7] #3# "</colgroup>" docbook format "<caption>%s</caption>" "id=\"%s\"" org-solidify-link-text #[(x) "\301\302\303#\207" [x replace-regexp-in-string "@@class\\([0-9]+\\)@@" #[(txt) "\204\305\207\306\307\310	\"!\311\203\312\202\313\n\f8\206\314\"\207" [org-export-html-table-align-individual-fields txt n no-css aligns #3# string-to-number match-string 1 format " align=\"%s\"" " class=\"%s\"" "left"] 4]] 4] identity "\n" html-table-tag org-export-highlight-first-table-line head nline fnum nfields i cnt tbopen org-line fields html gr colgropen rowstart rowend ali align aligns n org-table-clean-did-remove-column splice org-table-colgroup-info org-export-current-backend] 7 (#$ . 62083)])
#@72 Read attributes in string ATTRIBUTES, add and replace in HTML tag TAG.
(defalias 'org-export-splice-attributes #[(tag attributes) "\204	\207\304\211\305	!\211\211A@\305!A\n\203.\306\n\211A@\n\211A@#\202\307\310	\"\203@\311\312!\310P\313\211	$	*\207" [attributes tag newatt oldatt nil org-extract-attributes-from-string plist-put string-match ">" replace-match org-attributes-to-string t] 6 (#$ . 65778)])
#@259 Format a table generated by table.el into HTML.
This conversion does *not* use `table-generate-source' from table.el.
This has the advantage that Org-mode's HTML conversions can be used.
But it has the disadvantage, that no cell- or row-spanning is allowed.
(defalias 'org-format-table-table-html #[(lines) "\306\211\306\211\211\211\f
\307P\211A@\211
\203+\310\311\312\215\210\202\313P\211.\207" [org-export-highlight-first-table-line i empty html fields head nil "\n" "&nbsp;" next-line (byte-code "\305\306\"\203	\203\n\307\310\311	\312#\313R\314\211\315\316\317\"\210\320\321\"	\203/\322\323	\"\2021\f\314\207" [org-line field-buffer html head fields string-match "^[ 	]*\\+-" "<tr>" mapconcat #[(x) "\305\232\203	\n\203\306@\307\305#AQ\207\306\f@\305\"\fAQ\207" [x empty head org-export-table-header-tags org-export-table-data-tags "" format "col"] 4] "\n" "</tr>\n" nil throw next-line t org-split-string "[ 	]*|[ 	]*" mapcar #[(x) "\302	\211A@Q\207" [x fields "<br/>"] 4]] 7) "</table>\n" field-buffer org-line html-table-tag lines] 8 (#$ . 66210)])
#@446 Format a table into html, using `table-generate-source' from table.el.
Use SPANNED-ONLY to suppress exporting of simple table.el tables.

When SPANNED-ONLY is nil, all table.el tables are exported.  When
SPANNED-ONLY is non-nil, only tables with either row or column
spans are exported.

This routine returns the generated source or nil as appropriate.

Refer docstring of `org-export-prefer-native-exporter-for-tables'
for further information.
(defalias 'org-format-table-table-html-using-table-generate-source #[(lines &optional spanned-only) "\306\307!\210r\310\311!q\210\312 \210\313\314\315#c\210eb\210\316\317\320\321#\204#\322\323!\210\324 \210	\203C\325 \326\n8\327\n8\330\n8\f_
U,?\205Xr\310\331!q\210\312 \210)\332\333\331\"\210\331q\210ed{)\207" [lines spanned-only dim c r cells require table get-buffer-create " org-tmp1 " erase-buffer mapconcat identity "\n" re-search-forward "|[^+]" nil t error "Error processing table" table-recognize-table table-query-dimension 4 5 6 " org-tmp2 " table-generate-source html] 4 (#$ . 67322)])
#@50 Splice EXTRA into STYLE, just before "</style>".
(defalias 'org-export-splice-style #[(style extra) ";\203#\302\303\"\203#\302\304	\"\203#	\305\211\224O\306\306	\305\224\307O\260\207	\207" [extra style string-match "\\S-" "</style>" 0 "\n" nil] 7 (#$ . 68381)])
#@49 Format time stamps in string S, or remove them.
(defalias 'org-html-handle-time-stamps #[(s) "\300\301\215\207" [exit (byte-code "\304\211\n\203E\305\n\"\203E\204\306\211\224O	\306\211\224O\307\310\225\205,\311\312\313\310\"\"\311\314\315\313\316\"!\310\317O\"\320\260\306\225\304O\202	\204M\202_	P\305\321P\"\204^	\322P	*\207" [b r org-maybe-keyword-time-regexp s nil string-match 0 " @<span class=\"timestamp-wrapper\">" 1 format "@<span class=\"timestamp-kwd\">%s @</span>" match-string " @<span class=\"timestamp\">%s@</span>" org-translate-time 3 -1 "@</span>" "\\S-" "@<br/>"] 10)] 2 (#$ . 68656)])
#@157 Convert the region to HTML, using htmlize.el.
This is much like `htmlize-region-for-paste', only that it uses
the settings define in the org-... variables.
(defalias 'org-export-htmlize-region-for-paste #[(beg end) "\n\306\f
\"\307\216rq\210\310\f\311\"\310\f\312\"{-\207" [org-export-htmlize-output-type htmlize-output-type org-export-htmlize-css-font-prefix htmlize-css-name-prefix beg end htmlize-region ((kill-buffer htmlbuf)) plist-get content-start content-end htmlbuf htmlize-buffer-places] 4 (#$ . 69297)])
#@549 Create the CSS for all font definitions in the current Emacs session.
Use this to create face definitions in your CSS style file that can then
be used by code snippets transformed by htmlize.
This command just produces a buffer that contains class definitions for all
faces used in the current Emacs session.  You can copy and paste the ones you
need into your CSS file.

If you then set `org-export-htmlize-output-type' to `css', calls to
the function `org-export-htmlize-region-for-paste' will produce code
that uses these same face definitions.
(defalias 'org-export-htmlize-generate-css #[nil "\306\307!\210\310\311!\203\312\311!\210\313\314!rq\210\315\216\316 \317\320\321\211
\211A@\211\2051\322\n\323\"\211\203Q\n9\203#	\203D	<\204#\324\325\326!\321\327\n$c\210\202#\330ed\"\210.\331\311!\210eb\210\332\333\321\334#\203le\335\224|\210\332\336\321\334#\203z\335\225Td|\210\337\340!\210\341\342!\203\210\343\344!\210eb\207" [#1=#:temp-buffer i f htmlize-output-type htmlize-css-name-prefix fl require htmlize get-buffer "*html*" kill-buffer generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) face-list "org-" css nil face-attribute :inherit org-add-props copy-sequence "1" face htmlize-region org-pop-to-buffer-same-window re-search-forward "<style" t 0 "</style>" beginning-of-line 1 looking-at " +" replace-match ""] 6 (#$ . 69828) nil])
#@110 Convert characters to HTML equivalent.
Possible conversions are set in `org-export-html-protect-char-alist'.
(defalias 'org-html-protect #[(s) "\305\n\211A@\211\203,\306\307	@\f#\203(\310	A\311\211\f$\306\224T\202)\202\f*\207" [org-export-html-protect-char-alist c cl start s nil 0 string-match replace-match t] 5 (#$ . 71261)])
#@149 Prepare STRING for HTML export.  Apply all active conversions.
If there are links in the string, don't modify these.  If STRING
is nil, return nil.
(defalias 'org-html-expand #[(string) "\205K	\306\307Q\310\211\310\211\311\n\"\211\203<\312O\313\312\"\312\225\310O\314\f!B
B\202\314!B\315\316\237\"-\207" [string org-bracket-link-regexp re m s l "\\|" "[ 	]+\\(:[[:alnum:]_@#%:]+:\\)[ 	]*$" nil string-match 0 match-string org-html-do-expand apply concat res] 4 (#$ . 71612)])
#@66 Apply all active conversions to translate special ASCII to HTML.
(defalias 'org-html-do-expand #[(s) "\306!	\203\307\310\"\203\311\312\313\314$\202\n\203!\315!\203)\316!\f\2031\317!
\203\202\320\314\211\307\321#\211\203\201\322\320\224\323#\203Z\320\225\202>\324\325\"\326\327\"\211\203v\311\313\211$\202>G\\\202>+\207" [s org-export-html-expand org-export-with-emphasize org-export-with-special-strings org-export-with-sub-superscripts org-export-with-TeX-macros org-html-protect string-match "@&lt;\\([^&]*\\)&gt;" replace-match "<\\1>" t nil org-export-html-convert-emphasize org-export-html-convert-special-strings org-export-html-convert-sub-super 0 "\\\\\\([a-zA-Z]+[0-9]*\\)\\({}\\)?" get-text-property org-protected match-string 1 org-entity-get-representation html rep wd start] 5 (#$ . 72129)])
#@47 Convert special characters in STRING to HTML.
(defalias 'org-export-html-convert-special-strings #[(string) "\306\211\211\211\211

\211A
@\211\203F\f@\fA\307\310	#\203
\311\307\224\312#\203:\307\225\202!\313\n\314\306$\202!.\207" [org-export-html-special-string-regexps start rpl re a e nil 0 string-match get-text-property org-protected replace-match t all string] 6 (#$ . 73000)])
#@50 Convert sub- and superscripts in STRING to HTML.
(defalias 'org-export-html-convert-sub-super #[(string) "\306\211\307\310=\311
\n#\203t	\203\"\312\225\203\"\313\225\202\n\314\313\224\315#\2032\313\225\202\n\316\225\317\313\"\320\230\203C\321\202D\322\317\312\"\206Z\317\323\"\206Z\317\324\"\325\317\316\"\326\f\327\330\f\327\260\331\211$\202\n\311\332\"\203\214\325\317\316\"\331\211$\202t,\207" [org-export-with-sub-superscripts requireb s c key org-match-substring-regexp nil 0 {} string-match 8 2 get-text-property org-protected 1 match-string "_" "sub" "sup" 6 5 replace-match "<" ">" "</" t "\\\\\\([_^]\\)" string] 9 (#$ . 73420)])
#@17 Apply emphasis.
(defalias 'org-export-html-convert-emphasize #[(string) "\305\306\307\n	#\203Y\310\224\310\224TO\311\224\311\224TO\232\204S\305\224\312\313\"\314\315\312\310\"\f\"8\312\311\"\310\315\312\310\"\f\"8\312\316\"\260\317\320\211$	G\314Z\\\202	T\202*\207" [rpl s org-emph-re string org-emphasis-alist 0 nil string-match 3 4 match-string 1 2 assoc 5 replace-match t] 8 (#$ . 74118)])
#@56 Insert <p>, but first close previous paragraph if any.
(defalias 'org-open-par #[nil "\301 \210\302c\210\303\211\207" [org-par-open org-close-par-maybe "\n<p>" t] 2 (#$ . 74543)])
#@39 Close paragraph if there is one open.
(defalias 'org-close-par-maybe #[nil "\205\n\301c\210\302\211\207" [org-par-open "</p>" nil] 2 (#$ . 74730)])
#@26 Close <li> if necessary.
(defalias 'org-close-li #[(&optional type) "\301 \210\302\232\203
\303\202\304c\207" [type org-close-par-maybe "d" "</dd>\n" "</li>\n"] 2 (#$ . 74887)])
#@83 Insert a new level in HTML export.
When TITLE is nil, just close all open levels.
(defalias 'org-html-level-start #[(level title umax with-toc head-count &optional opt-plist) "\306 \210\205\f\307\310\301#\211\205\311	\n\"\205\307\310\312#	\205)\311	
\"A567\3138\314\"9\315\211:;\315\211<=\3165\206I	\"\317\320\321#7>Y\203{?7SH\203r\3227@\"\210?7S\315I\2107S\2117\202T\205\252\323\324\"\203\252\325A\203\244\326 B\327\216\330\317\331\332\333\334\"\335\"\336#\337Q*\202\245\321\340\211$>@V\203?>SH\203\335\341 \210	\203\325\342\343\3445\206\313	!\"\345\261\202\252\346\345\261\202\252?>S\340I\210\306 \210	\203\377\342\347\3445\206\365	!\"\345\261\202\252\350\345\261\202\252?>S\340I\210\351>!:\352\353\354:#;\355>C\356#>9\203\\D\204\\\342\357>9\203V9\250\203L\3559C\356#>Y\202N9\203V:\202W\321#\360QE\334U\204f\361c\210\311\362;P
\"A<\344<\206x;!=\344<\206\205\362;P!<\342\363=>\f\203\230\360\fP\202\231\321><>\211=&c\210\364 .\n\207" [title target org-export-target-aliases extra-targets extra-class org-export-preferred-target-alist org-close-par-maybe org-get-text-property-any 0 assoc html-container-class plist-get :section-numbers nil remove mapconcat #[(x) "\302\303!\203
\304P\202!	;\203\305	\211#\207\306\207" [x org-export-html-headline-anchor-format org-solidify-link-text org-uuidgen-p "ID-" format #1=""] 4] #1# org-html-level-close string-match "\\(:[[:alnum:]_@#%:]+:\\)[ 	]*$" replace-match match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "&nbsp;&nbsp;&nbsp;<span class=\"tag\">" #[(x) "\301\302\303!#\207" [x format "<span class=\"%s\">%s</span>" org-export-html-get-tag-class-name] 4] org-split-string match-string 1 ":" "&nbsp;" "</span>" t org-close-li format "<li id=\"%s\">" org-solidify-link-text "<br/>\n" "<li>" "<ul>\n<li id=\"%s\">" "<ul>\n<li>" org-section-number replace-regexp-in-string "\\." "-" + -1 "<span class=\"section-number-%d\">%s</span>" " " "\n</div>\n" "sec-" "\n<div id=\"outline-container-%s\" class=\"outline-%d%s\">\n<h%d id=\"%s\">%s%s</h%d>\n<div class=\"outline-text-%d\" id=\"text-%s\">\n" org-open-par preferred org-level-max l opt-plist num snumber snu href suffix level org-levels-open umax org-export-with-tags save-match-data-internal org-export-html-toplevel-hlevel body-only head-count] 13 (#$ . 75075)])
#@100 Turn tag into a valid class name.
Replaces invalid characters with "_" and then prepends a prefix.
(defalias 'org-export-html-get-tag-class-name #[(tag) "\303 \304\216\305\306	\"\203\307\310\311\211	$\202*\n	P\207" [save-match-data-internal tag org-export-html-tag-class-prefix match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "[^a-zA-Z0-9_]" replace-match "_" t] 5 (#$ . 77536)])
#@109 Turn todo keyword into a valid class name.
Replaces invalid characters with "_" and then prepends a prefix.
(defalias 'org-export-html-get-todo-kwd-class-name #[(kwd) "\303 \304\216\305\306	\"\203\307\310\311\211	$\202*\n	P\207" [save-match-data-internal kwd org-export-html-todo-kwd-class-prefix match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "[^a-zA-Z0-9_]" replace-match "_" t] 5 (#$ . 77991)])
#@37 Terminate one level in HTML export.
(defalias 'org-html-level-close #[(level max-outline-level) "	X\203	\302c\207\303 \210\304c\207" [level max-outline-level "</div>\n" org-close-li "</ul>\n"] 2 (#$ . 78464)])
#@238 Insert list syntax in export buffer.  Return ORG-LINE, maybe modified.

POS is the item position or org-line position the org-line had before
modifications to buffer.  STRUCT is the list structure.  PREVS is
the alist of previous items.
(defalias 'org-html-export-list-line #[(org-line pos struct prevs) "\306\307\310\311	\n!\"\210\n\236\203\337\312\313\f\"\210\314\315\f\"\314\316\f\"\206#\317(\314\320\f\"\206-\321)\322\n*#\211+\nU,+*#-\n.\315./\2110/\2368-\2111\204d\323\202\200\312\3241\"\203v\3251\226!\326Z\202\200\312\3271\"\205\2001)2,\203\222\330 \210\331\332-\"c\210-\333\232\203\241\331\334(\"\202\266-\335\232\203\2652\203\265\331\3362\"\202\266\337c\210
\203\330\312\340
\"\203\307\341\202\323\312\342
\"\203\322\343\202\323\344)P)).\202\355\f\345\232\203\354\346\347\323\"\202\355\f*\207" [get-type get-closings pos struct org-line checkbox #[(pos struct prevs) "\304	\n#\211\305=\203\306\202\307=\203\310\202\311)\207" [pos struct prevs type org-list-get-list-type ordered "o" descriptive "d" "u"] 5] #[(pos) "\301\302\303\215\210)\207" [out nil exit (mapc #[(e) "\3058@\211U\203	\fB\211\202	Y\205\306\307\310\"*\207" [e item end pos out 6 throw exit nil] 4] struct)] 2] mapc #[(e) "\306	\n#U\307	\n#
\f	\n#
\310 \210\311
!\210\205*\312\313
\"c\210\314 +\207" [e struct prevs lastp first-item get-type org-list-get-last-item org-list-get-list-begin org-close-par-maybe org-close-li format "</%sl>\n" org-open-par type] 4] string-match "[ 	]*\\(\\S-+[ 	]*\\)\\(?:\\[@\\(?:start:\\)?\\([0-9]+\\|[A-Za-z]\\)\\][ 	]*\\)?\\(?:\\(\\[[ X-]\\]\\)[ 	]+\\)?\\(?:\\(.*\\)[ 	]+::\\(?:[ 	]+\\|$\\)\\)?\\(.*\\)" match-string 3 4 "???" 5 "" org-list-get-list-begin nil "[A-Za-z]" string-to-char 64 "[0-9]+" org-close-par-maybe format "<%sl>\n" "d" "<dt>%s</dt><dd>" "o" "<li value=\"%s\">" "<li>" "X" "<code>[X]</code> " " " "<code>[&nbsp;]</code> " "<code>[-]</code> " "ORG-LIST-END-MARKER" throw nextline desc-tag body prevs list-beg firstp type item key n count-tmp counter] 5 (#$ . 78683)])
(provide 'org-html)

MMCT - 2023