mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-21 7074318d7ab58aca124f590c42fd820e8eb258a5
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\303\304\305\306\307\310\311\312\313&\210\314\315\316\317\320\321\322\323\324\325\326\327& \210\330\331\332\333\334DD\335\326\315\336\337&\210\330\340\332\333\341DD\342\326\315\336\343&\210\330\344\332\333\345DD\346\326\315\322\347\324\350\336\351& \210\330\352\332\333\353DD\354\326\315\336\333\322\347\324\355& \210\330\356\332\333\357DD\360\326\315\336\361&\210\330\362\332\333\363DD\364\326\315\336\365&\210\330\366\332\333\367DD\370\326\315\336\365&\210\330\371\332\333\372DD\373\326\315\336\365&\210\330\374\332\333\375DD\376\326\315\336\365&\210\330\377\332\333\201@DD\201A\326\315\336\201B&\210\330\201C\332\333\201DDD\201E\326\315\336\201F&\210\330\201G\332\333\201HDD\201I\326\315\336\365\322\347\324\201J\201K\201L& \210\330\201M\332\333\201NDD\201O\326\315\322\347\324\201P\336\201Q\201R\201S& \210\330\201T\332\333\201UDD\201V\326\315\322\323\324\201W\336\333& \210\330\201X\332\333\201YDD\201Z\326\315\336\333&\210\330\201[\332\333\201\\DD\201]\326\315\322\347\324\201^\336\201_& \210\330\201`\332\333\201aDD\201b\326\315\336\201c&\210\330\201d\332\333\201eDD\201f\326\201g\336\201B&\207" [require cl-lib ox org-export-define-backend texinfo ((bold . org-texinfo-bold) (center-block . org-texinfo-center-block) (clock . org-texinfo-clock) (code . org-texinfo-code) (drawer . org-texinfo-drawer) (dynamic-block . org-texinfo-dynamic-block) (entity . org-texinfo-entity) (example-block . org-texinfo-example-block) (export-block . org-texinfo-export-block) (export-snippet . org-texinfo-export-snippet) (fixed-width . org-texinfo-fixed-width) (footnote-definition . org-texinfo-footnote-definition) (footnote-reference . org-texinfo-footnote-reference) (headline . org-texinfo-headline) (inline-src-block . org-texinfo-inline-src-block) (inlinetask . org-texinfo-inlinetask) (italic . org-texinfo-italic) (item . org-texinfo-item) (keyword . org-texinfo-keyword) (line-break . org-texinfo-line-break) (link . org-texinfo-link) (node-property . org-texinfo-node-property) (paragraph . org-texinfo-paragraph) (plain-list . org-texinfo-plain-list) (plain-text . org-texinfo-plain-text) (planning . org-texinfo-planning) (property-drawer . org-texinfo-property-drawer) (quote-block . org-texinfo-quote-block) (radio-target . org-texinfo-radio-target) (section . org-texinfo-section) (special-block . org-texinfo-special-block) (src-block . org-texinfo-src-block) (statistics-cookie . org-texinfo-statistics-cookie) (strike-through . org-texinfo-strike-through) (subscript . org-texinfo-subscript) (superscript . org-texinfo-superscript) (table . org-texinfo-table) (table-cell . org-texinfo-table-cell) (table-row . org-texinfo-table-row) (target . org-texinfo-target) (template . org-texinfo-template) (timestamp . org-texinfo-timestamp) (underline . org-texinfo-underline) (verbatim . org-texinfo-verbatim) (verse-block . org-texinfo-verse-block)) :filters-alist ((:filter-headline . org-texinfo--filter-section-blank-lines) (:filter-parse-tree . org-texinfo--normalize-headlines) (:filter-section . org-texinfo--filter-section-blank-lines) (:filter-final-output . org-texinfo--untabify)) :menu-entry (105 "Export to Texinfo" ((116 "As TEXI file" org-texinfo-export-to-texinfo) (105 "As INFO file" org-texinfo-export-to-info) (111 "As INFO file and open" (lambda (a s v b) (if a (org-texinfo-export-to-info t s v b) (org-open-file (org-texinfo-export-to-info nil s v b))))))) :options-alist ((:texinfo-filename "TEXINFO_FILENAME" nil nil t) (:texinfo-class "TEXINFO_CLASS" nil org-texinfo-default-class t) (:texinfo-header "TEXINFO_HEADER" nil nil newline) (:texinfo-post-header "TEXINFO_POST_HEADER" nil nil newline) (:subtitle "SUBTITLE" nil nil parse) (:subauthor "SUBAUTHOR" nil nil newline) (:texinfo-dircat "TEXINFO_DIR_CATEGORY" nil nil t) (:texinfo-dirtitle "TEXINFO_DIR_TITLE" nil nil t) (:texinfo-dirdesc "TEXINFO_DIR_DESC" nil nil t) (:texinfo-printed-title "TEXINFO_PRINTED_TITLE" nil nil t) (:texinfo-classes nil nil org-texinfo-classes) (:texinfo-format-headline-function nil nil org-texinfo-format-headline-function) (:texinfo-node-description-column nil nil org-texinfo-node-description-column) (:texinfo-active-timestamp-format nil nil org-texinfo-active-timestamp-format) (:texinfo-inactive-timestamp-format nil nil org-texinfo-inactive-timestamp-format) (:texinfo-diary-timestamp-format nil nil org-texinfo-diary-timestamp-format) (:texinfo-link-with-unknown-path-format nil nil org-texinfo-link-with-unknown-path-format) (:texinfo-tables-verbatim nil nil org-texinfo-tables-verbatim) (:texinfo-table-scientific-notation nil nil org-texinfo-table-scientific-notation) (:texinfo-table-default-markup nil nil org-texinfo-table-default-markup) (:texinfo-text-markup-alist nil nil org-texinfo-text-markup-alist) (:texinfo-format-drawer-function nil nil org-texinfo-format-drawer-function) (:texinfo-format-inlinetask-function nil nil org-texinfo-format-inlinetask-function)) custom-declare-group org-export-texinfo nil "Options for exporting Org mode files to Texinfo." :tag "Org Export Texinfo" :version "24.4" :package-version (Org . "8.0") :group org-export custom-declare-variable org-texinfo-coding-system funcall function #[0 "\300\207" [nil] 1] "Default document encoding for Texinfo output.\n\nIf nil it will default to `buffer-file-coding-system'." :type coding-system org-texinfo-default-class #[0 "\300\207" [#1="info"] 1 #1#] "The default Texinfo class." (string :tag "Texinfo class") org-texinfo-classes #[0 "\300\207" [(("info" "@documentencoding AUTO\n@documentlanguage AUTO" ("@chapter %s" "@unnumbered %s" "@appendix %s") ("@section %s" "@unnumberedsec %s" "@appendixsec %s") ("@subsection %s" "@unnumberedsubsec %s" "@appendixsubsec %s") ("@subsubsection %s" "@unnumberedsubsubsec %s" "@appendixsubsubsec %s")))] 1] "Alist of Texinfo classes and associated header and structure.\nIf #+TEXINFO_CLASS is set in the buffer, use its value and the\nassociated information.  Here is the structure of a class\ndefinition:\n\n  (class-name\n    header-string\n    (numbered-1 unnumbered-1 appendix-1)\n    (numbered-2 unnumbered-2 appendix-2)\n    ...)\n\n\nThe header string\n-----------------\n\nThe header string is inserted in the header of the generated\ndocument, right after \"@setfilename\" and \"@settitle\"\ncommands.\n\nIf it contains the special string\n\n  \"@documentencoding AUTO\"\n\n\"AUTO\" will be replaced with an appropriate coding system.  See\n`org-texinfo-coding-system' for more information.  Likewise, if\nthe string contains the special string\n\n  \"@documentlanguage AUTO\"\n\n\"AUTO\" will be replaced with the language defined in the\nbuffer, through #+LANGUAGE keyword, or globally, with\n`org-export-default-language', which see.\n\n\nThe sectioning structure\n------------------------\n\nThe sectioning structure of the class is given by the elements\nfollowing the header string.  For each sectioning level, a number\nof strings is specified.  A %s formatter is mandatory in each\nsection string and will be replaced by the title of the section." "26.1" (Org . "9.1") (repeat (list (string :tag "Texinfo class") (string :tag "Texinfo header") (repeat :tag "Levels" :inline t (choice (list :tag "Heading" (string :tag "  numbered") (string :tag "unnumbered") (string :tag "  appendix")))))) org-texinfo-format-headline-function #[0 "\300\207" [org-texinfo-format-headline-default-function] 1] "Function to format headline text.\n\nThis function will be called with 5 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 as a list of strings (list of strings or nil).\n\nThe function result will be used in the section format string." (Org . "8.3") org-texinfo-node-description-column #[0 "\300\207" [32] 1] "Column at which to start the description in the node listings.\nIf a node title is greater than this length, the description will\nbe placed after the end of the title." integer org-texinfo-active-timestamp-format #[0 "\300\207" [#2="@emph{%s}"] 1 #2#] "A printf format string to be applied to active timestamps." string org-texinfo-inactive-timestamp-format #[0 "\300\207" [#3="@emph{%s}"] 1 #3#] "A printf format string to be applied to inactive timestamps." org-texinfo-diary-timestamp-format #[0 "\300\207" [#4="@emph{%s}"] 1 #4#] "A printf format string to be applied to diary timestamps." org-texinfo-link-with-unknown-path-format #[0 "\300\207" [#5="@indicateurl{%s}"] 1 #5#] "Format string for links with unknown path type." org-texinfo-tables-verbatim #[0 "\300\207" [nil] 1] "When non-nil, tables are exported verbatim." boolean org-texinfo-table-scientific-notation #[0 "\300\207" [#6="%s\\,(%s)"] 1 #6#] "Format string to display numbers in scientific notation.\n\nThe format should have \"%s\" twice, for mantissa and exponent\n(i.e. \"%s\\\\times10^{%s}\").\n\nWhen nil, no transformation is made." (choice (string :tag "Format string") (const :tag "No formatting" nil)) org-texinfo-table-default-markup #[0 "\300\207" [#7="@asis"] 1 #7#] "Default markup for first column in two-column tables.\n\nThis should an indicating command, e.g., \"@code\", \"@kbd\" or\n\"@samp\".\n\nIt can be overridden locally using the \":indic\" attribute." (Org . "9.1") :safe stringp org-texinfo-text-markup-alist #[0 "\300\207" [((bold . "@strong{%s}") (code . code) (italic . "@emph{%s}") (verbatim . samp))] 1] "Alist of Texinfo expressions to convert text markup.\n\nThe key must be a symbol among `bold', `code', `italic',\n`strike-through', `underscore' and `verbatim'.  The value is\na formatting string to wrap fontified text with.\n\nValue can also be set to the following symbols: `verb', `samp'\nand `code'.  With the first one, Org uses \"@verb\" to create\na format string and selects a delimiter character that isn't in\nthe string.  For the other two, Org uses \"@samp\" or \"@code\"\nto typeset and protects special characters.\n\nWhen no association is found for a given markup, text is returned\nas-is." (Org . "9.1") alist :options (bold code italic strike-through underscore verbatim) org-texinfo-format-drawer-function #[0 "\300\207" [#[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]] 1] "Function called to format a drawer in Texinfo 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\nThe default function simply returns the value of CONTENTS." (Org . "8.2") org-texinfo-format-inlinetask-function #[0 "\300\207" [org-texinfo-format-inlinetask-default-function] 1] "Function called to format an inlinetask in Texinfo code.\n\nThe function must accept six 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\nThe function should return the string to be exported." org-texinfo-info-process #[0 "\300\207" [("makeinfo --no-split %f")] 1] "Commands to process a Texinfo file to an INFO file.\n\nThis is a list of strings, each of them will be given to the\nshell as a command.  %f in the command will be replaced by the\nrelative file name, %F by the absolute file name, %b by the file\nbase name (i.e. without directory and extension parts), %o by the\nbase directory of the file and %O by the absolute file name of\nthe output file." (Org . "9.1") (repeat :tag "Shell command sequence" (string :tag "Shell command")) org-texinfo-logfiles-extensions #[0 "\300\207" [("aux" "toc" "cp" "fn" "ky" "pg" "tp" "vr")] 1] "The list of file extensions to consider as Texinfo logfiles.\nThe logfiles will be remove if `org-texinfo-remove-logfiles' is\nnon-nil." (repeat (string :tag "Extension")) org-texinfo-remove-logfiles #[0 "\300\207" [t] 1] "Non-nil means remove the logfiles produced by compiling a Texinfo file.\nBy default, logfiles are files with these extensions: .aux, .toc,\n.cp, .fn, .ky, .pg and .tp.  To define the set of logfiles to remove,\nset `org-texinfo-logfiles-extensions'." org-export-latex] 14)
16 #@187 Maximum depth for creation of detailed menu listings.
17 Beyond this depth, Texinfo will not recognize the nodes and will
18 cause errors.  Left as a constant in case this value ever
19 changes.
20 (defconst org-texinfo-max-toc-depth 4 (#$ . 12811))
21 #@243 List of coding systems supported by Texinfo, as strings.
22 Specified coding system will be matched against these strings.
23 If two strings share the same prefix (e.g. "ISO-8859-1" and
24 "ISO-8859-15"), the most specific one has to be listed first.
25 (defconst org-texinfo-supported-coding-systems '("US-ASCII" "UTF-8" "ISO-8859-15" "ISO-8859-1" "ISO-8859-2" "koi8-r" "koi8-u") (#$ . 13056))
26 #@55 Rules characterizing image files that can be inlined.
27 (defconst org-texinfo-inline-image-rules (byte-code "\300\301BC\207" ["file" "\\(?:eps\\|gif\\|jp\\(?:e?g\\)\\|p\\(?:df\\|ng\\)\\|svg\\)"] 2) (#$ . 13445))
28 #@57 Remove TAB characters in string S.
29
30 (fn S BACKEND INFO)
31 (defalias 'org-texinfo--untabify #[771 "\301\302\303\304\"#\207" [tab-width replace-regexp-in-string "    " make-string 32] 8 (#$ . 13661)])
32 #@87 Filter controlling number of blank lines after a section.
33
34 (fn HEADLINE BACKEND INFO)
35 (defalias 'org-texinfo--filter-section-blank-lines #[771 "\300\301\302#\207" [replace-regexp-in-string "\n\\(?:\n[     ]*\\)*\\'" "\n\n"] 7 (#$ . 13863)])
36 #@341 Normalize headlines in TREE.
37
38 BACK-END is the symbol specifying back-end used for export. INFO
39 is a plist used as a communication channel.
40
41 Make sure every headline in TREE contains a section, since those
42 are required to install a menu.  Also put exactly one blank line
43 at the end of each section.
44
45 Return new tree.
46
47 (fn TREE BACKEND INFO)
48 (defalias 'org-texinfo--normalize-headlines #[771 "\300\301\302\303\304\305\306!\307\"\310\311%$\210\207" [org-element-map headline make-byte-code 257 "\211\301\302;\203\303\304$\210\202A\305A@#\240\210\266\211\211:\204)\304\2026\211@9\2035\211AA\2026\211\262\211\205p\306\307\310\300\311%\211\211:\204R\211;\205Z\312\202Z\211@9\205Z\211@\262\313=?\205n\314\315\313\316DDB#\262\207" vconcat vector [:post-blank 1 org-add-props nil plist-put org-element-map (headline section) identity t plain-text section apply org-element-set-contents :parent] 9 "\n\n(fn HL)"] 12 (#$ . 14109)])
49 #@112 Return a character not used in string S.
50 This is used to choose a separator for constructs like \verb.
51
52 (fn S)
53 (defalias 'org-texinfo--find-verb-separator #[257 "\300\211\301\302\303\302T\211\262GW\2032H\262\304\305\306!!\"\204.\306!\262\302\211\262\202/\303\204\266\204\207" ["~,./?;':\"|!@#%^&-_=+abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ<>()[]{}" -1 nil t string-match regexp-quote char-to-string] 11 (#$ . 15073)])
54 #@168 Format TEXT depending on MARKUP text markup.
55 INFO is a plist used as a communication channel.  See
56 `org-texinfo-text-markup-alist' for details.
57
58 (fn TEXT MARKUP INFO)
59 (defalias 'org-texinfo--text-markup #[771 "\236A\211\204\f\202I\211\301=\203\302\303\304!\"\202I\211\305=\203,\302\306\304!\"\202I\211\307=\203A\310!\302\311$\262\202I\211\302\"\262\207" [org-texinfo-text-markup-alist code format "@code{%s}" org-texinfo--sanitize-content samp "@samp{%s}" verb org-texinfo--find-verb-separator "@verb{%s%s%s}"] 10 (#$ . 15527)])
60 #@202 Return node or anchor associated to DATUM.
61 DATUM is an element or object.  INFO is a plist used as
62 a communication channel.  The function guarantees the node or
63 anchor name is unique.
64
65 (fn DATUM INFO)
66 (defalias 'org-texinfo--get-node #[514 "\300\301\"\236A\206g\302\303\211:\204\211;\205$\304\202$\211@9\205$\211@\262\305=\2037\306\307\"\"\202;\310\"!\211\211\311\232\204J\312\"\203Y\313\314T\211\262\"P\262\202=\315\301BB#\210\266\202\207" [plist-get :texinfo-node-cache 0 org-texinfo--sanitize-node plain-text headline org-texinfo--sanitize-title org-export-get-alt-title org-export-get-reference "Top" rassoc format " %d" plist-put] 11 (#$ . 16089)])
67 #@275 Bend string TITLE to node line requirements.
68 Trim string and collapse multiple whitespace characters as they
69 are not significant.  Replace leading left parenthesis, when
70 followed by a right parenthesis, with a square bracket.  Remove
71 periods, commas and colons.
72
73 (fn TITLE)
74 (defalias 'org-texinfo--sanitize-node #[257 "\300\301\302\300\303\304\300\305\306    ###\307\300\203\310\202\311\304\300\312\304##\207" [replace-regexp-in-string "[     ]+" " " "[:,.]" "" "\\`(\\(.*?)\\)" "[\\1" nil "\\`\\([     ]*\n\\)+" "\\`[     \n ]+" "[     \n ]+\\'"] 11 (#$ . 16785)])
75 #@145 Make TITLE suitable as a section name.
76 TITLE is a string or a secondary string.  INFO is the current
77 export state, as a plist.
78
79 (fn TITLE INFO)
80 (defalias 'org-texinfo--sanitize-title #[514 "\300\301\302\303\304\305\303\211\211\211&#\207" [org-export-data-with-backend record org-export-backend nil texinfo ((footnote-reference . ignore) (link lambda (l c i) (or c (org-export-data (org-element-property :raw-link l) i))) (radio-target lambda (_r c _i) c) (target . ignore))] 13 (#$ . 17351)])
81 #@84 Escape special characters in string TEXT.
82 Special characters are: @ { }
83
84 (fn TEXT)
85 (defalias 'org-texinfo--sanitize-content #[257 "\300\301\302#\207" [replace-regexp-in-string "[@{}]" "@\\&"] 5 (#$ . 17853)])
86 #@394 Wrap string VALUE within a @float command.
87 INFO is the current export state, as a plist.  TYPE is float
88 type, as a string.  LABEL is the cross reference label for the
89 float, as a string.  CAPTION and SHORT are, respectively, the
90 caption and shortcaption used for the float, as secondary
91 strings (e.g., returned by `org-export-get-caption').
92
93 (fn VALUE INFO &optional TYPE LABEL CAPTION SHORT)
94 (defalias 'org-texinfo--wrap-float #[1538 "\300\301\302\303\304\302\211\211\211&\300\301\302\303\305\302\211\211\211&\203*\203*\306\307\310 #\"\202+\311\2043\203P\306\312\310\206=\311\232\203G\202I\f#\"\202Q\311\306\313        \203a\314\nP\202b\311 &\207" [record org-export-backend nil texinfo ((link lambda (l c i) (or c (org-export-data (org-element-property :raw-link l) i))) (radio-target lambda (_r c _i) c) (target . ignore)) ((footnote-reference . ignore) (inline-src-block . ignore) (link lambda (l c i) (or c (org-export-data (org-element-property :raw-link l) i))) (radio-target lambda (_r c _i) c) (target . ignore) (verbatim . ignore)) format "@shortcaption{%s}\n" org-export-data-with-backend "" "@caption{%s}\n" "@float %s%s\n%s\n%s%s@end float" ","] 17 (#$ . 18070)])
95 #@164 Return complete document string after Texinfo conversion.
96 CONTENTS is the transcoded contents string.  INFO is a plist
97 holding export options.
98
99 (fn CONTENTS INFO)
100 (defalias 'org-texinfo-template #[514 "\306\307\310\"\"\311\307\312\"\313\314\315%\316\317\307\320\"\206)\307\321\"\211\205'\322!\323P\262\211\2051\324\325\"\262\324\326\"\327\330\307    \331\"\"A@\3322}\315\333    \206N\n!\f\211\203v\211@\334!\335\315\336#)\266\203\203o\337\332\"\210A\266\202\202R\340\262)\266\2020\307\n\341\"\335\342\343\342\344\315\335\345&\315\335\345&)\266\203!\307\346\"\211\205\246\327!\262\347\307\n\350\"\211\205\265\327!\262\205\307\324\351\327\306\f\"!\"\307\f\352\"\307 \353\"\211\205\343\336\354\"\205\343\324\355\356\345\"\"\262\205\"\211\205\"\357\360\361\307\362\"\211\204\376\335\202\f\363\364\"\203    \211\202\f\211\364P\262\211\203\324\365#\202\262\360\366\260\266\202\367\370\307\371\"\205S\324\372\307\373\"\206>\206>\374\"\307\375\"\211\205P\324\376\306\"\"\262P\307\377\"\205\307\201@\306\307\201A\"\"!\307\201B\"\205\203\201@\306\307\201C\"\"!\203\225\211\203\225\324\201D#\202\254\203\242\324\201E\"\202\254\211\205\254\324\201F\"\266\202\307\201G\"\211\205\304\327\342\201H\201I#!\262P\205\317\201J\201K\307\201L\"\205\337\201M\201N\201O\324\201P\"\311\307\312\"\201Q\201R\315\201S&\306\211:\204 \335\202\211@9\203\211AA\202\211\262\"\201@!\205(\360P\266\202\201T\201U\307\312\"\201V#\360\360\307\201W\"\205R\307\201X\"\360P\201Y\260\207" [org-texinfo-classes org-texinfo-coding-system buffer-file-coding-system case-fold-search org-texinfo-supported-coding-systems inhibit-changing-match-data org-export-data plist-get :title org-element-map :parse-tree headline #[257 "\300\301\211;\203\302\303#\202\304A@\"\266\202!\2055\211\211:\204&\305\2023\211@9\2032\211AA\2023\211\262\207" [org-not-nil :COPYING get-text-property 0 plist-get nil] 8 "\n\n(fn HL)"] t "\\input texinfo    @c -*- texinfo -*-\n" "@c %**start of header\n" :texinfo-filename :output-file file-name-sans-extension ".info" format "@setfilename %s\n" "@settitle %s\n" org-element-normalize-string assoc :texinfo-class coding-system symbol-name regexp-quote nil string-match throw "UTF-8" :language replace-regexp-in-string "^@documentencoding \\(AUTO\\)$" "^@documentlanguage \\(AUTO\\)$" 1 :texinfo-header "@c %**end of header\n\n" :texinfo-post-header "@copying\n%s@end copying\n\n" :texinfo-dircat :texinfo-dirtitle "^\\(?:\\* \\)?\\(.*?\\)\\(\\.\\)?$" "* %s." match-string "@dircategory " "\n" "@direntry\n" :texinfo-dirdesc string-suffix-p "." "%-23s %s" "@end direntry\n\n" "@finalout\n" "@titlepage\n" :with-title "@title %s\n" :texinfo-printed-title "" :subtitle "@subtitle %s\n" :with-author org-string-nw-p :author :with-email :email "@author %s (@email{%s})\n" "@author %s\n" "@author @email{%s}\n" :subauthor "^" "@author " "@page\n@vskip 0pt plus 1filll\n@insertcopying\n" "@end titlepage\n\n" :with-toc "@contents\n\n" "@ifnottex\n" "@node Top\n" "@top %s\n" section identity (headline) "@end ifnottex\n\n" org-texinfo-make-menu master :with-creator :creator "@bye"] 33 (#$ . 19285)])
101 #@150 Transcode BOLD from Org to Texinfo.
102 CONTENTS is the text with bold markup.  INFO is a plist holding
103 contextual information.
104
105 (fn BOLD CONTENTS INFO)
106 (defalias 'org-texinfo-bold #[771 "\300\301#\207" [org-texinfo--text-markup bold] 7 (#$ . 22571)])
107 #@180 Transcode a CENTER-BLOCK element from Org to Texinfo.
108 CONTENTS holds the contents of the block.  INFO is a plist used
109 as a communication channel.
110
111 (fn CENTER-BLOCK CONTENTS INFO)
112 (defalias 'org-texinfo-center-block #[771 "\207" [] 4 (#$ . 22828)])
113 #@140 Transcode a CLOCK element from Org to Texinfo.
114 CONTENTS is nil.  INFO is a plist holding contextual
115 information.
116
117 (fn CLOCK CONTENTS INFO)
118 (defalias 'org-texinfo-clock #[771 "\301\302\303\"\302\304\305\"\306\307\211;\203\310\311#\202!\304A@\"\266\202!\312\211;\2034\310\311#\202:\304A@\"\266\202\211\205D\302\313\"\262P\"\314R\207" [org-clock-string "@noindent" format "@strong{%s} " plist-get :texinfo-inactive-timestamp-format org-timestamp-translate :value get-text-property 0 :duration " (%s)" "@*"] 14 (#$ . 23084)])
119 #@138 Transcode a CODE object from Org to Texinfo.
120 CONTENTS is nil.  INFO is a plist used as a communication
121 channel.
122
123 (fn CODE CONTENTS INFO)
124 (defalias 'org-texinfo-code #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202\305#\207" [org-texinfo--text-markup :value get-text-property 0 plist-get code] 10 (#$ . 23635)])
125 #@167 Transcode a DRAWER element from Org to Texinfo.
126 CONTENTS holds the contents of the block.  INFO is a plist
127 holding contextual information.
128
129 (fn DRAWER CONTENTS INFO)
130 (defalias 'org-texinfo-drawer #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\303\304\"\"\207" [:drawer-name get-text-property 0 plist-get :texinfo-format-drawer-function] 9 (#$ . 23968)])
131 #@181 Transcode a DYNAMIC-BLOCK element from Org to Texinfo.
132 CONTENTS holds the contents of the block.  INFO is a plist
133 holding contextual information.
134
135 (fn DYNAMIC-BLOCK CONTENTS INFO)
136 (defalias 'org-texinfo-dynamic-block #[771 "\207" [] 4 (#$ . 24344)])
137 #@76 Transcode an ENTITY object from Org to Texinfo.
138
139 (fn ENTITY CONTENTS INFO)
140 (defalias 'org-texinfo-entity #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\211\304\232\203!\305\202\230\211\306\232\203+\307\202\230\211\310\235\2035\311\202\230\211\312\232\203?\313\202\230\211\314\232\203I\315\202\230\211\316\235\203S\317\202\230\211\320\232\203]\321\202\230\211\322\235\203g\323\202\230\211\324\235\203q\325\202\230\211\326\232\203{\327\202\230\211\330\232\203\205\331\202\230\211\332\232\203\217\333\202\230\211\334\232\203\231\335\202\230\211\336\232\203\243\337\202\230\211\340\235\203\255\341\202\230\211\342\232\203\267\343\202\230\211\344\232\203\301\345\202\230\211\346\232\203\313\347\202\230\211\350\232\203\325\351\202\230\211\352\232\203\337\353\202\230\211\354\232\203\351\355\202\230\211\356\232\203\363\357\202\230\211\360\232\203\375\361\202\230\211\362\232\203\363\202\230\211\364\232\203\365\202\230\211\366\232\203\367\202\230\211\370\235\203%\371\202\230\211\372\232\203/\373\202\230\211\374\235\2039\375\202\230\211\376\232\203C\377\202\230\211\201@\232\203Q\201A\202\230\211\201B\232\203_\201C\202\230\201D\201E\"\203\211\201F\201G\201H\201IO\"\262\202\230\201J\211;\203\220\301\302#\202\226\303A@\"\266\202\207" [:name get-text-property 0 plist-get "AElig" "@AE{}" "aelig" "@ae{}" ("bullet" "bull") "@bullet{}" "copy" "@copyright{}" "deg" "@textdegree{}" ("hellip" "dots") "@dots{}" "equiv" "@equiv{}" ("EUR" "euro") "@euro{}" ("geq" "ge") "@geq{}" "laquo" "@guillemetleft{}" "iexcl" "@exclamdown{}" "imath" "@dotless{i}" "iquest" "@questiondown{}" "jmath" "@dotless{j}" ("leq" "le") "@leq{}" "lsaquo" "@guilsinglleft{}" "mdash" "---" "minus" "@minus{}" "nbsp" "@tie{}" "ndash" "--" "OElig" "@OE{}" "oelig" "@oe{}" "ordf" "@ordf{}" "ordm" "@ordm{}" "pound" "@pound{}" "raquo" "@guillemetright{}" ("Rightarrow" "rArr") "@result{}" "reg" "@registeredsymbol{}" ("rarr" "to" "rightarrow") "@arrow{}" "rsaquo" "@guilsinglright{}" "thorn" "@th{}" "THORN" "@TH{}" string-prefix-p "_" format "@w{%s}" 1 nil :utf-8] 10 (#$ . 24601)])
141 #@157 Transcode an EXAMPLE-BLOCK element from Org to Texinfo.
142 CONTENTS is nil.  INFO is a plist holding contextual
143 information.
144
145 (fn EXAMPLE-BLOCK CONTENTS INFO)
146 (defalias 'org-texinfo-example-block #[771 "\300\301\302\303\"!\"\207" [format "@example\n%s@end example" org-texinfo--sanitize-content org-export-format-code-default] 9 (#$ . 26755)])
147 #@154 Transcode a EXPORT-BLOCK element from Org to Texinfo.
148 CONTENTS is nil.  INFO is a plist holding contextual information.
149
150 (fn EXPORT-BLOCK CONTENTS INFO)
151 (defalias 'org-texinfo-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 "TEXINFO" org-remove-indentation :value] 10 (#$ . 27106)])
152 #@157 Transcode a EXPORT-SNIPPET object from Org to Texinfo.
153 CONTENTS is nil.  INFO is a plist holding contextual information.
154
155 (fn EXPORT-SNIPPET CONTENTS INFO)
156 (defalias 'org-texinfo-export-snippet #[771 "\300!\301=\205\302\211;\203\303\304#\202\305A@\"\266\202\207" [org-export-snippet-backend texinfo :value get-text-property 0 plist-get] 9 (#$ . 27532)])
157 #@152 Transcode a FIXED-WIDTH element from Org to Texinfo.
158 CONTENTS is nil.  INFO is a plist holding contextual information.
159
160 (fn FIXED-WIDTH CONTENTS INFO)
161 (defalias 'org-texinfo-fixed-width #[771 "\300\301\302\303\304\211;\203\305\306#\202\307A@\"\266\202!!\"\207" [format "@example\n%s@end example" org-remove-indentation org-texinfo--sanitize-content :value get-text-property 0 plist-get] 13 (#$ . 27905)])
162 #@176 Create a footnote reference for FOOTNOTE.
163
164 FOOTNOTE is the footnote to define.  CONTENTS is nil.  INFO is a
165 plist holding contextual information.
166
167 (fn FOOTNOTE CONTENTS INFO)
168 (defalias 'org-texinfo-footnote-reference #[771 "\300\"\301\302\303\"\304\305\203\306\202\307\310\305\311\310##\266\202\"\207" [org-export-get-footnote-definition format "@footnote{%s}" org-export-data nil replace-regexp-in-string "\\`\\([     ]*\n\\)+" "\\`[     \n ]+" "" "[     \n ]+\\'"] 15 (#$ . 28327)])
169 #@235 Return Texinfo structuring command string for HEADLINE element.
170 Return nil if HEADLINE is to be ignored, `plain-list' if it
171 should be exported as a plain-list item.  INFO is a plist holding
172 contextual information.
173
174 (fn HEADLINE INFO)
175 (defalias 'org-texinfo--structuring-command #[514 "\300\211;\203\301\302#\202\303A@\"\266\202\203\304\207\305\306\307\310#!\203(\304\207\311\"\2031\312\207\303\313\"\314\303\315\"\"\211:\203\345\211A\211:\203\334\211A\211\316\"S8\211:\203\306\211@A\211:\203\274\211@A\211:\203\262\211@A\211\204\250\305\306\317\310#!\203\206\202\243\305\306\320\310#!\203\225\202\243\321\"\203\242\211\202\243\266\203\202\255\322\323 \"\266\202\202\267\322\323 \"\266\202\202\301\322\323    \"\266\202\202\323\211\204\316\312\202\323\322\323\"\262\262\262\202\340\322\323\"\262\202\351\322\323\"\262\207" [:footnote-section-p get-text-property 0 plist-get nil org-not-nil org-export-get-node-property :COPYING t org-export-low-level-p plain-list :texinfo-class assoc :texinfo-classes org-export-get-relative-level :APPENDIX :INDEX org-export-numbered-headline-p user-error "Invalid Texinfo class specification: %S"] 22 (#$ . 28821)])
176 #@174 Transcode a HEADLINE element from Org to Texinfo.
177 CONTENTS holds the contents of the headline.  INFO is a plist
178 holding contextual information.
179
180 (fn HEADLINE CONTENTS INFO)
181 (defalias 'org-texinfo-headline #[771 "\300\"\211\205,\301\302\"\2050\303\211;\203\304\305#\202$\301A@\"\266\202\211\205.\306\"\262\211\205K\307\211;\203C\304\305#\202I\301A@\"\266\202\301\310\"\205W\311\"\301\312\"\205v\313\211;\203n\304\305#\202t\301A@\"\266\202\314\315    \211;\203\207\304\305#\202\215\301A@\"\266\202\"\301\316\"%\317\320\n!\203\255\317\nP\202\256\321\322\f\211;\203\276\304\305#\202\304\301A@\"\266\202\211\323\235\205\320\324\325\"\262Q\326\267\202\327 \n\"\330\f \"\205\365\324\331\203\363\332\202\364\333\"\334\317\335\"\203\324\336\203 \332\202\333\"\202\317\260\262\202*\324\337\340 \f\"\"\324    \"Q\266\207\207" [org-texinfo--structuring-command plist-get :with-todo-keywords :todo-keyword get-text-property 0 org-export-data :todo-type :with-tags org-export-get-tags :with-priority :priority org-texinfo--sanitize-title :title :texinfo-format-headline-function "\n" org-string-nw-p "" :INDEX ("cp" "fn" "ky" "pg" "tp" "vr") format "\n@printindex %s\n" #s(hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-list 218)) org-export-numbered-headline-p org-export-first-sibling-p "@%s\n" enumerate itemize "@item\n" org-export-last-sibling-p "@end %s" "@node %s\n" org-texinfo--get-node] 20 (#$ . 30050)])
182 #@137 Default format function for a headline.
183 See `org-texinfo-format-headline-function' for details.
184
185 (fn TODO TODO-TYPE PRIORITY TEXT TAGS)
186 (defalias 'org-texinfo-format-headline-default-function #[1285 "\205    \300\301\"\205\300\302\"\205\300\303\304\305\306#\"R\207" [format "@strong{%s} " "@emph{#%s} " " :%s:" mapconcat identity ":"] 14 (#$ . 31600)])
187 #@187 Transcode an INLINE-SRC-BLOCK element from Org to Texinfo.
188 CONTENTS holds the contents of the item.  INFO is a plist holding
189 contextual information.
190
191 (fn INLINE-SRC-BLOCK CONTENTS INFO)
192 (defalias 'org-texinfo-inline-src-block #[771 "\300\301\302\303\211;\203\304\305#\202\306A@\"\266\202!\"\207" [format "@code{%s}" org-texinfo--sanitize-content :value get-text-property 0 plist-get] 12 (#$ . 31971)])
193 #@176 Transcode an INLINETASK element from Org to Texinfo.
194 CONTENTS holds the contents of the block.  INFO is a plist
195 holding contextual information.
196
197 (fn INLINETASK CONTENTS INFO)
198 (defalias 'org-texinfo-inlinetask #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202\"\304\305\"\205B\306\211;\2030\302\303#\2026\304A@\"\266\202\211\205@\300\"\262\307\211;\203Q\302\303#\202W\304A@\"\266\202\304\310\"\205e\311\"\304\312\"\205\204\313\211;\203|\302\303#\202\202\304A@\"\266\202\304\314\"\f&\207" [org-export-data :title get-text-property 0 plist-get :with-todo-keywords :todo-keyword :todo-type :with-tags org-export-get-tags :with-priority :priority :texinfo-format-inlinetask-function] 15 (#$ . 32390)])
199 #@150 Default format function for inlinetasks.
200 See `org-texinfo-format-inlinetask-function' for details.
201
202 (fn TODO TODO-TYPE PRIORITY TITLE TAGS CONTENTS)
203 (defalias 'org-texinfo-format-inlinetask-default-function #[1542 "\205    \300\301\"\205\300\302\"\205 \300\303\304\305\306#\"R\300\307#\207" [format "@strong{%s} " "#%c " ":%s:" mapconcat identity ":" "@center %s\n\n%s\n"] 15 (#$ . 33154)])
204 #@156 Transcode ITALIC from Org to Texinfo.
205 CONTENTS is the text with italic markup.  INFO is a plist holding
206 contextual information.
207
208 (fn ITALIC CONTENTS INFO)
209 (defalias 'org-texinfo-italic #[771 "\300\301#\207" [org-texinfo--text-markup italic] 7 (#$ . 33565)])
210 #@163 Transcode an ITEM element from Org to Texinfo.
211 CONTENTS holds the contents of the item.  INFO is a plist holding
212 contextual information.
213
214 (fn ITEM CONTENTS INFO)
215 (defalias 'org-texinfo-item #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\305\306\307\211;\203*\301\302#\2020\303A@\"\266\202\310#!\205P\311\"\203L\312\313!\314\315$\202N\211C\262\316\317\204Z\320\202\204:\203\203@A\211\204p\321P\262\202~\211\321\322\323\324\322#R\266\202\266\202\202\204\325\206\212\326#\207" [:tag get-text-property 0 plist-get org-string-nw-p org-export-read-attribute :attr_texinfo :parent :sep org-export-data split-string regexp-quote t "[     \n]+" format "%s\n%s" "@item" "@item " "\n" mapconcat #[257 "\300P\207" ["@itemx "] 3 "\n\n(fn I)"] nil ""] 19 (#$ . 33832)])
216 #@144 Transcode a KEYWORD element from Org to Texinfo.
217 CONTENTS is nil.  INFO is a plist holding contextual information.
218
219 (fn KEYWORD CONTENTS INFO)
220 (defalias 'org-texinfo-keyword #[771 "\301\211;\203\302\303#\202\304A@\"\266\202\305\211;\203&\302\303#\202,\304A@\"\266\202\211\306\267\202\230\202\231\307\310\"\202\231\307\311\"\202\231\307\312\"\202\231\307\313\"\202\231\307\314\"\202\231\307\315\"\202\231\316\317\320\321#)\266\203\203}\322\323\324\325#P\202\231\326\317\320\321#)\266\203\205\231\322\323\327\325#P\202\231\317\262\207" [inhibit-changing-match-data :value get-text-property 0 plist-get :key #s(hash-table size 8 test equal rehash-size 1.5 rehash-threshold 0.8125 purecopy t data ("TEXINFO" 52 "CINDEX" 56 "FINDEX" 63 "KINDEX" 70 "PINDEX" 77 "TINDEX" 84 "VINDEX" 91 "TOC" 98)) format "@cindex %s" "@findex %s" "@kindex %s" "@pindex %s" "@tindex %s" "@vindex %s" "\\<tables\\>" nil t string-match "@listoffloats " org-export-translate "Table" :utf-8 "\\<listings\\>" "Listing"] 12 (#$ . 34647)])
221 #@149 Transcode a LINE-BREAK object from Org to Texinfo.
222 CONTENTS is nil.  INFO is a plist holding contextual information.
223
224 (fn LINE-BREAK CONTENTS INFO)
225 (defalias 'org-texinfo-line-break #[771 "\300\207" ["@*\n"] 4 (#$ . 35712)])
226 #@148 Return @ref command for element or object DATUM.
227 DESCRIPTION is the printed name of the section, as a string, or
228 nil.
229
230 (fn DATUM DESCRIPTION INFO)
231 (defalias 'org-texinfo--@ref #[771 "\300\"\205\301\302\303\301\304\305##\211\203\211\232\203#\306\307\"\202(\306\310#\207" [org-texinfo--get-node replace-regexp-in-string "[     ]*:+" "" "," "@comma{}" format "@ref{%s}" "@ref{%s, , %s}"] 11 (#$ . 35944)])
232 #@202 Transcode a LINK object from Org to Texinfo.
233 DESC is the description part of the link, or the empty string.
234 INFO is a plist holding contextual information.  See
235 `org-export-data'.
236
237 (fn LINK DESC INFO)
238 (defalias 'org-texinfo-link #[771 "\302\211;\203\303\304#\202\305A@\"\266\202\306\211;\203&\303\304#\202,\305A@\"\266\202\307\230?\2056\310\235\203C\311Q\202P\312\230\203O\313!\202P\314\315#\206x\316\"\203j\317\"\202x\320\232\203\211\321\"\211\204~\202\204\322#\262\202x\323\235\203>\324\232\203\236\325\"\202\244\326\"\211\211:\204\263\211;\205\273\327\202\273\211@9\205\273\211@\262\330\204\314\331    \332!\"\2027\327=\203\346\203\337\331\333#\2027\331\334\"\2027\335=\204&\336=\2030\337\211;\203\303\304#\202\305A@\"\266\202\211:\204\211;\205\327\202\211@9\205\211@\262\335=\2030\211#\2027\322\n#\266\202\262\202x\340\230\203U\331\341\332!\205P\342PP\"\202x\211\203e\203e\331\343#\202x\211\203p\331\344\"\202x\331\305\345\"\"\207" [org-texinfo-inline-image-rules org-texinfo-link-with-unknown-path-format :type get-text-property 0 plist-get :path "" ("http" "https" "ftp") ":" "file" org-export-file-uri org-export-custom-protocol-maybe texinfo org-export-inline-image-p org-texinfo--inline-image "radio" org-export-resolve-radio-link org-texinfo--@ref ("custom-id" "id" "fuzzy") "fuzzy" org-export-resolve-fuzzy-link org-export-resolve-id-link plain-text #[771 "\300\301\302#\303#\207" [org-element-lineage (headline) t org-texinfo--@ref] 8 "\n\n(fn INFO DESC DESTINATION)"] format org-texinfo--sanitize-content "@uref{file://%s,%s}" "@uref{file://%s}" headline target :parent "mailto" "@email{%s}" ", " "@uref{%s, %s}" "@uref{%s}" :texinfo-link-with-unknown-path-format] 16 (#$ . 36366)])
239 #@159 Return Texinfo code for an inline image.
240 LINK is the link pointing to the inline image.  INFO is the
241 current state of the export, as a plist.
242
243 (fn LINK INFO)
244 (defalias 'org-texinfo--inline-image #[514 "\300!\301\211;\203\302\303#\202\304A@\"\266\202\205!\305\"\306!\306\307\"\310\211;\2038\302\303#\202>\304A@\"\266\202\311\312!\203M\313!\202N!\314!\315\316\"\304\317\"\206_\320\304\321\"\206g\320\304\322\"\206o\320\323\324\n&    \204\205\203\232\325\326\327\330#&\202\251\n\203\250\331 \332R\202\251\211\207" [org-export-get-parent-element :name get-text-property 0 plist-get org-texinfo--get-node org-export-get-caption t :path file-name-sans-extension file-name-absolute-p expand-file-name file-name-extension org-export-read-attribute :attr_texinfo :height "" :width :alt format "@image{%s,%s,%s,%s,%s}" org-texinfo--wrap-float org-export-translate "Figure" :utf-8 "@anchor{" "}\n"] 21 (#$ . 38215)])
245 #@281 Create the menu for inclusion in the Texinfo document.
246
247 SCOPE is a headline or a full parse tree.  INFO is the
248 communication channel, as a plist.
249
250 When optional argument MASTER is non-nil, generate a master menu,
251 including detailed node listing.
252
253 (fn SCOPE INFO &optional MASTER)
254 (defalias 'org-texinfo-make-menu #[770 "\301\"\302!\205:\303\304\305\2057\301\306\n\307\"\310!\203&\211\202'\262#\302!\2055\311\312\313R\262P\"!\207" [org-texinfo-max-toc-depth org-texinfo--build-menu org-string-nw-p org-element-normalize-string format "@menu\n%s@end menu" plist-get :with-toc wholenump "\n@detailmenu\n" "--- The Detailed Node Listing ---\n\n" "@end detailmenu\n"] 14 (#$ . 39193)])
255 #@258 Build menu for entries within SCOPE.
256 SCOPE is a headline or a full parse tree.  INFO is a plist
257 containing contextual information.  When optional argument LEVEL
258 is an integer, build the menu recursively, down to this depth.
259
260 (fn SCOPE INFO &optional LEVEL)
261 (defalias 'org-texinfo--build-menu #[770 "\211\204\f\300\301\"\"\207\211\302U\203\303\207\304\305\306\307\310\311\"\312\"\313\314%\301\"\315#\207" [org-texinfo--format-entries org-texinfo--menu-entries 0 "\n" mapconcat make-byte-code 257 "\302\300\"\211\205\303\304\305\306\300\"\300\"\307\300\"#\310\300\301S#P\207" vconcat vector [org-texinfo--menu-entries format "%s\n\n%s\n" org-export-data org-export-get-alt-title org-texinfo--format-entries org-texinfo--build-menu] 8 "\n\n(fn H)" ""] 11 (#$ . 39902)])
262 #@177 Format all direct menu entries in SCOPE, as a string.
263 SCOPE is either a headline or a full Org document.  INFO is
264 a plist containing contextual information.
265
266 (fn ENTRIES INFO)
267 (defalias 'org-texinfo--format-entries #[514 "\300\301\302\303\304\305\306!\307\"\310\311%\312#!\207" [org-element-normalize-string mapconcat make-byte-code 257 "\302\303\304\305\306\300\"\300\"#\307\300\"\310\311\230\203\311\202 \312\313QR\314\211;\2030\315\316#\2026\317A@\"\266\202\211\204@\202H\320\211\321    \"#\207" vconcat vector [org-texinfo-node-description-column replace-regexp-in-string "[     ]+:+" "" org-texinfo--sanitize-title org-export-get-alt-title org-texinfo--get-node "* " ":" " " ". " :DESCRIPTION get-text-property 0 plist-get format "%%-%ds %%s"] 10 "\n\n(fn H)" "\n"] 10 (#$ . 40694)])
268 #@161 List direct children in SCOPE needing a menu entry.
269 SCOPE is a headline or a full parse tree.  INFO is a plist
270 holding contextual information.
271
272 (fn SCOPE INFO)
273 (defalias 'org-texinfo--menu-entries #[514 "\300\301\"\206\300\302\301\303\304\305\"#\301\"\306\307#\211\307=\204!\211\202/\310\311\312\313\314\n#\"#\207" [plist-get :texinfo-entries-cache plist-put make-hash-table :test eq gethash no-cache puthash cl-remove-if #[257 "\300\301\302\303#!\207" [org-not-nil org-export-get-node-property :COPYING t] 6 "\n\n(fn H)"] org-export-collect-headlines 1] 12 (#$ . 41508)])
274 #@156 Transcode a NODE-PROPERTY element from Org to Texinfo.
275 CONTENTS is nil.  INFO is a plist holding contextual
276 information.
277
278 (fn NODE-PROPERTY CONTENTS INFO)
279 (defalias 'org-texinfo-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 (#$ . 42102)])
280 #@190 Transcode a PARAGRAPH element from Org to Texinfo.
281 CONTENTS is the contents of the paragraph, as a string.  INFO is
282 the plist used as a communication channel.
283
284 (fn PARAGRAPH CONTENTS INFO)
285 (defalias 'org-texinfo-paragraph #[771 "\207" [] 4 (#$ . 42541)])
286 #@171 Transcode a PLAIN-LIST element from Org to Texinfo.
287 CONTENTS is the contents of the list.  INFO is a plist holding
288 contextual information.
289
290 (fn PLAIN-LIST CONTENTS INFO)
291 (defalias 'org-texinfo-plain-list #[771 "\300\301\"\302\303\"\206\302\304\"\305\306\"\203\211\202\306P\262\302\307\"\310\211;\2033\311\312#\2029\302A@\"\266\202\211\313=\203E\314\202Z\211\315=\203O\316\202Z\317\235\203Y\202Z\320\321\322\323=\203j\324Q\202k    $\207" [org-export-read-attribute :attr_texinfo plist-get :indic :texinfo-table-default-markup string-prefix-p "@" :table-type :type get-text-property 0 ordered "enumerate" unordered "itemize" ("ftable" "vtable") "table" format "@%s\n%s@end %s" descriptive " "] 13 (#$ . 42804)])
292 #@144 Transcode a TEXT string from Org to Texinfo.
293 TEXT is the string to transcode.  INFO is a plist holding
294 contextual information.
295
296 (fn TEXT INFO)
297 (defalias 'org-texinfo-plain-text #[514 "\301!\302\303\"\203\304\305$\262\306\307\310\311#\262)\302\312\"\2030\307\313\314\307\315\316##\262\302\317\"\203>\307\320\321#\262\211\207" [case-fold-search org-texinfo--sanitize-content plist-get :with-smart-quotes org-export-activate-smart-quotes :texinfo nil replace-regexp-in-string "\\(?:La\\)?TeX" "@\\&{}" :with-special-strings "\\.\\.\\." "@dots{}" "\\\\-" "@-" :preserve-breaks "\\(\\\\\\\\\\)?[     ]*\n" " @*\n"] 10 (#$ . 43556)])
298 #@146 Transcode a PLANNING element from Org to Texinfo.
299 CONTENTS is nil.  INFO is a plist holding contextual
300 information.
301
302 (fn PLANNING CONTENTS INFO)
303 (defalias 'org-texinfo-planning #[771 "\303\304\305\306\307\310\211;\203\311\312#\202\313A@\"\266\202\211\2050\314\315\"\314\313    \316\"\317!\"P\262\320    \211;\203B\311\312#\202H\313A@\"\266\202\211\205]\314\315    \"\314\313\n\321\"\317!\"P\262\322\n\211;\203o\311\312#\202u\313A@\"\266\202\211\205\212\314\315\n\"\314\313 \321\"\317!\"P\262E\"\323#\324Q\207" [org-closed-string org-deadline-string org-scheduled-string "@noindent" mapconcat identity delq nil :closed get-text-property 0 plist-get format "@strong{%s} " :texinfo-inactive-timestamp-format org-timestamp-translate :deadline :texinfo-active-timestamp-format :scheduled " " "@*"] 16 (#$ . 44209)])
304 #@186 Transcode a PROPERTY-DRAWER element from Org to Texinfo.
305 CONTENTS holds the contents of the drawer.  INFO is a plist
306 holding contextual information.
307
308 (fn PROPERTY-DRAWER CONTENTS INFO)
309 (defalias 'org-texinfo-property-drawer #[771 "\300!\205\n\301\302\"\207" [org-string-nw-p format "@verbatim\n%s@end verbatim"] 6 (#$ . 45055)])
310 #@177 Transcode a QUOTE-BLOCK element from Org to Texinfo.
311 CONTENTS holds the contents of the block.  INFO is a plist
312 holding contextual information.
313
314 (fn QUOTE-BLOCK CONTENTS INFO)
315 (defalias 'org-texinfo-quote-block #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\205 \305\306\"P\305\307#\207" [:name get-text-property 0 plist-get "@quotation" format " %s" "%s\n%s@end quotation"] 9 (#$ . 45394)])
316 #@164 Transcode a RADIO-TARGET object from Org to Texinfo.
317 TEXT is the text of the target.  INFO is a plist holding
318 contextual information.
319
320 (fn RADIO-TARGET TEXT INFO)
321 (defalias 'org-texinfo-radio-target #[771 "\300\301\302\"#\207" [format "@anchor{%s}%s" org-texinfo--get-node] 8 (#$ . 45815)])
322 #@171 Transcode a SECTION element from Org to Texinfo.
323 CONTENTS holds the contents of the section.  INFO is a plist
324 holding contextual information.
325
326 (fn SECTION CONTENTS INFO)
327 (defalias 'org-texinfo-section #[771 "\300!\211\205#\301\302\"Q\303\304\203\305\202\306\307\304\310\307##\266\202\207" [org-export-get-parent-headline "\n" org-texinfo-make-menu nil replace-regexp-in-string "\\`\\([     ]*\n\\)+" "\\`[     \n ]+" "" "[     \n ]+\\'"] 13 (#$ . 46116)])
328 #@182 Transcode a SPECIAL-BLOCK element from Org to Texinfo.
329 CONTENTS holds the contents of the block.  INFO is a plist used
330 as a communication channel.
331
332 (fn SPECIAL-BLOCK CONTENTS INFO)
333 (defalias 'org-texinfo-special-block #[771 "\300\301\302#\303\211;\203\304\305#\202\306A@\"\266\202\307\310\203)\311P\202*\312\2060\312%\207" [org-export-read-attribute :attr_texinfo :options :type get-text-property 0 plist-get format "@%s%s\n%s@end %s" " " ""] 11 (#$ . 46582)])
334 #@172 Transcode a SRC-BLOCK element from Org to Texinfo.
335 CONTENTS holds the contents of the item.  INFO is a plist holding
336 contextual information.
337
338 (fn SRC-BLOCK CONTENTS INFO)
339 (defalias 'org-texinfo-src-block #[771 "\301\302\211;\203\303\304#\202\305A@\"\266\202\306\307\310#)\266\203\311\312\"!\313\2032\314\2023\315\"\316!\316\307\"\204J\211\204J\202`\317\320\321\322 #\323\f \"&\207" [inhibit-changing-match-data "lisp" :language get-text-property 0 plist-get nil t string-match org-texinfo--sanitize-content org-export-format-code-default format "@lisp\n%s@end lisp" "@example\n%s@end example" org-export-get-caption org-texinfo--wrap-float org-export-translate "Listing" :utf-8 org-texinfo--get-node] 15 (#$ . 47069)])
340 #@163 Transcode a STATISTICS-COOKIE object from Org to Texinfo.
341 CONTENTS is nil.  INFO is a plist holding contextual information.
342
343 (fn STATISTICS-COOKIE CONTENTS INFO)
344 (defalias 'org-texinfo-statistics-cookie #[771 "\300\211;\203\301\302#\202\303A@\"\207" [:value get-text-property 0 plist-get] 9 (#$ . 47834)])
345 #@180 Transcode STRIKE-THROUGH from Org to Texinfo.
346 CONTENTS is the text with strike-through markup.  INFO is a plist
347 holding contextual information.
348
349 (fn STRIKE-THROUGH CONTENTS INFO)
350 (defalias 'org-texinfo-strike-through #[771 "\300\301#\207" [org-texinfo--text-markup strike-through] 7 (#$ . 48156)])
351 #@170 Transcode a SUBSCRIPT object from Org to Texinfo.
352 CONTENTS is the contents of the object.  INFO is a plist holding
353 contextual information.
354
355 (fn SUBSCRIPT CONTENTS INFO)
356 (defalias 'org-texinfo-subscript #[771 "\300\301\"\207" [format "@math{_%s}"] 6 (#$ . 48463)])
357 #@174 Transcode a SUPERSCRIPT object from Org to Texinfo.
358 CONTENTS is the contents of the object.  INFO is a plist holding
359 contextual information.
360
361 (fn SUPERSCRIPT CONTENTS INFO)
362 (defalias 'org-texinfo-superscript #[771 "\300\301\"\207" [format "@math{^%s}"] 6 (#$ . 48735)])
363 #@162 Transcode a TABLE element from Org to Texinfo.
364 CONTENTS is the contents of the table.  INFO is a plist holding
365 contextual information.
366
367 (fn TABLE CONTENTS INFO)
368 (defalias 'org-texinfo-table #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304=\203:\305\306\307\310\211;\203/\301\302#\2025\303A@\"\266\202!\"\207\311\312\313#\211\203J\305\314\"\202N\315\"\316!\316\317\"\305\320#\204h\204h\211\202~\321\322\323\324 #\325\f \"&\207" [:type get-text-property 0 plist-get table\.el format "@verbatim\n%s@end verbatim" org-element-normalize-string :value org-export-read-attribute :attr_texinfo :columns "@columnfractions %s" org-texinfo-table-column-widths org-export-get-caption t "@multitable %s\n%s@end multitable" org-texinfo--wrap-float org-export-translate "Table" :utf-8 org-texinfo--get-node] 15 (#$ . 49013)])
369 #@179 Determine the largest table cell in each column to process alignment.
370 TABLE is the table element to transcode.  INFO is a plist used as
371 a communication channel.
372
373 (fn TABLE INFO)
374 (defalias 'org-texinfo-table-column-widths #[514 "\300\301\"A\302\"\303\304\305\306\307\310\311        \"\312\"\313\314%$\210\315\316\317\320\321#\"\207" [make-vector org-export-table-dimensions 0 org-element-map table-row make-byte-code 257 "\302C\303\304\305\306\307\310\311\301    \"\312\"\313\314%\300$\207" vconcat vector [0 org-element-map table-cell make-byte-code 257 "\302\211;\203\303\304#\202\305A@\"\266\202\306\211;\203&\303\304#\202,\305A@\"\266\202Z\300\301\242\300\301\242H]I\266\301\211\242T\240\207" vconcat vector [:contents-end get-text-property 0 plist-get :contents-begin] 8 "\n\n(fn CELL)"] 12 "\n\n(fn ROW)" format "{%s}" mapconcat #[257 "\300\301\"\207" [make-string 97] 4 "\n\n(fn W)"] "} {"] 13 (#$ . 49882)])
375 #@165 Transcode a TABLE-CELL element from Org to Texinfo.
376 CONTENTS is the cell contents.  INFO is a plist used as
377 a communication channel.
378
379 (fn TABLE-CELL CONTENTS INFO)
380 (defalias 'org-texinfo-table-cell #[771 "\301\302\"\203#\211\203#\303\"\203#\304\305\306\"\305\307\"#\202$\262\310\"\205.\311P\207" [orgtbl-exp-regexp plist-get :texinfo-table-scientific-notation string-match format match-string 1 2 org-export-get-next-element "\n@tab "] 10 (#$ . 50823)])
381 #@169 Transcode a TABLE-ROW element from Org to Texinfo.
382 CONTENTS is the contents of the row.  INFO is a plist used as
383 a communication channel.
384
385 (fn TABLE-ROW CONTENTS INFO)
386 (defalias 'org-texinfo-table-row #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304=\2059\305\"\306U\2032\307\310!\"\2032\311\2023\312\211\313Q\262\207" [:type get-text-property 0 plist-get standard org-export-table-row-group 1 org-export-table-has-header-p org-export-get-parent-table "@headitem " "@item " "\n"] 9 (#$ . 51302)])
387 #@141 Transcode a TARGET object from Org to Texinfo.
388 CONTENTS is nil.  INFO is a plist holding contextual
389 information.
390
391 (fn TARGET CONTENTS INFO)
392 (defalias 'org-texinfo-target #[771 "\300\301\302\"\"\207" [format "@anchor{%s}" org-texinfo--get-node] 8 (#$ . 51830)])
393 #@147 Transcode a TIMESTAMP object from Org to Texinfo.
394 CONTENTS is nil.  INFO is a plist holding contextual
395 information.
396
397 (fn TIMESTAMP CONTENTS INFO)
398 (defalias 'org-texinfo-timestamp #[771 "\300\301!\"\302\211;\203\303\304#\202\305A@\"\266\202\211\306>\203-\307\305\310\"\"\202D\211\311>\203=\307\305\312\"\"\202D\307\305\313\"\"\262\207" [org-texinfo-plain-text org-timestamp-translate :type get-text-property 0 plist-get (active-range active) format :texinfo-active-timestamp-format (inactive-range inactive) :texinfo-inactive-timestamp-format :texinfo-diary-timestamp-format] 10 (#$ . 52100)])
399 #@165 Transcode UNDERLINE from Org to Texinfo.
400 CONTENTS is the text with underline markup.  INFO is a plist
401 holding contextual information.
402
403 (fn UNDERLINE CONTENTS INFO)
404 (defalias 'org-texinfo-underline #[771 "\300\301#\207" [org-texinfo--text-markup underline] 7 (#$ . 52722)])
405 #@146 Transcode a VERBATIM object from Org to Texinfo.
406 CONTENTS is nil.  INFO is a plist used as a communication
407 channel.
408
409 (fn VERBATIM CONTENTS INFO)
410 (defalias 'org-texinfo-verbatim #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202\305#\207" [org-texinfo--text-markup :value get-text-property 0 plist-get verbatim] 10 (#$ . 53004)])
411 #@168 Transcode a VERSE-BLOCK element from Org to Texinfo.
412 CONTENTS is verse block contents. INFO is a plist holding
413 contextual information.
414
415 (fn VERSE-BLOCK CONTENTS INFO)
416 (defalias 'org-texinfo-verse-block #[771 "\300\301\"\207" [format "@display\n%s@end display"] 6 (#$ . 53353)])
417 #@905 Export current buffer to a Texinfo file.
418
419 If narrowing is active in the current buffer, only export its
420 narrowed part.
421
422 If a region is active, export that region.
423
424 A non-nil optional argument ASYNC means the process should happen
425 asynchronously.  The resulting file should be accessible through
426 the `org-export-stack' interface.
427
428 When optional argument SUBTREEP is non-nil, export the sub-tree
429 at point, extracting information from the headline properties
430 first.
431
432 When optional argument VISIBLE-ONLY is non-nil, don't export
433 contents of hidden elements.
434
435 When optional argument BODY-ONLY is non-nil, only write code
436 between "\begin{document}" and "\end{document}".
437
438 EXT-PLIST, when provided, is a property list with external
439 parameters overriding Org default settings, but still inferior to
440 file-local settings.
441
442 Return output file's name.
443
444 (fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
445 (defalias 'org-texinfo-export-to-texinfo #[1280 "\302\303\"\304\305&)\207" [org-texinfo-coding-system org-export-coding-system org-export-output-file-name ".texi" org-export-to-file texinfo] 14 (#$ . 53639) nil])
446 #@1001 Export current buffer to Texinfo then process through to INFO.
447
448 If narrowing is active in the current buffer, only export its
449 narrowed part.
450
451 If a region is active, export that region.
452
453 A non-nil optional argument ASYNC means the process should happen
454 asynchronously.  The resulting file should be accessible through
455 the `org-export-stack' interface.
456
457 When optional argument SUBTREEP is non-nil, export the sub-tree
458 at point, extracting information from the headline properties
459 first.
460
461 When optional argument VISIBLE-ONLY is non-nil, don't export
462 contents of hidden elements.
463
464 When optional argument BODY-ONLY is non-nil, only write code
465 between "\begin{document}" and "\end{document}".
466
467 EXT-PLIST, when provided, is a property list with external
468 parameters overriding Org default settings, but still inferior to
469 file-local settings.
470
471 When optional argument PUB-DIR is set, use it as the publishing
472 directory.
473
474 Return INFO file's name.
475
476 (fn &optional ASYNC SUBTREEP VISIBLE-ONLY BODY-ONLY EXT-PLIST)
477 (defalias 'org-texinfo-export-to-info #[1280 "\302\303\"\304\305\306&)\207" [org-texinfo-coding-system org-export-coding-system org-export-output-file-name ".texi" org-export-to-file texinfo #[257 "\300!\207" [org-texinfo-compile] 3 "\n\n(fn FILE)"]] 15 (#$ . 54779) nil])
478 #@236 Publish an org file to Texinfo.
479
480 FILENAME is the filename of the Org file to be published.  PLIST
481 is the property list for the given project.  PUB-DIR is the
482 publishing directory.
483
484 Return output file name.
485
486 (fn PLIST FILENAME PUB-DIR)
487 (defalias 'org-texinfo-publish-to-texinfo #[771 "\300\301\302%\207" [org-publish-org-to texinfo ".texi"] 9 (#$ . 56075)])
488 #@218 Assume the current region has Org syntax, and convert it to Texinfo.
489 This can be used in any buffer.  For example, you can write an
490 itemized list in Org syntax in an Texinfo buffer and use this
491 command to convert it.
492 (defalias 'org-texinfo-convert-region-to-texinfo #[0 "\300\301!\207" [org-export-replace-region-by texinfo] 2 (#$ . 56443) nil])
493 #@298 Compile a texinfo file.
494
495 FILE is the name of the file being compiled.  Processing is done
496 through the command specified in `org-texinfo-info-process',
497 which see.  Output is redirected to "*Org INFO Texinfo Output*"
498 buffer.
499
500 Return INFO file name or an error if it couldn't be produced.
501
502 (fn FILE)
503 (defalias 'org-texinfo-compile #[257 "\303\304\"\210\305\306!\307\310\311\312\"%    \203:\313!\n\211\2038\211@\314Q\315!\2030\316!\210\210A\266\202\202\266\303\317!\210\207" [org-texinfo-info-process org-texinfo-remove-logfiles org-texinfo-logfiles-extensions message "Processing Texinfo file %s..." "*Org INFO Texinfo Output*" get-buffer-create org-compile-file "info" format "See %S for details" file-name-sans-extension "." file-exists-p delete-file "Process completed."] 10 (#$ . 56796)])
504 (provide 'ox-texinfo)