ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/org/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/org/ox-texinfo.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.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\302\303\304\305\306\307\310\311\312\313\314&\n\210\315\316\317\320\321\322\323\324\325\326\327\330& \210\331\332\317\333\327\316\334\335&\210\331\336\337\340\327\316\334\341&\210\331\342\343\344\327\316\323\324\325\345\334\346& \210\331\347\350\351\327\316\334\352&\210\331\353\354\355\327\316\334\356&\210\331\357\360\361\327\316\334\362&\210\331\363\360\364\327\316\334\362&\210\331\365\360\366\327\316\334\362&\210\331\367\370\371\327\316\334\362&\210\331\372\317\373\327\316\334\374&\210\331\375\376\377\327\316\334\201@ &\210\331\201A \201B \201C \327\316\334\362&\210\331\201D \201E \201F \327\316\334\201G \201H \201I & \210\331\201J \201K \201L \327\316\323\324\325\201M \334\352& \210\331\201N \201O \201P \327\316\334\352&\210\331\201Q \201R \201S \327\316\334\201T &\210\331\201U \201V \201W \327\316\334\201X &\210\331\201Y \201Z \201[ \327\201\\ \334\374&\207" [require ox org-export-define-backend texinfo ((bold . org-texinfo-bold) (center-block . org-texinfo-center-block) (clock . org-texinfo-clock) (code . org-texinfo-code) (comment lambda (&rest args) #1="") (comment-block lambda (&rest args) #1#) (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) (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) (quote-section . org-texinfo-quote-section) (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) (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) (verbatim . org-texinfo-verbatim) (verse-block . org-texinfo-verse-block)) :export-block "TEXINFO" :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)) :menu-entry (105 "Export to Texinfo" ((116 "As TEXI file" org-texinfo-export-to-texinfo) (105 "As INFO file" org-texinfo-export-to-info))) :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 newline) (: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)) 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 "Default document encoding for Texinfo output.\n\nIf nil it will default to `buffer-file-coding-system'." :type coding-system org-texinfo-default-class "info" "The default Texinfo class." (string :tag "Texinfo class") org-texinfo-classes '(("info" "@documentencoding AUTO\n@documentlanguage AUTO" ("@chapter %s" . "@unnumbered %s") ("@section %s" . "@unnumberedsec %s") ("@subsection %s" . "@unnumberedsubsec %s") ("@subsubsection %s" . "@unnumberedsubsubsec %s"))) "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 each cell:\n\n (class-name\n header-string\n (numbered-section . unnumbered-section)\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.\n\nInstead of a list of sectioning commands, you can also specify\na function name. That function will be called with two\nparameters, the reduced) level of the headline, and a predicate\nnon-nil when the headline should be numbered. It must return\na format string in which the section title will be added." (Org . "8.2") (repeat (list (string :tag "Texinfo class") (string :tag "Texinfo header") (repeat :tag "Levels" :inline t (choice (cons :tag "Heading" (string :tag " numbered") (string :tag "unnumbered")) (function :tag "Hook computing sectioning"))))) org-texinfo-format-headline-function 'ignore "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.\n\nAs an example, one could set the variable to the following, in\norder to reproduce the default set-up:\n\n(defun org-texinfo-format-headline (todo todo-type priority text tags)\n \"Default format function for a headline.\"\n (concat (when todo\n (format \"\\\\textbf{\\\\textsc{\\\\textsf{%s}}} \" todo))\n (when priority\n (format \"\\\\framebox{\\\\#%c} \" priority))\n text\n (when tags\n (format \"\\\\hfill{}\\\\textsc{%s}\"\n (mapconcat \\='identity tags \":\"))))" function org-texinfo-node-description-column 32 "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 "@emph{%s}" "A printf format string to be applied to active timestamps." string org-texinfo-inactive-timestamp-format "A printf format string to be applied to inactive timestamps." org-texinfo-diary-timestamp-format "A printf format string to be applied to diary timestamps." org-texinfo-link-with-unknown-path-format "@indicateurl{%s}" "Format string for links with unknown path type." org-texinfo-tables-verbatim "When non-nil, tables are exported verbatim." boolean org-texinfo-table-scientific-notation "%s\\,(%s)" "Format string to display numbers in scientific notation.\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-def-table-markup "@samp" "Default setting for @table environments." org-texinfo-text-markup-alist '((bold . "@strong{%s}") (code . code) (italic . "@emph{%s}") (verbatim . verb) (comment . "@c %s")) "Alist of Texinfo expressions to convert text markup.\n\nThe key must be a symbol among `bold', `italic' and `comment'.\nThe value is a formatting string to wrap fontified text with.\n\nValue can also be set to the following symbols: `verb' and\n`code'. For the former, Org will use \"@verb\" to\ncreate a format string and select a delimiter character that\nisn't in the string. For the latter, Org will use \"@code\"\nto typeset and try to protect special characters.\n\nIf no association can be found for a given markup, text will be\nreturned as-is." alist :options (bold code italic verbatim comment) org-texinfo-format-drawer-function (lambda (name contents) contents) "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 'ignore "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.\n\nFor example, the variable could be set to the following function\nin order to mimic default behavior:\n\n(defun org-texinfo-format-inlinetask (todo type priority name tags contents)\n\"Format an inline task element for Texinfo export.\"\n (let ((full-title\n (concat\n (when todo\n (format \"@strong{%s} \" todo))\n (when priority (format \"#%c \" priority))\n title\n (when tags\n (format \":%s:\"\n (mapconcat \\='identity tags \":\")))))\n (format (concat \"@center %s\n\n\"\n \"%s\"\n \"\n\"))\n full-title contents))" org-texinfo-info-process '("makeinfo %f") "Commands to process a Texinfo file to an INFO file.\nThis is list of strings, each of them will be given to the shell\nas a command. %f in the command will be replaced by the full\nfile name, %b by the file base name (i.e without extension) and\n%o by the base directory of the file." (repeat :tag "Shell command sequence" (string :tag "Shell command")) org-texinfo-logfiles-extensions '("aux" "toc" "cp" "fn" "ky" "pg" "tp" "vr") "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 t "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] 12)
#@187 Maximum depth for creation of detailed menu listings.
Beyond this depth, Texinfo will not recognize the nodes and will
cause errors. Left as a constant in case this value ever
changes.
(defconst org-texinfo-max-toc-depth 4 (#$ . 11767))
#@243 List of coding systems supported by Texinfo, as strings.
Specified coding system will be matched against these strings.
If two strings share the same prefix (e.g. "ISO-8859-1" and
"ISO-8859-15"), the most specific one has to be listed first.
(defconst org-texinfo-supported-coding-systems '("US-ASCII" "UTF-8" "ISO-8859-15" "ISO-8859-1" "ISO-8859-2" "koi8-r" "koi8-u") (#$ . 12012))
#@59 Filter controlling number of blank lines after a section.
(defalias 'org-texinfo-filter-section-blank-lines #[(headline back-end info) "\302\303\304\"\305\306 #)\207" [blanks headline make-string 2 10 replace-regexp-in-string "\n\\(?:\n[ ]*\\)*\\'"] 4 (#$ . 12401)])
#@317 Normalize headlines in TREE.
BACK-END is the symbol specifying back-end used for export. INFO
is a plist used as a communication channel.
Make sure every headline in TREE contains a section, since those
are required to install a menu. Also put exactly one blank line
at the end of each section.
Return new tree.
(defalias 'org-texinfo--normalize-headlines #[(tree back-end info) "\302\303\304 $\210\207" [tree info org-element-map headline #[(hl) "\306\307\211;\203 \310 \311\n $\202 A\312 A@\n #\240\210 +\210\211:\204- \311\202: @9\2039 AA\202: )\211 \205t \313\f\314\315
\316%\211 \211:\204Y ;\205a \317\202a @9\205a @)\320=?\205s \321\322\320\323DD\fB#))\207" [hl value property element contents info :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 first] 7]] 5 (#$ . 12678)])
#@104 Return a character not used in string S.
This is used to choose a separator for constructs like \verb.
(defalias 'org-texinfo--find-verb-separator #[(s) "\306\211\307\310\311 \310 \nT\211 GW\2034 \nH\312\313\314 !!
\"\2040 \314 !\310\211\2021 \311\204\f
.\207" [ll #1=#:--cl-vec-- #2=#:--cl-idx-- c #3=#:--cl-var-- #4=#:--cl-var-- "~,./?;':\"|!@#%^&-_=+abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ<>()[]{}" -1 nil t string-match regexp-quote char-to-string s] 5 (#$ . 13589)])
#@95 Format TEXT depending on MARKUP text markup.
See `org-texinfo-text-markup-alist' for details.
(defalias 'org-texinfo--text-markup #[(text markup) " \236A\211\204
\202t \n\306=\203\" \307 ! \310\f \f\311\260)\202t \n\312=\203p \313\314\315 \316\317 \"\203a \320\313 \"\313\224\313V\203M \313\211\224OP \313\224T\315O\321
P
P\2020 P\322\323\n \"+\202t \323\n \")\207" [markup org-texinfo-text-markup-alist fmt text separator char verb org-texinfo--find-verb-separator "@verb{" "}" code 0 "" nil string-match "[@{}]" match-string "@" "@code{%s}" format rtn start] 6 (#$ . 14092)])
#@183 Return node or anchor associated to BLOB.
BLOB is an element or object. INFO is a plist used as
a communication channel. The function guarantees the node or
anchor name is unique.
(defalias 'org-texinfo--get-node #[(blob info) "\306\307\"\n \236A\206\231 \310\n\211:\204 ;\205% \311\202% @9\205% @) \312\f\313\"\2038 \314\315\n\"\"\202v \316\f\317\"\203Z \320\n ;\203P \321\322
#\202V \306 A@
\"*\202v \323\n ;\203k \321\322
#\202q \306 A@
\"*\206v \324)! \325 \"\203\213 \326P\202z \327\307\nB B#\210))\207" [info cache blob element #1=#:temp property plist-get :texinfo-node-cache org-texinfo--sanitize-node plain-text eql headline org-export-data org-export-get-alt-title memql (radio-target target) :value get-text-property 0 :name "" rassoc "x" plist-put name] 6 (#$ . 14703)])
#@186 Bend string TITLE to node line requirements.
Trim string and collapse multiple whitespace characters as they
are not significant. Also remove the following characters: @
{ } ( ) : . ,
(defalias 'org-texinfo--sanitize-node #[(title) "\301\302\303\301\304\305\306\301\307\310#!##\207" [title replace-regexp-in-string "[:,.]" "" "\\`(\\(.*)\\)" "[\\1" org-trim "[ ]\\{2,\\}" " "] 11 (#$ . 15522)])
#@73 Escape special characters in string TEXT.
Special characters are: @ { }
(defalias 'org-texinfo--sanitize-content #[(text) "\301\302\303#\207" [text replace-regexp-in-string "[@{}]" "@\\&"] 4 (#$ . 15926)])
#@144 Return complete document string after Texinfo conversion.
CONTENTS is the transcoded contents string. INFO is a plist
holding export options.
(defalias 'org-texinfo-template #[(contents info) "\306\307\310\"\"\311\307\312\"\313\314\315%\316\317\307\320\"\206+ \307\321\"\211\205* \322 !\323P)\211 \2054 \324\325\f\")\324\326\n\"\327\330\307\331\"
\"A@\3322\217 \315\333@\206P A! B CD\334 E\211 F\203\211 F@E\335E!B\334\315 G\336#)\266\203\203\200 \337\332E\"\210FA\211F\204` \334E,\3400\307\341\"\334 C H I J\342\343I\342\344HJ\315\334\345&\315\334\345&,!\307\346\"\211 K\205\300 \327K!)\347\307\350\"\211 L\205\320 \327L!) \205\336 \324\351\327\306 \"!\"\307\352\"\307\353\"\211\205\371 \336\354\n\"\205\371 \324\355\356\345\n\"\") M\211 N\205MM\205M\357N\360\361\307\362\"\211 O\204\334\2025\363O\334\315 G\336#)\266\203\2031O\2025O\364P)\211 P\203F\324\365MP#\202HM)\360\366\260*\367\370\324\371\307\372\"\206Z\n\"\307\373\"\211 Q\205m\327\342\374\375Q#!)\307\376\"\205\341\377\306\307\201W \"\"!\307\201X \"\205\224\377\306\307\201Y \"\"! R\211 S\203\255R\203\255\324\201Z SR#\202\310S\203\274\324\201[ S\"\202\310R\205\310\324\201\\ R\"*\307\201] \"\211 T\205\337\327\342\374\201^ T#!)P \205\350\201_ \201` \307\201a \"\205\367\201b \201c \201d \324\201e \n\" \205\n\201f \201g \201h \307\312\"\201i #\360U\360\307\201j \" V\201k V\201l \"\2035\334\202W\201m V\201n \"\203O\324\201o \307\201p \"\"\202W\307\201p \"\360P)\201q \260 *\207" [info copying title f file org-texinfo-classes org-export-data plist-get :title org-element-map :parse-tree headline #[(hl) "\303\304 ;\203 \305\306\n #\202 \307 A@\n\"*!\2056 \211:\204( \310\2025 @9\2034 AA\2025 )\207" [hl element property org-not-nil :COPYING get-text-property 0 plist-get nil] 6] 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 nil regexp-quote 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 "\\.$" "." "%-23s %s" "@end direntry\n\n" "@finalout\n" "@titlepage\n" "@title %s\n" :texinfo-printed-title :subtitle "^" "@subtitle " :with-author org-string-nw-p org-texinfo-coding-system buffer-file-coding-system name case-fold-search org-texinfo-supported-coding-systems system --dolist-tail-- inhibit-changing-match-data language coding header texinfo-header texinfo-post-header dirtitle dircat desc dirdesc subtitle email author subauthor contents #1=#:temp :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" "@insertcopying\n" "@end ifnottex\n\n" org-texinfo-make-menu master :with-creator memql (nil) eql comment "@c %s\n" :creator "@bye"] 33 (#$ . 16140)])
#@125 Transcode BOLD from Org to Texinfo.
CONTENTS is the text with bold markup. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-bold #[(bold contents info) "\301\302\"\207" [contents org-texinfo--text-markup bold] 3 (#$ . 19512)])
#@147 Transcode a CENTER-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist used
as a communication channel.
(defalias 'org-texinfo-center-block #[(center-block contents info) "\207" [contents] 1 (#$ . 19770)])
#@114 Transcode a CLOCK element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-clock #[(clock contents info) "\306\307\310\"\307 \311\312\313\n ;\203 \314\315\f #\202 \316 A@\f\"* ;\2030 \314\315\f #\2026 \316 A@\f\"*!\317\n ;\203I \314\315\f #\202O \316 A@\f\"*\211 \205Y \307\320
\")P\"\321R\207" [org-clock-string org-texinfo-inactive-timestamp-format clock element property time "@noindent" format "@strong{%s} " org-translate-time :raw-value :value get-text-property 0 plist-get :duration " (%s)" "@*"] 11 (#$ . 20026)])
#@113 Transcode a CODE object from Org to Texinfo.
CONTENTS is nil. INFO is a plist used as a communication
channel.
(defalias 'org-texinfo-code #[(code contents info) "\303\304 ;\203 \305\306\n #\202 \307 A@\n\"*\300\"\207" [code element property org-texinfo--text-markup :value get-text-property 0 plist-get] 5 (#$ . 20625)])
#@140 Transcode a DRAWER element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-drawer #[(drawer contents info) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\f
\")\207" [drawer element property name org-texinfo-format-drawer-function contents :drawer-name get-text-property 0 plist-get] 5 (#$ . 20960)])
#@147 Transcode a DYNAMIC-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-dynamic-block #[(dynamic-block contents info) "\207" [contents] 1 (#$ . 21356)])
#@134 Transcode an ENTITY object from Org to Texinfo.
CONTENTS are the definition itself. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-entity #[(entity contents info) "\304 ;\203 \305\306\n #\202 \307 A@\n\"*\310 ;\203* \305\306\n #\2020 \307 A@\n\"*\203; \311\312 \"\202< )\207" [entity element property ent :latex get-text-property 0 plist-get :latex-math-p format "@math{%s}"] 4 (#$ . 21614)])
#@123 Transcode an EXAMPLE-BLOCK element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-example-block #[(example-block contents info) "\302\303\304 \"\"\207" [example-block info format "@verbatim\n%s@end verbatim" org-export-format-code-default] 5 (#$ . 22049)])
#@121 Transcode a EXPORT-BLOCK element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-export-block #[(export-block contents info) "\303 ;\203 \304\305\n #\202 \306 A@\n\"*\307\230\2057 \310\311 ;\203/ \304\305\n #\2025 \306 A@\n\"*!\207" [export-block element property :type get-text-property 0 plist-get "TEXINFO" org-remove-indentation :value] 5 (#$ . 22377)])
#@122 Transcode a EXPORT-SNIPPET object from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-export-snippet #[(export-snippet contents info) "\303!\304=\205 \305 ;\203 \306\307\n #\202 \310 A@\n\"*\207" [export-snippet element property org-export-snippet-backend texinfo :value get-text-property 0 plist-get] 4 (#$ . 22812)])
#@120 Transcode a FIXED-WIDTH element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-fixed-width #[(fixed-width contents info) "\303\304\305\306\307 ;\203 \310\311\n #\202 \312 A@\n\"*!!\"\207" [fixed-width element property format "@example\n%s\n@end example" org-remove-indentation org-texinfo--sanitize-content :value get-text-property 0 plist-get] 8 (#$ . 23203)])
#@147 Create a footnote reference for FOOTNOTE.
FOOTNOTE is the footnote to define. CONTENTS is nil. INFO is a
plist holding contextual information.
(defalias 'org-texinfo-footnote-reference #[(footnote contents info) "\303 \"\304\305\306\307\n \"!\")\207" [footnote info def org-export-get-footnote-definition format "@footnote{%s}" org-trim org-export-data] 6 (#$ . 23640)])
#@145 Transcode a HEADLINE element from Org to Texinfo.
CONTENTS holds the contents of the headline. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-headline #[(headline contents info) "\306\307\"\310\n\"\311\n\" \312
\" 7\313\n 8 98;\203+ \314\31598#\2023 \3068A@9\"* :\316\317\320\n\"\" ;\321\322\n 8 98;\203V \314\31598#\202^ \3068A@9\"*!\203g \323\202\271 \324789\203\202 \325\32478!\203\202 \32478 \f\"\202\207 T78\211 <\204\221 \326\202\270 <;\203\234 <\202\270 <A:?\205\270 :\204\255 \f\204\263 <A\202\266 <@\327P) =\306\330\"\205\355 \331\n 8 98;\203\330 \314\31598#\202\340 \3068A@9\"*\211 >\205\354 \332>\")\211 >\205\333\n 8 98;\203 \314\31598#\202\3068A@9\"* ?\306\334\"\205 \335\n\" @\306\336\"\205G\337\n 8 98;\203>\314\31598#\202F\3068A@9\"* A\332\340\n 8 98;\203`\314\31598#\202h\3068A@9\"*\" BC\341=\204\204C>?AB@%\202\251>\205\216\316\342>\"A\205\230\316\343A\"B@\205\250\316\344\345\346@\347#\"R D\350E!\203\271\351EP\202\272\352 E\353\n 8 98;\203\322\314\31598#\202\332\3068A@9\"*\203\342\326\202u\321\354\n 8 98;\203\371\314\31598#\202\3068A@9\"*!\203\n\326\202u:\203);\316=DE:\355\235\205#\356:PP#P\202u=\2035\357\n\"\203j\360\n\"\205H\316\361\f\203F\362\202G\363\"\364D\351E\365\n\"\203d\316\366\f\203_\362\202`\363\"\202e\351\260\202u;\316=DE#P.\207" [info class headline level numberedp org-texinfo-classes plist-get :texinfo-class org-export-get-relative-level org-export-numbered-headline-p assoc :INDEX get-text-property 0 format "@node %s\n" org-texinfo--get-node org-not-nil :APPENDIX "@appendix %s\n%s" 2 fboundp nil "\n%s" :with-todo-keywords :todo-keyword org-export-data :todo-type :with-tags org-export-get-tags :with-priority :priority :title ignore "@strong{%s} " "@emph{#%s} " " :%s:" mapconcat identity ":" org-string-nw-p "\n" "" :footnote-section-p :COPYING ("cp" "fn" "ky" "pg" "tp" "vr") "\n@printindex " org-export-low-level-p org-export-first-sibling-p "@%s\n" enumerate itemize "@item\n" org-export-last-sibling-p "@end %s" class-sectioning element property index node sec section-fmt todo todo-type tags priority text org-texinfo-format-headline-function full-text contents] 10 (#$ . 24023)])
#@150 Transcode an INLINE-SRC-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the item. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-inline-src-block #[(inline-src-block contents info) "\305 ;\203 \306\307\n #\202 \310 A@\n\"*\311 ! \312\f \f\313\260*\207" [inline-src-block element property code separator :value get-text-property 0 plist-get org-texinfo--find-verb-separator "@verb{" "}"] 5 (#$ . 26328)])
#@145 Transcode an INLINETASK element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-inlinetask #[(inlinetask contents info) "\306\307 ;\203 \310\311\n #\202 \312 A@\n\"* \"\312 \313\"\205D \314 ;\2033 \310\311\n #\2029 \312 A@\n\"*\211 \205C \306\f \")\315 ;\203U \310\311\n #\202[ \312 A@\n\"*\312 \316\"\205g \317 \"\312 \320\"\205\206 \321 ;\203 \310\311\n #\202\205 \312 A@\n\"* \322=\204\246 \f
&\202\321 \f\205\256 \323\324\f\"
\205\266 \323\325
\" \205\306 \323\326\327\330\331#\"R \323\332 #)-\207" [inlinetask element property info todo priority 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 ignore format "@strong{%s} " "#%c " ":%s:" mapconcat identity ":" "@center %s\n\n%s\n" tags todo-type title org-texinfo-format-inlinetask-function contents full-title] 10 (#$ . 26789)])
#@129 Transcode ITALIC from Org to Texinfo.
CONTENTS is the text with italic markup. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-italic #[(italic contents info) "\301\302\"\207" [contents org-texinfo--text-markup italic] 3 (#$ . 27819)])
#@138 Transcode an ITEM element from Org to Texinfo.
CONTENTS holds the contents of the item. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-item #[(item contents info) "\306\307\310 ;\203 \311\312\n #\202 \313 A@\n\"*\211\203( \314\315 \f\"P\202) \316)
\206/ \316#\207" [item element property tag info contents format "@item%s\n%s" :tag get-text-property 0 plist-get " " org-export-data ""] 7 (#$ . 28087)])
#@116 Transcode a KEYWORD element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-keyword #[(keyword contents info) "\305 ;\203 \306\307\n #\202 \310 A@\n\"*\311 ;\203) \306\307\n #\202/ \310 A@\n\"*\211 \312\230\203< \202\207 \f\313\230\203I \314\315 \"\202\207 \f\316\230\203V \314\317 \"\202\207 \f\320\230\203c \314\321 \"\202\207 \f\322\230\203p \314\323 \"\202\207 \f\324\230\203} \314\325 \"\202\207 \f\326\230\205\207 \314\327 \"*\207" [keyword element property value key :key get-text-property 0 plist-get :value "TEXINFO" "CINDEX" format "@cindex %s" "FINDEX" "@findex %s" "KINDEX" "@kindex %s" "PINDEX" "@pindex %s" "TINDEX" "@tindex %s" "VINDEX" "@vindex %s"] 6 (#$ . 28528)])
#@118 Transcode a LINE-BREAK object from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-line-break #[(line-break contents info) "\300\207" ["@*\n"] 1 (#$ . 29290)])
#@182 Transcode a LINK object from Org to Texinfo.
DESC is the description part of the link, or the empty string.
INFO is a plist holding contextual information. See
`org-export-data'.
(defalias 'org-texinfo-link #[(link desc info) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\312 ;\203* \307\310\n #\2020 \311 A@\n\"*
\313\230?\205:
\314\235\203H \315\fQ\202[ \316\230\203Z \317\f!\203Z \320\fP\202[ \f ;\321 < \322\232\203\203 \323=\"\211 >\204u
\202 \324\325\326>=\"
#)\202@ \327\235\203\270 \330\232\203\227 \331=\"\202\234 \332=\"\211 >\211:\204\256 ;\205\266 \333\202\266 @9\205\266 @) ?\334?\335\"\203\314 \324@\336;!\"\202\264\337?\333\"\203\351
\203\341 \324\340>
#\202\264\324\341>\"\202\264\337?\342\"\2034\324\343\326>=\"
\2060\344>=\"\203&\345\346> ;\203\307\310\n #\202 \311 A@\n\"*=\"\2020\347\350\351>=\"\352##\202\264
\206\242>\211:\204I ;\205Q\333\202Q @9\205Q @)\342=\203\200\344>=\"\204\200\345\346> ;\203s\307\310\n #\202y\311 A@\n\"*=\"\206\242\353>=\"\211 A\204\220\321\202\241A\250\203\233A\202\241\347\350A\352#)\211 B\205\263\324\325\326>=\"B#)*\202@ \354\232\203\347\355;\356\"\211 C@ DCA@\206\321\357 E
\206\330\313 F\324\360EFD$,\202@ \361\230\203\377\324\362\336;!
\205\372\363
PP\"\202@\364\365 G\"8 <\366<!\205<\367;!
\370#)\206@;\203.
\203.\324\371;
#\202@;\203;\324\372;\"\202@\324@
\"-\207" [link element property type raw-path desc :type get-text-property 0 plist-get :path "" ("http" "https" "ftp") ":" "file" file-name-absolute-p "file:" nil "radio" org-export-resolve-radio-link format "@ref{%s,,%s}" org-texinfo--get-node ("custom-id" "id" "fuzzy") "fuzzy" org-export-resolve-fuzzy-link org-export-resolve-id-link plain-text memql (nil) org-texinfo--sanitize-content eql "@uref{file://%s,%s}" "@uref{file://%s}" headline "@ref{%s,%s}" org-export-numbered-headline-p org-export-data :title mapconcat number-to-string org-export-get-headline-number "." org-export-get-ordinal "info" split-string "[:#]" "top" "@ref{%s,%s,,%s,}" "mailto" "@email{%s}" "," 2 assoc functionp org-link-unescape texinfo "@uref{%s,%s}" "@uref{%s}" path protocol info destination #1=#:temp org-texinfo-link-with-unknown-path-format n topic info-path info-manual info-node title org-link-protocols] 9 (#$ . 29514)])
#@247 Create the menu for inclusion in the Texinfo document.
SCOPE is a headline or a full parse tree. INFO is the
communication channel, as a plist.
When optional argument MASTER is non-nil, generate a master menu,
including detailed node listing.
(defalias 'org-texinfo-make-menu #[(scope info &optional master) "\306 \"\307\n!\205; \310\311\312\n \2058 \306 \313 \314\" \315\f!\203% \f\202&
)# \307!\2057 \316\317\320R)P\"!)\207" [scope info menu master toc-depth 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" detailmenu] 10 (#$ . 31865)])
#@225 Build menu for entries within SCOPE.
SCOPE is a headline or a full parse tree. INFO is a plist
containing contextual information. When optional argument LEVEL
is an integer, build the menu recursively, down to this depth.
(defalias 'org-texinfo--build-menu #[(scope info &optional level) "\204\f \303\304 \n\"\n\"\207\305U\203 \306\207\307\310\311\304 \n\"\312#!\207" [level scope info org-texinfo--format-entries org-texinfo--menu-entries 0 nil org-element-normalize-string mapconcat #[(h) "\304 \"\211\205 \305\306\307\310 \" \"\311\n \"#\312 S#P)\207" [h info entries level 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] 7] ""] 6 (#$ . 32606)])
#@158 Format all direct menu entries in SCOPE, as a string.
SCOPE is either a headline or a full Org document. INFO is
a plist containing contextual information.
(defalias 'org-texinfo--format-entries #[(entries info) "\301\302\303\304#!\207" [entries org-element-normalize-string mapconcat #[(h) "\306\307 \" \"\310 \"\311\n\312\n \230\203 \312\202 \313 \314QR \315
;\2033 \316\317
#\202: \320
A@\"*\211 \204E \f\202O \321\211\322\"\f#,\207" [h info title node entry element org-export-data org-export-get-alt-title org-texinfo--get-node "* " ":" " " ". " :DESCRIPTION get-text-property 0 plist-get format "%%-%ds %%s" property desc org-texinfo-node-description-column] 7] "\n"] 5 (#$ . 33365)])
#@144 List direct children in SCOPE needing a menu entry.
SCOPE is a headline or a full parse tree. INFO is a plist
holding contextual information.
(defalias 'org-texinfo--menu-entries #[(scope info) "\305\306\"\206 \305\307\306\310\311\312\"#\306\"\313\n \314#\211\314=\204# \202H \315\n\316\n\211 :\2041 \317\202> \f@9\203= \fAA\202> \f)\320\321\317\320& #*\207" [info cache scope cached-entries element plist-get :texinfo-entries-cache plist-put make-hash-table :test eq gethash no-cache puthash org-element-map nil headline #[(h) "\304\305 ;\203 \306\307\n #\202 \310 A@\n\"*!?\205C \311 ;\203/ \306\307\n #\2025 \310 A@\n\"*?\205C \312 \"?\205C \207" [h element property info org-not-nil :COPYING get-text-property 0 plist-get :footnote-section-p org-export-low-level-p] 5]] 10 (#$ . 34084)])
#@160 Transcode a PARAGRAPH element from Org to Texinfo.
CONTENTS is the contents of the paragraph, as a string. INFO is
the plist used as a communication channel.
(defalias 'org-texinfo-paragraph #[(paragraph contents info) "\207" [contents] 1 (#$ . 34902)])
#@140 Transcode a PLAIN-LIST element from Org to Texinfo.
CONTENTS is the contents of the list. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-plain-list #[(plain-list contents info) "\306\307\"\310 \311\"\206
\n\310 \312\" \313
;\203& \314\315
#\202- \310
A@\"*\211 \316=\203: \317\202P \320=\203E \321\202P \f\322\235\203O \f\202P \323 \324\325\326=\203c \327 Q\202e $-\207" [plain-list attr org-texinfo-def-table-markup indic table-type element org-export-read-attribute :attr_texinfo plist-get :indic :table-type :type get-text-property 0 ordered "enumerate" unordered "itemize" ("ftable" "vtable") "table" format "@%s\n%s@end %s" descriptive " " property type list-type contents] 6 (#$ . 35165)])
#@128 Transcode a TEXT string from Org to Texinfo.
TEXT is the string to transcode. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-plain-text #[(text info) "\305!\306\n\307\"\203 \310 \311\n$\312\313 \314\315 #\2031 \316\317\320\321\322 \"\"\312\323 $\313\225\202 *\306\n\324\"\203J \314\325 \"\203J \316\326\312\323 $\2029 \306\n\327\"\203W \330\331\332 # )\207" [text output info start case-fold-search org-texinfo--sanitize-content plist-get :with-smart-quotes org-export-activate-smart-quotes :texinfo nil 0 string-match "\\(\\(?:La\\)?TeX\\)" replace-match format "@%s{}" match-string 1 t :with-special-strings "\\.\\.\\." "@dots{}" :preserve-breaks replace-regexp-in-string "\\(\\\\\\\\\\)?[ ]*\n" " @*\n"] 6 (#$ . 35919)])
#@117 Transcode a PLANNING element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-planning #[(planning contents info) "\306\307\310\311\312\313 ;\203 \314\315\n #\202 \316 A@\n\"*\211\205D \317\320\f\"\317
\321\322 ;\203: \314\315\n #\202@ \316 A@\n\"*!\"P)\323 ;\203V \314\315\n #\202\\ \316 A@\n\"*\211 \205\210 \317\320\"\317\321\322 ;\203~ \314\315\n #\202\204 \316 A@\n\"*!\"P)\324 ;\203\232 \314\315\n #\202\240 \316 A@\n\"*\211 \205\314 \317\320\"\317\321\322 ;\203\302 \314\315\n #\202\310 \316 A@\n\"*!\"P)E\"\325#\326Q\207" [planning element property closed org-closed-string org-texinfo-inactive-timestamp-format "@noindent" mapconcat identity delq nil :closed get-text-property 0 plist-get format "@strong{%s} " org-translate-time :raw-value :deadline :scheduled " " "@*" deadline org-deadline-string org-texinfo-active-timestamp-format scheduled org-scheduled-string] 16 (#$ . 36688)])
#@124 Transcode a PROPERTY-DRAWER element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-property-drawer #[(property-drawer contents info) "\300\207" [""] 1 (#$ . 37684)])
#@145 Transcode a QUOTE-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-quote-block #[(quote-block contents info) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\312 \205\" \313\314 \"P \313\315\f
#*\207" [quote-block element property title start-quote contents :name get-text-property 0 plist-get "@quotation" format " %s" "%s\n%s@end quotation"] 4 (#$ . 37920)])
#@122 Transcode a QUOTE-SECTION element from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-quote-section #[(quote-section contents info) "\304\305 ;\203 \306\307\n #\202 \310 A@\n\"*!\211\205# \311\312 \")\207" [quote-section element property value org-remove-indentation :value get-text-property 0 plist-get format "@verbatim\n%s@end verbatim"] 6 (#$ . 38387)])
#@135 Transcode a RADIO-TARGET object from Org to Texinfo.
TEXT is the text of the target. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-radio-target #[(radio-target text info) "\304\305\306\307 ;\203 \310\311\n #\202 \312 A@\n\"*! #\207" [radio-target element property text format "@anchor{%s}%s" org-export-solidify-link-text :value get-text-property 0 plist-get] 7 (#$ . 38816)])
#@143 Transcode a SECTION element from Org to Texinfo.
CONTENTS holds the contents of the section. INFO is a plist
holding contextual information.
(defalias 'org-texinfo-section #[(section contents info) "\304 !\211\205
\305\n \")P\207" [contents section parent info org-export-get-parent-headline org-texinfo-make-menu] 5 (#$ . 39231)])
#@148 Transcode a SPECIAL-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the block. INFO is a plist used
as a communication channel.
(defalias 'org-texinfo-special-block #[(special-block contents info) "\207" [contents] 1 (#$ . 39574)])
#@142 Transcode a SRC-BLOCK element from Org to Texinfo.
CONTENTS holds the contents of the item. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-src-block #[(src-block contents info) "\306\307 ;\203 \310\311\n #\202 \312 A@\n\"*\313\314\315#)\266\203\316\317\f\"! \320\2037 \321\2028 \322
\"*\207" [src-block element property inhibit-changing-match-data info code "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" lispp] 7 (#$ . 39833)])
#@125 Transcode a STATISTICS-COOKIE object from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual information.
(defalias 'org-texinfo-statistics-cookie #[(statistics-cookie contents info) "\303 ;\203 \304\305\n #\202 \306 A@\n\"*\207" [statistics-cookie element property :value get-text-property 0 plist-get] 4 (#$ . 40443)])
#@140 Transcode a SUBSCRIPT object from Org to Texinfo.
CONTENTS is the contents of the object. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-subscript #[(subscript contents info) "\301\302\"\207" [contents format "@math{_%s}"] 3 (#$ . 40794)])
#@142 Transcode a SUPERSCRIPT object from Org to Texinfo.
CONTENTS is the contents of the object. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-superscript #[(superscript contents info) "\301\302\"\207" [contents format "@math{^%s}"] 3 (#$ . 41067)])
#@136 Transcode a TABLE element from Org to Texinfo.
CONTENTS is the contents of the table. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-table #[(table contents info) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\312=\203; \313\314\315\316 ;\2031 \307\310\n #\2027 \311 A@\n\"*!\"\207\317\320\321#\211\203L \313\322 \"\202P \323\f\" \313\324
#*\207" [table element property col-width info columns :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 "@multitable %s\n%s@end multitable" contents] 8 (#$ . 41346)])
#@162 Determine the largest table cell in each column to process alignment.
TABLE is the table element to transcode. INFO is a plist used as
a communication channel.
(defalias 'org-texinfo-table-column-widths #[(table info) "\303\304 \"A\305\"\306\307\310 $\210\311\312\313\314\n\315#\")\207" [table info widths make-vector org-export-table-dimensions 0 org-element-map table-row #[(row) "\303\304 \305\306\n$)\207" [idx row info 0 org-element-map table-cell #[(cell) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\312 ;\203) \307\310\n #\202/ \311 A@\n\"*Z\f
\f
H]I\210)
T\211\207" [cell element property w widths idx :contents-end get-text-property 0 plist-get :contents-begin] 5]] 5] format "{%s}" mapconcat #[(w) "\301\302\"\207" [w make-string 97] 3] "} {"] 6 (#$ . 42064)])
#@134 Transcode a TABLE-CELL element from Org to Texinfo.
CONTENTS is the cell contents. INFO is a plist used as
a communication channel.
(defalias 'org-texinfo-table-cell #[(table-cell contents info) "\203 \203 \305\n\"\203 \306 \307\310\"\307\311\"#\202 \312 \f\"\205& \313P\207" [contents org-texinfo-table-scientific-notation orgtbl-exp-regexp table-cell info string-match format match-string 1 2 org-export-get-next-element "\n@tab "] 6 (#$ . 42857)])
#@139 Transcode a TABLE-ROW element from Org to Texinfo.
CONTENTS is the contents of the row. INFO is a plist used as
a communication channel.
(defalias 'org-texinfo-table-row #[(table-row contents info) "\306 ;\203 \307\310\n #\202 \311 A@\n\"*\312=\205: \313 \"\314U\2033 \315\316! \"\2033 \317\2024 \320\211
\321Q)\207" [table-row element property info rowgroup-tag contents :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"] 5 (#$ . 43326)])
#@114 Transcode a TARGET object from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-target #[(target contents info) "\303\304\305\306 ;\203 \307\310\n #\202 \311 A@\n\"*!\"\207" [target element property format "@anchor{%s}" org-export-solidify-link-text :value get-text-property 0 plist-get] 7 (#$ . 43891)])
#@117 Transcode a TIMESTAMP object from Org to Texinfo.
CONTENTS is nil. INFO is a plist holding contextual
information.
(defalias 'org-texinfo-timestamp #[(timestamp contents info) "\306\307! \"\310 ;\203 \311\312\f #\202 \313 A@\f\"* \314
\315\"\203/ \316\n\"\202C \314
\317\"\203> \316\n\"\202C \316\n\"*\207" [timestamp info value element property #1=#:temp org-texinfo-plain-text org-timestamp-translate :type get-text-property 0 plist-get memql (active active-range) format (inactive inactive-range) org-texinfo-active-timestamp-format org-texinfo-inactive-timestamp-format org-texinfo-diary-timestamp-format] 4 (#$ . 44264)])
#@117 Transcode a VERBATIM object from Org to Texinfo.
CONTENTS is nil. INFO is a plist used as a communication
channel.
(defalias 'org-texinfo-verbatim #[(verbatim contents info) "\303\304 ;\203 \305\306\n #\202 \307 A@\n\"*\300\"\207" [verbatim element property org-texinfo--text-markup :value get-text-property 0 plist-get] 5 (#$ . 44912)])
#@136 Transcode a VERSE-BLOCK element from Org to Texinfo.
CONTENTS is verse block contents. INFO is a plist holding
contextual information.
(defalias 'org-texinfo-verse-block #[(verse-block contents info) "\301\302\"\207" [contents format "@display\n%s@end display"] 3 (#$ . 45263)])
#@841 Export current buffer to a Texinfo file.
If narrowing is active in the current buffer, only export its
narrowed part.
If a region is active, export that region.
A non-nil optional argument ASYNC means the process should happen
asynchronously. The resulting file should be accessible through
the `org-export-stack' interface.
When optional argument SUBTREEP is non-nil, export the sub-tree
at point, extracting information from the headline properties
first.
When optional argument VISIBLE-ONLY is non-nil, don't export
contents of hidden elements.
When optional argument BODY-ONLY is non-nil, only write code
between "\begin{document}" and "\end{document}".
EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.
Return output file's name.
(defalias 'org-texinfo-export-to-texinfo #[(&optional async subtreep visible-only body-only ext-plist) "\306\307\" \310\311 \f
\n &*\207" [subtreep org-texinfo-coding-system org-export-coding-system outfile async visible-only org-export-output-file-name ".texi" org-export-to-file texinfo body-only ext-plist] 8 (#$ . 45550) nil])
#@937 Export current buffer to Texinfo then process through to INFO.
If narrowing is active in the current buffer, only export its
narrowed part.
If a region is active, export that region.
A non-nil optional argument ASYNC means the process should happen
asynchronously. The resulting file should be accessible through
the `org-export-stack' interface.
When optional argument SUBTREEP is non-nil, export the sub-tree
at point, extracting information from the headline properties
first.
When optional argument VISIBLE-ONLY is non-nil, don't export
contents of hidden elements.
When optional argument BODY-ONLY is non-nil, only write code
between "\begin{document}" and "\end{document}".
EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.
When optional argument PUB-DIR is set, use it as the publishing
directory.
Return INFO file's name.
(defalias 'org-texinfo-export-to-info #[(&optional async subtreep visible-only body-only ext-plist) "\306\307\" \310\311 \f
\f\312&*\207" [subtreep org-texinfo-coding-system org-export-coding-system outfile async visible-only org-export-output-file-name ".texi" org-export-to-file texinfo #[(file) "\301!\207" [file org-texinfo-compile] 2] body-only ext-plist] 9 (#$ . 46735) nil])
#@207 Publish an org file to Texinfo.
FILENAME is the filename of the Org file to be published. PLIST
is the property list for the given project. PUB-DIR is the
publishing directory.
Return output file name.
(defalias 'org-texinfo-publish-to-texinfo #[(plist filename pub-dir) "\303\304\305 \n%\207" [filename plist pub-dir org-publish-org-to texinfo ".texi"] 6 (#$ . 48069)])
#@228 Assume the current region has org-mode syntax, and convert it to Texinfo.
This can be used in any buffer. For example, you can write an
itemized list in org-mode syntax in an Texinfo buffer and use
this command to convert it.
(defalias 'org-texinfo-convert-region-to-texinfo #[nil "\300\301!\207" [org-export-replace-region-by texinfo] 2 (#$ . 48452) nil])
#@215 Compile a texinfo file.
FILE is the name of the file being compiled. Processing is
done through the command specified in `org-texinfo-info-process'.
Return INFO file name or an error if it couldn't be produced.
(defalias 'org-texinfo-compile #[(file) "\306\307!!\310!\311!\312!\203 \311\n!\202 \f \313 \314\315\"\210\316 $\317\216\320\321! %&\313 '\211 (\203f (@'\322\323\324\325 !\323\326\325\n!\323\327\325 !'\330\211%\330\211%\330\211%%\"\210(A\211(\2049 *\331%!) \332Q )\333)!\204\216 \334\335)
\203\210 \336
P\202\211 \337#\210\202\317 *\203\277 +\313 ,\211 (\203\276 (@, \340,R\333!\203\264 \341!\210)(A\211(\204\236 *\314\342
\204\311 \340\202\314 \343
PP!\210).\207" [file base-name full-name out-dir default-directory errors file-name-sans-extension file-name-nondirectory file-truename file-name-directory file-name-absolute-p nil message "Processing Texinfo file %s..." current-window-configuration #[nil "\301!\207" [#1=#:wconfig set-window-configuration] 2] get-buffer-create "*Org INFO Texinfo Output*" shell-command replace-regexp-in-string "%b" shell-quote-argument "%f" "%o" t org-texinfo-collect-errors ".info" file-exists-p error "INFO file %s wasn't produced%s" ": " "" "." delete-file "Process completed" " with errors: " #1# outbuf org-texinfo-info-process command --dolist-tail-- infofile org-texinfo-remove-logfiles org-texinfo-logfiles-extensions ext] 14 (#$ . 48817)])
#@171 Collect some kind of errors from "makeinfo" command output.
BUFFER is the buffer containing output.
Return collected error types as a string, or nil if there was
none.
(defalias 'org-texinfo-collect-errors #[(buffer) "rq\210\212eb\210\303\304\212\305\306\307\303#)\203 \310P\212\305\311\307\303#)\203( \312P\212\305\313\307\303#)\2036 \314P\212\305\315\307\303#)\203D \316P\212\305\317\307\303#)\203R \320P\212\305\321\307\303#)\203` \322P\212\305\323\307\303#)\203n \312P\324 !\205w \325 !,\207" [buffer errors case-fold-search t "" re-search-forward "perhaps incorrect sectioning?" nil " [incorrect sectioning]" "missing close brace" " [syntax error]" "Unknown command" " [undefined @command]" "No matching @end" " [block incomplete]" "requires a sectioning" " [invalid section command]" "\\[unexpected]" " [unexpected error]" "misplaced " org-string-nw-p org-trim] 4 (#$ . 50259)])
(provide 'ox-texinfo)
Kontol Shell Bypass