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

Chizi123
2018-11-21 7074318d7ab58aca124f590c42fd820e8eb258a5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
;ELC
;;; Compiled
;;; in Emacs version 26.1
;;; with all optimizations.
 
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
 
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305\306\307#\210\310\311\312\313\314\315\316\317\320&\207" [require cl-lib format-spec ox org-compat table nil noerror org-export-define-backend odt ((bold . org-odt-bold) (center-block . org-odt-center-block) (clock . org-odt-clock) (code . org-odt-code) (drawer . org-odt-drawer) (dynamic-block . org-odt-dynamic-block) (entity . org-odt-entity) (example-block . org-odt-example-block) (export-block . org-odt-export-block) (export-snippet . org-odt-export-snippet) (fixed-width . org-odt-fixed-width) (footnote-definition . org-odt-footnote-definition) (footnote-reference . org-odt-footnote-reference) (headline . org-odt-headline) (horizontal-rule . org-odt-horizontal-rule) (inline-src-block . org-odt-inline-src-block) (inlinetask . org-odt-inlinetask) (italic . org-odt-italic) (item . org-odt-item) (keyword . org-odt-keyword) (latex-environment . org-odt-latex-environment) (latex-fragment . org-odt-latex-fragment) (line-break . org-odt-line-break) (link . org-odt-link) (node-property . org-odt-node-property) (paragraph . org-odt-paragraph) (plain-list . org-odt-plain-list) (plain-text . org-odt-plain-text) (planning . org-odt-planning) (property-drawer . org-odt-property-drawer) (quote-block . org-odt-quote-block) (radio-target . org-odt-radio-target) (section . org-odt-section) (special-block . org-odt-special-block) (src-block . org-odt-src-block) (statistics-cookie . org-odt-statistics-cookie) (strike-through . org-odt-strike-through) (subscript . org-odt-subscript) (superscript . org-odt-superscript) (table . org-odt-table) (table-cell . org-odt-table-cell) (table-row . org-odt-table-row) (target . org-odt-target) (template . org-odt-template) (timestamp . org-odt-timestamp) (underline . org-odt-underline) (verbatim . org-odt-verbatim) (verse-block . org-odt-verse-block)) :filters-alist ((:filter-parse-tree org-odt--translate-latex-fragments org-odt--translate-description-lists org-odt--translate-list-tables org-odt--translate-image-links)) :menu-entry (111 "Export to ODT" ((111 "As ODT file" org-odt-export-to-odt) (79 "As ODT file and open" (lambda (a s v b) (if a (org-odt-export-to-odt t s v) (org-open-file (org-odt-export-to-odt nil s v) 'system)))))) :options-alist ((:odt-styles-file "ODT_STYLES_FILE" nil nil t) (:description "DESCRIPTION" nil nil newline) (:keywords "KEYWORDS" nil nil space) (:subtitle "SUBTITLE" nil nil parse) (:odt-content-template-file nil nil org-odt-content-template-file) (:odt-display-outline-level nil nil org-odt-display-outline-level) (:odt-fontify-srcblocks nil nil org-odt-fontify-srcblocks) (:odt-format-drawer-function nil nil org-odt-format-drawer-function) (:odt-format-headline-function nil nil org-odt-format-headline-function) (:odt-format-inlinetask-function nil nil org-odt-format-inlinetask-function) (:odt-inline-formula-rules nil nil org-odt-inline-formula-rules) (:odt-inline-image-rules nil nil org-odt-inline-image-rules) (:odt-pixels-per-inch nil nil org-odt-pixels-per-inch) (:odt-styles-file nil nil org-odt-styles-file) (:odt-table-styles nil nil org-odt-table-styles) (:odt-use-date-fields nil nil org-odt-use-date-fields) (:with-latex nil "tex" org-odt-with-latex) (:latex-header "LATEX_HEADER" nil nil newline))] 9)
#@102 Location of ODT exporter.
Use this to infer values of `org-odt-styles-dir' and
`org-odt-schema-dir'.
(defconst org-odt-lib-dir (byte-code "\301\206\302 !\207" [load-file-name file-name-directory buffer-file-name] 2) (#$ . 3695))
#@109 Data directory for ODT exporter.
Use this to infer values of `org-odt-styles-dir' and
`org-odt-schema-dir'.
(defvar org-odt-data-dir (expand-file-name "../../etc/" org-odt-lib-dir) (#$ . 3934))
#@52 Regular expressions for special string conversion.
(defconst org-odt-special-string-regexps '(("\\\\-" . "­\\1") ("---\\([^-]\\)" . "—\\1") ("--\\([^-]\\)" . "–\\1") ("\\.\\.\\." . "…")) (#$ . 4134))
#@245 List of directories to search for OpenDocument schema files.
Use this list to set the default value of
`org-odt-schema-dir'.  The entries in this list are
populated heuristically based on the values of `org-odt-lib-dir'
and `org-odt-data-dir'.
(defconst org-odt-schema-dir-list (byte-code "\205\301\302\"\303D\207" [org-odt-data-dir expand-file-name "./schema/" "c:/Program Files/Emacs 26.1/share/emacs/26.1/etc/schema/"] 3) (#$ . 4369))
#@207 List of directories to search for OpenDocument styles files.
See `org-odt-styles-dir'.  The entries in this list are populated
heuristically based on the values of `org-odt-lib-dir' and
`org-odt-data-dir'.
(defconst org-odt-styles-dir-list (byte-code "\205\303\304\"\305\303\306    \"\303\307    \"\303\310\n\"\257\207" [org-odt-data-dir org-odt-lib-dir data-directory expand-file-name "./styles/" "c:/Program Files/Emacs 26.1/share/emacs/26.1/etc/styles/" "../etc/styles/" "./etc/styles/" "./org/"] 7) (#$ . 4818))
#@533 Directory that holds auxiliary XML files used by the ODT exporter.
 
This directory contains the following XML files -
 "OrgOdtStyles.xml" and "OrgOdtContentTemplate.xml".  These
 XML files are used as the default values of
 `org-odt-styles-file' and `org-odt-content-template-file'.
 
The default value of this variable varies depending on the
version of Org in use and is initialized from
`org-odt-styles-dir-list'.  Note that the user could be using Org
from one of: Org own private git repository, GNU ELPA tar or
standard Emacs.
(defconst org-odt-styles-dir (byte-code "\301\302\"\211\204\f\303\304!\210\211\207" [org-odt-styles-dir-list cl-find-if #[257 "\211\205\300\301\302\"!\205\300\301\303\"!\207" [file-readable-p expand-file-name "OrgOdtContentTemplate.xml" "OrgOdtStyles.xml"] 5 "\n\n(fn DIR)"] error "Error (ox-odt): Cannot find factory styles files, aborting"] 3) (#$ . 5340))
(defconst org-odt-bookmark-prefix "OrgXref.")
(defconst org-odt-manifest-file-entry-tag "\n<manifest:file-entry manifest:media-type=\"%s\" manifest:full-path=\"%s\"%s/>")
(defconst org-odt-file-extensions '(("odt" . "OpenDocument Text") ("ott" . "OpenDocument Text Template") ("odm" . "OpenDocument Master Document") ("ods" . "OpenDocument Spreadsheet") ("ots" . "OpenDocument Spreadsheet Template") ("odg" . "OpenDocument Drawing (Graphics)") ("otg" . "OpenDocument Drawing Template") ("odp" . "OpenDocument Presentation") ("otp" . "OpenDocument Presentation Template") ("odi" . "OpenDocument Image") ("odf" . "OpenDocument Formula") ("odc" . "OpenDocument Chart")))
#@43 Template for auto-generated Table styles.
(defconst org-odt-table-style-format "\n<style:style style:name=\"%s\" style:family=\"table\">\n  <style:table-properties style:rel-width=\"%s%%\" fo:margin-top=\"0cm\" fo:margin-bottom=\"0.20cm\" table:align=\"center\"/>\n</style:style>\n" (#$ . 6913))
#@539 Registry of automatic styles for various OBJECT-TYPEs.
The variable has the following form:
 ((OBJECT-TYPE-A
   ((OBJECT-NAME-A.1 OBJECT-PROPS-A.1)
    (OBJECT-NAME-A.2 OBJECT-PROPS-A.2) ...))
  (OBJECT-TYPE-B
   ((OBJECT-NAME-B.1 OBJECT-PROPS-B.1)
    (OBJECT-NAME-B.2 OBJECT-PROPS-B.2) ...))
  ...).
 
OBJECT-TYPEs could be "Section", "Table", "Figure" etc.
OBJECT-PROPS is (typically) a plist created by passing
"#+ATTR_ODT: " option to `org-odt-parse-block-attributes'.
 
Use `org-odt-add-automatic-style' to add update this variable.'
(defvar org-odt-automatic-styles nil (#$ . 7216))
#@133 Running counters for various OBJECT-TYPEs.
Use this to generate automatic names and style-names. See
`org-odt-add-automatic-style'.
(defvar org-odt-object-counters nil (#$ . 7811))
#@245 Custom paragraph style for colorized source and example blocks.
This style is much the same as that of "OrgFixedWidthBlock"
except that the foreground and background colors are set
according to the default face identified by the `htmlfontify'.
(defvar org-odt-src-block-paragraph-format "<style:style style:name=\"OrgSrcBlock\" style:family=\"paragraph\" style:parent-style-name=\"Preformatted_20_Text\">\n   <style:paragraph-properties fo:background-color=\"%s\" fo:padding=\"0.049cm\" fo:border=\"0.51pt solid #000000\" style:shadow=\"none\">\n    <style:background-image/>\n   </style:paragraph-properties>\n   <style:text-properties fo:color=\"%s\"/>\n  </style:style>" (#$ . 7999))
(defvar org-odt-embedded-formulas-count 0)
(defvar org-odt-embedded-images-count 0)
#@54 Ordered list of methods for determining image sizes.
(defvar org-odt-image-size-probe-method (byte-code "\300\301\302!\205\303\304\"\207" [append executable-find "identify" (imagemagick) (emacs fixed)] 3) (#$ . 8776))
#@66 Hardcoded image dimensions one for each of the anchor
  methods.
(defvar org-odt-default-image-sizes-alist '(("as-char" 5 . 0.4) ("paragraph" 5 . 5)) (#$ . 9002))
#@44 Limiting dimensions for an embedded image.
(defvar org-odt-max-image-size '(17.0 . 20.0) (#$ . 9171))
#@771 Specify how labels are applied and referenced.
 
This is an alist where each element is of the form:
 
  (STYLE-NAME ATTACH-FMT REF-MODE REF-FMT)
 
ATTACH-FMT controls how labels and captions are attached to an
entity.  It may contain following specifiers - %e and %c.  %e is
replaced with the CATEGORY-NAME.  %n is replaced with
"<text:sequence ...> SEQNO </text:sequence>".  %c is replaced
with CAPTION.
 
REF-MODE and REF-FMT controls how label references are generated.
The following XML is generated for a label reference -
"<text:sequence-ref text:reference-format="REF-MODE" ...>
REF-FMT </text:sequence-ref>".  REF-FMT may contain following
specifiers - %e and %n.  %e is replaced with the CATEGORY-NAME.
%n is replaced with SEQNO.
 
See also `org-odt-format-label'.
(defconst org-odt-label-styles '(("math-formula" "%c" "text" "(%n)") ("math-label" "(%n)" "text" "(%n)") ("category-and-value" "%e %n: %c" "category-and-value" "%e %n") ("value" "%e %n: %c" "value" "%n")) (#$ . 9280))
#@734 Map a CATEGORY-HANDLE to OD-VARIABLE and LABEL-STYLE.
 
This is a list where each entry is of the form:
 
  (CATEGORY-HANDLE OD-VARIABLE LABEL-STYLE CATEGORY-NAME ENUMERATOR-PREDICATE)
 
CATEGORY_HANDLE identifies the captionable entity in question.
 
OD-VARIABLE is the OpenDocument sequence counter associated with
the entity.  These counters are declared within
"<text:sequence-decls>...</text:sequence-decls>" block of
`org-odt-content-template-file'.
 
LABEL-STYLE is a key into `org-odt-label-styles' and specifies
how a given entity should be captioned and referenced.
 
CATEGORY-NAME is used for qualifying captions on export.
 
ENUMERATOR-PREDICATE is used for assigning a sequence number to
the entity.  See `org-odt--enumerate'.
(defvar org-odt-category-map-alist '(("__Table__" "Table" "value" "Table" org-odt--enumerable-p) ("__Figure__" "Illustration" "value" "Figure" org-odt--enumerable-image-p) ("__MathFormula__" "Text" "math-formula" "Equation" org-odt--enumerable-formula-p) ("__DvipngImage__" "Equation" "value" "Equation" org-odt--enumerable-latex-image-p) ("__Listing__" "Listing" "value" "Listing" org-odt--enumerable-p)) (#$ . 10275))
(defvar org-odt-manifest-file-entries nil)
#@53 Temporary work directory for OpenDocument exporter.
(defvar org-odt-zip-dir nil (#$ . 11477))
(byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\306\301\316\317\320\321&    \210\322\323!\210\310\324\312\313\325DD\326\320\327\306\301\316\317\330\331& \210\310\332\312\313\333DD\334\320\335\306\301\316\336&    \210\310\337\312\313\340DD\341\306\301\316\317\320\342&    \210\310\343\312\313\344DD\345\306\301\316\346\347\350\320\351& \210\310\352\312\313\353DD\354\306\301\316\317\320\355&    \210\310\356\312\313\357DD\360\306\301\316\317\320\361&    \210\310\362\312\313\363DD\364\306\301\316\317\320\365&    \210\310\366\312\313\367DD\370\306\301\316\317\320\371&    \210\372\366\373\374#\210\310\375\312\313\376DD\377\306\301\316\201@\347\201A\320\313& \210\310\201B\312\313\201CDD\201D\306\301\316\201@\347\201E\320\313& \210\310\201F\312\313\201GDD\201H\306\301\316\201@\347\201I\320\313& \210\310\201J\312\313\201KDD\201L\306\301\316\346\347\201M\320\201N& \210\310\201O\312\313\201PDD\201Q\306\301\316\346\347\201R\320\201S& \210\310\201T\312\313\201UDD\201V\306\301\316\201@\347\201W\320\201X& \210\310\201Y\312\313\201ZDD\201[\320\201\\\306\301\316\346\347\201]& \210\310\201^\312\313\201_DD\201`\306\301\316\317\320\321&    \210\310\201a\312\313\201bDD\201c\320\321\306\301\316\317&    \210\310\201d\312\313\201eDD\201f\306\301\316\317\320\201g&    \210\310\201h\312\313\201iDD\201j\306\301\316\346\347\201k\320\321& \207" [custom-declare-group org-export-odt nil "Options for exporting Org mode files to ODT." :tag "Org Export ODT" :group org-export custom-declare-variable org-odt-prettify-xml funcall function #[0 "\300\207" [nil] 1] "Specify whether or not the xml output should be prettified.\nWhen this option is turned on, `indent-region' is run on all\ncomponent xml buffers before they are saved.  Turn this off for\nregular use.  Turn this on if you need to examine the xml\nvisually." :version "24.1" :type boolean require rng-loc org-odt-schema-dir #[0 "\301\302\"\207" [org-odt-schema-dir-list cl-find-if #[257 "\211\205\300\301\302\"!\205\300\301\303\"!\205\304\301\305\"!\207" [file-expand-wildcards expand-file-name "od-manifest-schema*.rnc" "od-schema*.rnc" file-readable-p "schemas.xml"] 5 "\n\n(fn DIR)"]] 3] "Directory that contains OpenDocument schema files.\n\nThis directory contains:\n1. rnc files for OpenDocument schema\n2. a \"schemas.xml\" file that specifies locating rules needed\n   for auto validation of OpenDocument XML files.\n\nUse the customize interface to set this variable.  This ensures\nthat `rng-schema-locating-files' is updated and auto-validation\nof OpenDocument XML takes place based on the value\n`rng-nxml-auto-validate-flag'.\n\nThe default value of this variable varies depending on the\nversion of org in use and is initialized from\n`org-odt-schema-dir-list'.  The OASIS schema files are available\nonly in the org's private git repository.  It is *not* bundled\nwith GNU ELPA tar or standard Emacs distribution." (choice (const :tag "Not set" nil) (directory :tag "Schema directory")) :set #[514 "\211\301\302\303\"!\203!\301\302\304\"!\203!\305\302\306\"!\203!\202+\203*\307\310\"\210\311L\266\2056\312\313\314\"\207" [org-odt-schema-dir file-expand-wildcards expand-file-name "od-manifest-schema*.rnc" "od-schema*.rnc" file-readable-p "schemas.xml" message "Error (ox-odt): %s has no OpenDocument schema files" nil eval-after-load rng-loc #[0 "\301\302\303\304\"\"\207" [org-odt-schema-dir add-to-list rng-schema-locating-files expand-file-name "schemas.xml"] 5]] 8 "Set `org-odt-schema-dir'.\nAlso add it to `rng-schema-locating-files'.\n\n(fn VAR VALUE)"] org-odt-content-template-file #[0 "\300\207" [nil] 1] "Template file for \"content.xml\".\nThe exporter embeds the exported content just before\n\"</office:text>\" element.\n\nIf unspecified, the file named \"OrgOdtContentTemplate.xml\"\nunder `org-odt-styles-dir' is used." (choice (const nil) (file)) "24.3" org-odt-styles-file #[0 "\300\207" [nil] 1] "Default styles file for use with ODT export.\nValid values are one of:\n1. nil\n2. path to a styles.xml file\n3. path to a *.odt or a *.ott file\n4. list of the form (ODT-OR-OTT-FILE (FILE-MEMBER-1 FILE-MEMBER-2\n...))\n\nIn case of option 1, an in-built styles.xml is used. See\n`org-odt-styles-dir' for more information.\n\nIn case of option 3, the specified file is unzipped and the\nstyles.xml embedded therein is used.\n\nIn case of option 4, the specified ODT-OR-OTT-FILE is unzipped\nand FILE-MEMBER-1, FILE-MEMBER-2 etc are copied in to the\ngenerated odt file.  Use relative path for specifying the\nFILE-MEMBERS.  styles.xml must be specified as one of the\nFILE-MEMBERS.\n\nUse options 1, 2 or 3 only if styles.xml alone suffices for\nachieving the desired formatting.  Use option 4, if the styles.xml\nreferences additional files like header and footer images for\nachieving the desired formatting.\n\nUse \"#+ODT_STYLES_FILE: ...\" directive to set this variable on\na per-file basis.  For example,\n\n#+ODT_STYLES_FILE: \"/path/to/styles.xml\" or\n#+ODT_STYLES_FILE: (\"/path/to/file.ott\" (\"styles.xml\" \"image/hdr.png\"))." (choice (const :tag "Factory settings" nil) (file :must-match t :tag "styles.xml") (file :must-match t :tag "ODT or OTT file") (list :tag "ODT or OTT file + Members" (file :must-match t :tag "ODF Text or Text Template file") (cons :tag "Members" (file :tag "    Member" "styles.xml") (repeat (file :tag "Member"))))) org-odt-display-outline-level #[0 "\300\207" [2] 1] "Outline levels considered for enumerating captioned entities." "24.4" :package-version (Org . "8.0") integer org-odt-convert-processes #[0 "\300\207" [(("LibreOffice" "soffice --headless --convert-to %f%x --outdir %d %i") ("unoconv" "unoconv -f %f -o %d %i"))] 1] "Specify a list of document converters and their usage.\nThe converters in this list are offered as choices while\ncustomizing `org-odt-convert-process'.\n\nThis variable is a list where each element is of the\nform (CONVERTER-NAME CONVERTER-CMD).  CONVERTER-NAME is the name\nof the converter.  CONVERTER-CMD is the shell command for the\nconverter and can contain format specifiers.  These format\nspecifiers are interpreted as below:\n\n%i input file name in full\n%I input file name as a URL\n%f format of the output file\n%o output file name in full\n%O output file name as a URL\n%d output dir in full\n%D output dir as a URL.\n%x extra options as set in `org-odt-convert-capabilities'." (choice (const :tag "None" nil) (alist :tag "Converters" :key-type (string :tag "Converter Name") :value-type (group (string :tag "Command line")))) org-odt-convert-process #[0 "\300\207" [#1="LibreOffice"] 1 #1#] "Use this converter to convert from \"odt\" format to other formats.\nDuring customization, the list of converter names are populated\nfrom `org-odt-convert-processes'." (choice :convert-widget (lambda (w) (apply 'widget-convert (widget-type w) (eval (car (widget-get w :args))))) `((const :tag "None" nil) ,@(mapcar (lambda (c) `(const :tag ,(car c) ,(car c))) org-odt-convert-processes))) org-odt-convert-capabilities #[0 "\300\207" [(("Text" ("odt" "ott" "doc" "rtf" "docx") (("pdf" "pdf") ("odt" "odt") ("rtf" "rtf") ("ott" "ott") ("doc" "doc" ":\"MS Word 97\"") ("docx" "docx") ("html" "html"))) ("Web" ("html") (("pdf" "pdf") ("odt" "odt") ("html" "html"))) ("Spreadsheet" ("ods" "ots" "xls" "csv" "xlsx") (("pdf" "pdf") ("ots" "ots") ("html" "html") ("csv" "csv") ("ods" "ods") ("xls" "xls") ("xlsx" "xlsx"))) ("Presentation" ("odp" "otp" "ppt" "pptx") (("pdf" "pdf") ("swf" "swf") ("odp" "odp") ("otp" "otp") ("ppt" "ppt") ("pptx" "pptx") ("odg" "odg"))))] 1] "Specify input and output formats of `org-odt-convert-process'.\nMore correctly, specify the set of input and output formats that\nthe user is actually interested in.\n\nThis variable is an alist where each element is of the\nform (DOCUMENT-CLASS INPUT-FMT-LIST OUTPUT-FMT-ALIST).\nINPUT-FMT-LIST is a list of INPUT-FMTs.  OUTPUT-FMT-ALIST is an\nalist where each element is of the form (OUTPUT-FMT\nOUTPUT-FILE-EXTENSION EXTRA-OPTIONS).\n\nThe variable is interpreted as follows:\n`org-odt-convert-process' can take any document that is in\nINPUT-FMT-LIST and produce any document that is in the\nOUTPUT-FMT-LIST.  A document converted to OUTPUT-FMT will have\nOUTPUT-FILE-EXTENSION as the file name extension.  OUTPUT-FMT\nserves dual purposes:\n- It is used for populating completion candidates during\n  `org-odt-convert' commands.\n- It is used as the value of \"%f\" specifier in\n  `org-odt-convert-process'.\n\nEXTRA-OPTIONS is used as the value of \"%x\" specifier in\n`org-odt-convert-process'.\n\nDOCUMENT-CLASS is used to group a set of file formats in\nINPUT-FMT-LIST in to a single class.\n\nNote that this variable inherently captures how LibreOffice based\nconverters work.  LibreOffice maps documents of various formats\nto classes like Text, Web, Spreadsheet, Presentation etc and\nallow document of a given class (irrespective of its source\nformat) to be converted to any of the export formats associated\nwith that class.\n\nSee default setting of this variable for a typical configuration." (choice (const :tag "None" nil) (alist :tag "Capabilities" :key-type (string :tag "Document Class") :value-type (group (repeat :tag "Input formats" (string :tag "Input format")) (alist :tag "Output formats" :key-type (string :tag "Output format") :value-type (group (string :tag "Output file extension") (choice (const :tag "None" nil) (string :tag "Extra options"))))))) org-odt-preferred-output-format #[0 "\300\207" [nil] 1] "Automatically post-process to this format after exporting to \"odt\".\nCommand `org-odt-export-to-odt' exports first to \"odt\" format\nand then uses `org-odt-convert-process' to convert the\nresulting document to this format.  During customization of this\nvariable, the list of valid values are populated based on\n`org-odt-convert-capabilities'.\n\nYou can set this option on per-file basis using file local\nvalues.  See Info node `(emacs) File Variables'." (choice :convert-widget (lambda (w) (apply 'widget-convert (widget-type w) (eval (car (widget-get w :args))))) `((const :tag "None" nil) ,@(mapcar (lambda (c) `(const :tag ,c ,c)) (org-odt-reachable-formats "odt")))) put safe-local-variable stringp org-odt-format-drawer-function #[0 "\300\207" [#[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]] 1] "Function called to format a drawer in ODT 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 value simply returns the value of CONTENTS." "26.1" (Org . "8.3") org-odt-format-headline-function #[0 "\300\207" [org-odt-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 string, separated with colons (string or nil).\n\nThe function result will be used as headline text." (Org . "8.3") org-odt-format-inlinetask-function #[0 "\300\207" [org-odt-format-inlinetask-default-function] 1] "Function called to format an inlinetask in ODT 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 string.\n  CONTENTS  the contents of the inlinetask, as a string.\n\nThe function should return the string to be exported." (Org . "8.3") org-odt-with-latex #[0 "\207" [org-export-with-latex] 1] "Non-nil means process LaTeX math snippets.\n\nWhen set, the exporter will process LaTeX environments and\nfragments.\n\nThis option can also be set with the +OPTIONS line,\ne.g. \"tex:mathjax\".  Allowed values are:\n\nnil            Ignore math snippets.\n`verbatim'     Keep everything in verbatim\n`dvipng'       Process the LaTeX fragments to images.  This will also\n               include processing of non-math environments.\n`imagemagick'  Convert the LaTeX fragments to pdf files and use\n               imagemagick to convert pdf files to png files.\n`mathjax'      Do MathJax preprocessing and arrange for MathJax.js to\n               be loaded.\n\nAny other symbol is a synonym for `mathjax'." (Org . "8.0") (choice (const :tag "Do not process math in any way" nil) (const :tag "Leave math verbatim" verbatim) (const :tag "Use dvipng to make images" dvipng) (const :tag "Use imagemagick to make images" imagemagick) (other :tag "Use MathJax to display math" mathjax)) org-odt-inline-formula-rules #[0 "\300\207" [(("file" . "\\.\\(mathml\\|mml\\|odf\\)\\'"))] 1] "Rules characterizing formula files that can be inlined into ODT.\n\nA rule consists in an association whose key is the type of link\nto consider, and value is a regexp that will be matched against\nlink's path." (Org . "8.0") (alist :key-type (string :tag "Type") :value-type (regexp :tag "Path")) org-odt-inline-image-rules #[0 "\300\207" [(("file" . "\\.\\(jpeg\\|jpg\\|png\\|gif\\|svg\\)\\'"))] 1] "Rules characterizing image files that can be inlined into ODT.\n\nA rule consists in an association whose key is the type of link\nto consider, and value is a regexp that will be matched against\nlink's path." (Org . "8.3") (alist :key-type (string :tag "Type") :value-type (regexp :tag "Path")) org-odt-pixels-per-inch #[0 "\300\207" [96.0] 1] "Scaling factor for converting images pixels to inches.\nUse this for sizing of embedded images.  See Info node `(org)\nImages in ODT export' for more information." float (Org . "8.1") org-odt-create-custom-styles-for-srcblocks #[0 "\300\207" [t] 1] "Whether custom styles for colorized source blocks be automatically created.\nWhen this option is turned on, the exporter creates custom styles\nfor source blocks based on the advice of `htmlfontify'.  Creation\nof custom styles happen as part of `org-odt-hfy-face-to-css'.\n\nWhen this option is turned off exporter does not create such\nstyles.\n\nUse the latter option if you do not want the custom styles to be\nbased on your current display settings.  It is necessary that the\nstyles.xml already contains needed styles for colorizing to work.\n\nThis variable is effective only if `org-odt-fontify-srcblocks' is\nturned on." org-odt-fontify-srcblocks #[0 "\300\207" [t] 1] "Specify whether or not source blocks need to be fontified.\nTurn this option on if you want to colorize the source code\nblocks in the exported file.  For colorization to work, you need\nto make available an enhanced version of `htmlfontify' library." org-odt-table-styles #[0 "\300\207" [(("OrgEquation" "OrgEquation" ((use-first-column-styles . t) (use-last-column-styles . t))) ("TableWithHeaderRowAndColumn" "Custom" ((use-first-row-styles . t) (use-first-column-styles . t))) ("TableWithFirstRowandLastRow" "Custom" ((use-first-row-styles . t) (use-last-row-styles . t))) ("GriddedTable" "Custom" nil))] 1] "Specify how Table Styles should be derived from a Table Template.\nThis is a list where each element is of the\nform (TABLE-STYLE-NAME TABLE-TEMPLATE-NAME TABLE-CELL-OPTIONS).\n\nTABLE-STYLE-NAME is the style associated with the table through\n\"#+ATTR_ODT: :style TABLE-STYLE-NAME\" line.\n\nTABLE-TEMPLATE-NAME is a set of - upto 9 - automatic\nTABLE-CELL-STYLE-NAMEs and PARAGRAPH-STYLE-NAMEs (as defined\nbelow) that is included in `org-odt-content-template-file'.\n\nTABLE-CELL-STYLE-NAME := TABLE-TEMPLATE-NAME + TABLE-CELL-TYPE +\n                         \"TableCell\"\nPARAGRAPH-STYLE-NAME  := TABLE-TEMPLATE-NAME + TABLE-CELL-TYPE +\n                         \"TableParagraph\"\nTABLE-CELL-TYPE       := \"FirstRow\"   | \"LastColumn\" |\n                         \"FirstRow\"   | \"LastRow\"    |\n                         \"EvenRow\"    | \"OddRow\"     |\n                         \"EvenColumn\" | \"OddColumn\"  | \"\"\nwhere \"+\" above denotes string concatenation.\n\nTABLE-CELL-OPTIONS is an alist where each element is of the\nform (TABLE-CELL-STYLE-SELECTOR . ON-OR-OFF).\nTABLE-CELL-STYLE-SELECTOR := `use-first-row-styles'       |\n                             `use-last-row-styles'        |\n                             `use-first-column-styles'    |\n                             `use-last-column-styles'     |\n                             `use-banding-rows-styles'    |\n                             `use-banding-columns-styles' |\n                             `use-first-row-styles'\nON-OR-OFF                 := t | nil\n\nFor example, with the following configuration\n\n(setq org-odt-table-styles\n      \\='((\"TableWithHeaderRowsAndColumns\" \"Custom\"\n         ((use-first-row-styles . t)\n          (use-first-column-styles . t)))\n        (\"TableWithHeaderColumns\" \"Custom\"\n         ((use-first-column-styles . t)))))\n\n1. A table associated with \"TableWithHeaderRowsAndColumns\"\n   style will use the following table-cell styles -\n   \"CustomFirstRowTableCell\", \"CustomFirstColumnTableCell\",\n   \"CustomTableCell\" and the following paragraph styles\n   \"CustomFirstRowTableParagraph\",\n   \"CustomFirstColumnTableParagraph\", \"CustomTableParagraph\"\n   as appropriate.\n\n2. A table associated with \"TableWithHeaderColumns\" style will\n   use the following table-cell styles -\n   \"CustomFirstColumnTableCell\", \"CustomTableCell\" and the\n   following paragraph styles\n   \"CustomFirstColumnTableParagraph\", \"CustomTableParagraph\"\n   as appropriate..\n\nNote that TABLE-TEMPLATE-NAME corresponds to the\n\"<table:table-template>\" elements contained within\n\"<office:styles>\".  The entries (TABLE-STYLE-NAME\nTABLE-TEMPLATE-NAME TABLE-CELL-OPTIONS) correspond to\n\"table:template-name\" and \"table:use-first-row-styles\" etc\nattributes of \"<table:table>\" element.  Refer ODF-1.2\nspecification for more information.  Also consult the\nimplementation filed under `org-odt-get-table-cell-styles'.\n\nThe TABLE-STYLE-NAME \"OrgEquation\" is used internally for\nformatting of numbered display equations.  Do not delete this\nstyle from the list." (choice (const :tag "None" nil) (repeat :tag "Table Styles" (list :tag "Table Style Specification" (string :tag "Table Style Name") (string :tag "Table Template Name") (alist :options (use-first-row-styles use-last-row-styles use-first-column-styles use-last-column-styles use-banding-rows-styles use-banding-columns-styles) :key-type symbol :value-type (const :tag "True" t))))) org-odt-use-date-fields #[0 "\300\207" [nil] 1] "Non-nil, if timestamps should be exported as date fields.\n\nWhen nil, export timestamps as plain text.\n\nWhen non-nil, map `org-time-stamp-custom-formats' to a pair of\nOpenDocument date-styles with names \"OrgDate1\" and \"OrgDate2\"\nrespectively.  A timestamp with no time component is formatted\nwith style \"OrgDate1\" while one with explicit hour and minutes\nis formatted with style \"OrgDate2\".\n\nThis feature is experimental.  Most (but not all) of the common\n%-specifiers in `format-time-string' are supported.\nSpecifically, locale-dependent specifiers like \"%c\", \"%x\" are\nformatted as canonical Org timestamps.  For finer control, avoid\nthese %-specifiers.\n\nTextual specifiers like \"%b\", \"%h\", \"%B\", \"%a\", \"%A\"\netc., are displayed by the application in the default language\nand country specified in `org-odt-styles-file'.  Note that the\ndefault styles file uses language \"en\" and country \"GB\".  You\ncan localize the week day and month strings in the exported\ndocument by setting the default language and country either using\nthe application UI or through a custom styles file.\n\nSee `org-odt--build-date-styles' for implementation details." (Org . "8.0")] 12)
#@43 
 
(fn TIMESTAMP &optional END ISO-DATE-P)
(defalias 'org-odt--format-timestamp #[769 "\302?\206    \303!\211\203\304\202\304#\262\203#\211\202\345\203+\305\202,\306\203>    @\307\310O    A\307\310OB\202?\311\203H\211A\202J\211@    \n#\266\202\312\211;\203c\313\314#\202i\315A@\"\266\202\316    \211;\203{\313\314#\202\201\315A@\"\266\202\317\n\211;\203\223\313\314#\202\231\315A@\"\266\202\320\267\202\255\321\202\256\322\202\256\323\202\256\324\205\265\325!\326\267\202\317\327\202\320\330\202\320\331\202\320\332\202\320\333\202\320\324Q\266\203\334\335$\336\230?\205\341\337Q\266\203\207" [org-display-custom-times org-time-stamp-custom-formats #[1026 "\203 \300$\207\301\302#\207" [org-timestamp-format format-time-string nil] 9 "\n\n(fn TIMESTAMP FORMAT &optional END UTC)"] org-timestamp-has-time-p "%Y-%m-%dT%H:%M:%S" "OrgDate2" "OrgDate1" 1 -1 ("%Y-%m-%d %a" . "%Y-%m-%d %a %H:%M") :repeater-type get-text-property 0 plist-get :repeater-value :repeater-unit #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (catchup 161 restart 165 cumulate 169)) "++" ".+" "+" nil number-to-string #s(hash-table size 5 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (hour 187 day 191 week 195 month 199 year 203)) "h" "d" "w" "m" "y" format "<text:date text:date-value=\"%s\" style:data-style-name=\"%s\" text:fixed=\"true\">%s</text:date>" "" " "] 16 (#$ . 31524)])
#@81 
 
(fn TEXT WIDTH HEIGHT STYLE &optional EXTRA ANCHOR-TYPE &rest TITLE-AND-DESC)
(defalias 'org-odt--frame #[1668 "\203\f\300\301\"\202 \302\203\300\303\"\202\302\300\304\206#\305\"\300\306\307\310!@\"\260\300\311 @A@\205F\300\312\313\314\"\"\205Q\300\315\313\314\"\"P\266\202P$\207" [format " svg:width=\"%0.2fcm\"" "" " svg:height=\"%0.2fcm\"" " text:anchor-type=\"%s\"" "paragraph" " draw:name=\"%s\"" org-odt-add-automatic-style "Frame" "\n<draw:frame draw:style-name=\"%s\"%s>\n%s\n</draw:frame>" "<svg:title>%s</svg:title>" org-odt--encode-plain-text t "<svg:desc>%s</svg:desc>"] 21 (#$ . 33010)])
#@31 
 
(fn ARCHIVE MEMBERS TARGET)
(defalias 'org-odt--zip-extract #[771 ":\204    C\262\301\302!\210\211\205_\211@\303\211!\304!\305\306\307\310\257\311\211\312\313!r\211q\210\314\315\316\317\320!\321\"\322$\216\300\"\262\323 *\262\262\315U\204U\324!\210\325\326!\210)\266A\266\202\202\207" [archive-zip-extract require arc-mode #[257 "\302>\203\303\301!\203    \204\304!\207\207" [system-type w32-quote-process-args (windows-nt ms-dos) boundp shell-quote-argument] 3 "\n\n(fn NAME)"] expand-file-name "unzip" "-qq" "-o" "-d" nil generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205    \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 buffer-string message error "Extraction failed"] 17 (#$ . 33650)])
#@16 
 
(fn TEXT ID)
(defalias 'org-odt--target #[514 "\211\204\207\300\301\"\300\302\"\300\303\"R\207" [format "\n<text:bookmark-start text:name=\"OrgXref.%s\"/>" "\n<text:bookmark text:name=\"%s\"/>" "\n<text:bookmark-end text:name=\"OrgXref.%s\"/>"] 8 (#$ . 34398)])
#@60 
 
(fn TEXT WIDTH HEIGHT STYLE &optional EXTRA ANCHOR-TYPE)
(defalias 'org-odt--textbox #[1540 "\300\301\302\301\303\206 \304\"?\205\301\305\n\206\306\"P    #\307&\207" [org-odt--frame format "\n<draw:text-box %s>%s\n</draw:text-box>" " fo:min-height=\"%0.2fcm\"" 0.2 " fo:min-width=\"%0.2fcm\"" 0.2 nil] 13 (#$ . 34675)])
#@217 Return a table of contents.
TITLE is the title of the table, as a string, or nil.  ENTRIES is
the contents of the table, as a string.  DEPTH is an integer
specifying the depth of the table.
 
(fn TITLE ENTRIES DEPTH)
(defalias 'org-odt--format-toc #[771 "\300\301\302\"\205\301\303\"\304\305\306\"\307\310\311#\262\312\205$\301\313    \"\314\260\207" ["\n<text:table-of-content text:style-name=\"OrgIndexSection\" text:protected=\"true\" text:name=\"Table of Contents\">\n" format "  <text:table-of-content-source text:outline-level=\"%d\">" "\n    <text:index-title-template text:style-name=\"Contents_20_Heading\">%s</text:index-title-template>\n" number-sequence 1 10 mapconcat #[257 "\300\301\211#\207" [format "\n      <text:table-of-content-entry-template text:outline-level=\"%d\" text:style-name=\"Contents_20_%d\">\n       <text:index-entry-link-start text:style-name=\"Internet_20_link\"/>\n       <text:index-entry-chapter/>\n       <text:index-entry-text/>\n       <text:index-entry-link-end/>\n      </text:table-of-content-entry-template>\n"] 5 "\n\n(fn LEVEL)"] "" "\n  </text:table-of-content-source>\n  <text:index-body>" "\n    <text:index-title text:style-name=\"Sect1\" text:name=\"Table of Contents1_Head\">\n      <text:p text:style-name=\"Contents_20_Heading\">%s</text:p>\n    </text:index-title>\n" "\n  </text:index-body>\n</text:table-of-content>"] 11 (#$ . 35021)])
#@101 
 
(fn TODO TODO-TYPE PRIORITY TEXT TAGS &key LEVEL SECTION-NUMBER HEADLINE-LABEL &allow-other-keys)
(defalias 'org-odt-format-toc-headline #[1413 "\301\302\"A@\301\303\"A@\301\304\"A@\305\306\205\307P\f\2055\f\235\203,\310\202-\311\305\312#\262 \205K\305\313 \"\305\314\"\305\312#\266\202  \205^\305\315\316\317\320\321##\260\260#\207" [org-done-keywords plist-member :level :section-number :headline-label format "<text:a xlink:type=\"simple\" xlink:href=\"#%s\">%s</text:a>" ". " "OrgDone" "OrgTodo" "<text:span text:style-name=\"%s\">%s</text:span> " "OrgPriority-%s" "[#%c]" " <text:span text:style-name=\"%s\">[%s]</text:span>" "OrgTags" mapconcat #[257 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgTag"] 5 "\n\n(fn TAG)"] " : "] 23 (#$ . 36434)])
#@294 Build a table of contents.
DEPTH is an integer specifying the depth of the table.  INFO is
a plist containing current export properties.  Optional argument
SCOPE, when non-nil, defines the scope of the table.  Return the
table of contents as a string, or nil.
 
(fn DEPTH INFO &optional SCOPE)
(defalias 'org-odt-toc #[770 "\301!\204\n\302\303!\210\304#\305\306\307\310\"!>\204&\311\312\313\307\310\"D\"\210\307\310\"\314H!\205S\315?\205=\316\317\320#\321\322\323\324\325\326     \"\327\"\330\331%\332##\207" [cl-struct-org-export-backend-tags wholenump cl--assertion-failed (wholenump depth) org-export-collect-headlines org-export-toc-entry-backend type-of plist-get :back-end signal wrong-type-argument org-export-backend 1 org-odt--format-toc org-export-translate "Table of Contents" :utf-8 mapconcat make-byte-code 257 "\302\301\300\303$\304\300\"\305\306\"\305\307#\207" vconcat vector [org-odt-format-headline--wrap org-odt-format-toc-headline org-export-get-relative-level format "Contents_20_%d" "\n<text:p text:style-name=\"%s\">%s</text:p>"] 8 "\n\n(fn HEADLINE)" "\n"] 15 (#$ . 37265)])
#@449 Create an automatic style of type OBJECT-TYPE with param OBJECT-PROPS.
OBJECT-PROPS is (typically) a plist created by passing
"#+ATTR_ODT: " option of the object in question to
`org-odt-parse-block-attributes'.
 
Use `org-odt-object-counters' to generate an automatic
OBJECT-NAME and STYLE-NAME.  If OBJECT-PROPS is non-nil, add a
new entry in `org-odt-automatic-styles'.  Return (OBJECT-NAME
. STYLE-NAME).
 
(fn OBJECT-TYPE &optional OBJECT-PROPS)
(defalias 'org-odt-add-automatic-style #[513 ";\204    \302\303!\210\304!\211\305\"\206\306T\307\310#\311\312#\203?\307\313\"\262\312    \314\nDC\305     \"\"#B\207" [org-odt-object-counters org-odt-automatic-styles cl--assertion-failed (stringp object-type) intern plist-get 0 format "%s%d" nil plist-put "Org%s" append] 15 (#$ . 38394)])
#@56 Return check-box string associated to ITEM.
 
(fn ITEM)
(defalias 'org-odt--checkbox #[257 "\300\211;\203\301\302#\202\303A@\"\266\202\211\204\304\2026\305\306\307\310\267\2024\311\2025\312\2025\313\2025\314#\207" [:checkbox get-text-property 0 plist-get "" format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgCode" #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (on 40 off 44 trans 48)) "[&#x2713;] " "[ ] " "[-] " nil] 7 (#$ . 39205)])
#@18 
 
(fn FMT STYLE)
(defalias 'org-odt--build-date-styles #[514 "\205\237\211\205\237\301\302\303\304\305\306\"\307#\302\211\310\211\302\211\211\311\211\2034\211@\312@A\313\211%\262 A\266\202\202\210\314\f#\203~\315\310\f\"\262\316\n\"\262\310\225\262\310\224\262\n\310\225\262O\262\317\230?\205o\320\321\322!\"\262\211\323\323    \260\262\2025\n\302O\262\317\230\204\225\211\320\324\322!\"P\262\320\325 \326$)\266\211\207" [case-fold-search (("%A" . "<number:day-of-week number:style=\"long\"/>") ("%B" . "<number:month number:textual=\"true\" number:style=\"long\"/>") ("%H" . "<number:hours number:style=\"long\"/>") ("%M" . "<number:minutes number:style=\"long\"/>") ("%S" . "<number:seconds number:style=\"long\"/>") ("%V" . "<number:week-of-year/>") ("%Y" . "<number:year number:style=\"long\"/>") ("%a" . "<number:day-of-week number:style=\"short\"/>") ("%b" . "<number:month number:textual=\"true\" number:style=\"short\"/>") ("%d" . "<number:day number:style=\"long\"/>") ("%e" . "<number:day number:style=\"short\"/>") ("%h" . "<number:month number:textual=\"true\" number:style=\"short\"/>") ("%k" . "<number:hours number:style=\"short\"/>") ("%m" . "<number:month number:style=\"long\"/>") ("%p" . "<number:am-pm/>") ("%y" . "<number:year number:style=\"short\"/>")) nil mapconcat identity mapcar car "\\|" 0 (("\\(?:%[[:digit:]]*N\\)" . #1="") ("%C" . "Y") ("%D" . "%m/%d/%y") ("%G" . "Y") ("%I" . "%H") ("%R" . "%H:%M") ("%T" . "%H:%M:%S") ("%U\\|%W" . "%V") ("%Z" . #1#) ("%c" . "%Y-%M-%d %a %H:%M") ("%g" . "%y") ("%X" . "%x") ("%j" . #1#) ("%l" . "%k") ("%s" . #1#) ("%n" . "<text:line-break/>") ("%r" . "%I:%M:%S %p") ("%t" . "<text:tab/>") ("%u\\|%w" . #1#) ("%x" . "%Y-%M-%d %a") ("%z" . #1#)) replace-regexp-in-string t string-match match-string assoc-default #1# format "<number:text>%s</number:text>" org-odt--encode-plain-text "\n" "\n<number:text>%s</number:text>" "\n<number:date-style style:name=\"%s\" %s>%s\n</number:date-style>" " number:automatic-order=\"true\" number:format-source=\"fixed\""] 19 (#$ . 39714)])
#@199 Return complete document string after ODT conversion.
CONTENTS is the transcoded contents string.  RAW-DATA is the
original parsed data.  INFO is a plist holding export options.
 
(fn CONTENTS INFO)
(defalias 'org-odt-template #[514 "\306\307\310\"\"\306\307\311\"\"\307\312\"\211\204\313\202\306\"\262\307\314\"\206(\313\307\315\"\2060\313\316\317\320\321\"\320\322\"\307\n\323\"\205\204\307\n\324\"\211A?\205p\211@\211:\204_\211;\205g\325\202g\211@9\205g\211@\262\326=\205p\211@\262\327\330\331#\320\332\"\320\333\"P\262\262\320\334\307 \335\"\"\320\336    \"\320\337    \"\320\340\"\341 !\205\247\320\342\"\343\344\345\260\f\330\346P#\210\347\350\346\"\266\307\351\"\341!\205\330\211\330\352\203\315\353\202\316\354\313\352\355\313##\266\202\211\206\346\356\357    \"\206\346\360\361!\211<\203\211@A@\362#\210\211\211\203\211@\363!\203\364!\320\365\n\"\347\"\210)\210A\266\202\202\367\266\202V\211;\203M\366!\203M\364!\211\367\230\203=\370\371P\372#\210\202I\211\373\235\203I\362\371#\210\210\202V\360\374\307\351\"\"\210\347\350\371\"\210r\375\371P\372\"q\210\376\372\211\"\210\377\201D \313#\211\203\221eb\210\201E\201F\330\372#\203\221\201G\224b\210\201H\343\261\210\210\201I\304!\210\372eb\210\201J\201K\201E\330\372#\203\336\307\201L\"\201M\201N\201O!!\201P!\203\315\211X\202\316\266\202\204\243\201Q\372\330#\210\202\243\266\201R\201G!\210)\266 \203@@\201S\201TO@A\201S\201TOB\202\n\201U\201V\201W!r\211q\210\201X\201G\201Y\201Z\201[!\201\\\"\201O$\216\201]\307\201^\"\206A\356\201_    \"!\210eb\210\201E\201`\330\372#\210\201G\224b\210\307A\201a\"\330\211\211:\203\226@\262\211A\262\242\262\211@\262\307\201b\"\206\201\201c\211\262\203\217\320B#c\210A\262\202`\266\307\201d\"\203\266\201e@\201f\"\201eA\201g\"\261\210eb\210\201E\201h\330\372#\203\324\201G\224\201E\201i\330\211#|\210\320\201j\377\201X\201k\201l\201Z\201[\n!\201m\"\201n\201o%C\343#\"c\210eb\210\201E\201p\330\211#\210\201G\224b\210\307\201q\"\205 \306\307\310\"\"\211\205+\306\307\311\"\"\307\201r\"\205C\307\312\"\211\205A\306\"\262\307\201s\"\307\201r\"\205Y\206Y\211\307\201t\"\205d\341!\205\227\320\201u\201v\320\201w\n\"#\201x\341!\205\226\320\201y\201z    \201{Q\"\201|PQ\203\265\204\265\320\201}\201~\320\201\"#\201\200P\202\333\205\333\205\333\320\201}\201~\320\201\201\201\202P\320\201\n\"##\201\200P\307 \323\"\205;\307 \324\"\211A?\205\211@\211:\204\376\211;\205\325\202\211@9\205\211@\262\326=\205\211@\2059\320\201}\201~\307\201d\"\203/\203/\327@!\2024\306\"#\201\203P\266\202Q\266\206c\210\307\201\204\"\211\205\\\201P!\203V\211\202\\\307\201\205\"\211\203m\201\206\"\206k\313c\210\266c\210\201\207ed\"*\262\207" [org-odt-zip-dir org-odt-styles-dir image-type hfy-user-sheet-assoc backup-inhibited org-display-custom-times org-export-data plist-get :title :subtitle :author "" :keywords :description write-region "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n     <office:document-meta\n         xmlns:office=\"urn:oasis:names:tc:opendocument:xmlns:office:1.0\"\n         xmlns:xlink=\"http://www.w3.org/1999/xlink\"\n         xmlns:dc=\"http://purl.org/dc/elements/1.1/\"\n         xmlns:meta=\"urn:oasis:names:tc:opendocument:xmlns:meta:1.0\"\n         xmlns:ooo=\"http://openoffice.org/2004/office\"\n         office:version=\"1.2\">\n       <office:meta>\n" format "<dc:creator>%s</dc:creator>\n" "<meta:initial-creator>%s</meta:initial-creator>\n" :with-date :date plain-text timestamp org-odt--format-timestamp nil iso-date "<dc:date>%s</dc:date>\n" "<meta:creation-date>%s</meta:creation-date>\n" "<meta:generator>%s</meta:generator>\n" :creator "<meta:keyword>%s</meta:keyword>\n" "<dc:subject>%s</dc:subject>\n" "<dc:title>%s</dc:title>\n" org-string-nw-p "<meta:user-defined meta:name=\"subtitle\">%s</meta:user-defined>\n" "\n" "  </office:meta>\n" "</office:document-meta>" "meta.xml" org-odt-create-manifest-file-entry "text/xml" :odt-styles-file replace-regexp-in-string "\\`\\([     ]*\n\\)+" "\\`[     \n ]+" "[     \n ]+\\'" expand-file-name "OrgOdtStyles.xml" error "org-odt: Missing styles file?" org-odt--zip-extract org-file-image-p file-name-extension "image/%s" file-exists-p "xml" copy-file "styles.xml" t ("odt" "ott") "Invalid specification of styles.xml file: %S" find-file-noselect revert-buffer mapconcat org-time-stamp-custom-formats org-odt-automatic-styles org-odt-table-style-format org-odt-category-map-alist #[257 "\300\301AA\"\207" [format " %s\n"] 4 "\n\n(fn STYLE)"] re-search-forward "</office:styles>" 0 "\n<!-- Org Htmlfontify Styles -->\n" make-local-variable "<text:outline-level-style\\([^>]*\\)text:level=\"\\([^\"]*\\)\"\\([^>]*\\)>" "<text:outline-level-style\\1text:level=\"\\2\" style:num-format=\"\">" :section-numbers string-to-number match-string 2 wholenump replace-match save-buffer 1 -1 ("%Y-%M-%d %a" . "%Y-%M-%d %a %H:%M") generate-new-buffer " *temp*" make-byte-code "\301\300!\205    \302\300!\207" vconcat vector [buffer-name kill-buffer] insert-file-contents :odt-content-template-file "OrgOdtContentTemplate.xml" "  </office:automatic-styles>" Table :rel-width "96" :odt-use-date-fields org-odt--build-date-styles "OrgDate1" "OrgDate2" "<text:sequence-decls" "</text:sequence-decls>" "\n<text:sequence-decls>\n%s\n</text:sequence-decls>" 257 "\301\302\303\300\304\"A@#\207" [format "<text:sequence-decl text:display-outline-level=\"%d\" text:name=\"%s\"/>" plist-get :odt-display-outline-level] 6 "\n\n(fn X)" "</office:text>" :with-title :with-author :email :with-email "\n<text:p text:style-name=\"%s\">%s</text:p>\n" "OrgTitle" "\n<text:title>%s</text:title>" "\n<text:p text:style-name=\"OrgTitle\"/>\n" "<text:p text:style-name=\"OrgSubtitle\">\n%s\n</text:p>\n" "<text:user-defined style:data-style-name=\"N0\" text:name=\"subtitle\">\n" "</text:user-defined>\n" "<text:p text:style-name=\"OrgSubtitle\"/>\n" "\n<text:p text:style-name=\"%s\">%s</text:p>" "OrgSubtitle" "<text:initial-creator>%s</text:initial-creator>" "\n<text:p text:style-name=\"OrgSubtitle\"/>" "<text:a xlink:type=\"simple\" xlink:href=\"%s\">%s</text:a>" "mailto:" "<text:p text:style-name=\"OrgSubtitle\"/>" :with-toc :headline-levels org-odt-toc buffer-substring-no-properties] 20 (#$ . 41809)])
#@146 Transcode BOLD from Org to ODT.
CONTENTS is the text with bold markup.  INFO is a plist holding
contextual information.
 
(fn BOLD CONTENTS INFO)
(defalias 'org-odt-bold #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "Bold"] 7 (#$ . 48251)])
#@182 Transcode a CENTER-BLOCK element from Org to ODT.
CONTENTS holds the contents of the center block.  INFO is a plist
holding contextual information.
 
(fn CENTER-BLOCK CONTENTS INFO)
(defalias 'org-odt-center-block #[771 "\207" [] 4 (#$ . 48538)])
#@137 Transcode a CLOCK element from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn CLOCK CONTENTS INFO)
(defalias 'org-odt-clock #[771 "\301\211;\203\302\303#\202\304A@\"\266\202\305\211;\203&\302\303#\202,\304A@\"\266\202\306\307\310\"\211:\204D\211;\205L\311\202L\211@9\205L\211@\262\312=\203W\313\202X\314\306\315\316#\317        #\205n\306\320\"Q#\207" [org-clock-string :value get-text-property 0 plist-get :duration format "\n<text:p text:style-name=\"%s\">%s</text:p>" org-export-get-next-element plain-text clock "OrgClock" "OrgClockLastLine" "<text:span text:style-name=\"%s\">%s</text:span>" "OrgClockKeyword" org-odt-timestamp " (%s)"] 13 (#$ . 48792)])
#@134 Transcode a CODE object from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn CODE CONTENTS INFO)
(defalias 'org-odt-code #[771 "\300\301\302\303\304\211;\203\305\306#\202\307A@\"\266\202!#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgCode" org-odt--encode-plain-text :value get-text-property 0 plist-get] 13 (#$ . 49526)])
#@163 Transcode a DRAWER element from Org to ODT.
CONTENTS holds the contents of the block.  INFO is a plist
holding contextual information.
 
(fn DRAWER CONTENTS INFO)
(defalias 'org-odt-drawer #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\303\304\"\"\207" [:drawer-name get-text-property 0 plist-get :odt-format-drawer-function] 9 (#$ . 49925)])
#@201 Transcode a DYNAMIC-BLOCK element from Org to ODT.
CONTENTS holds the contents of the block.  INFO is a plist
holding contextual information.  See `org-export-data'.
 
(fn DYNAMIC-BLOCK CONTENTS INFO)
(defalias 'org-odt-dynamic-block #[771 "\207" [] 4 (#$ . 50289)])
#@157 Transcode an ENTITY object from Org to ODT.
CONTENTS are the definition itself.  INFO is a plist holding
contextual information.
 
(fn ENTITY CONTENTS INFO)
(defalias 'org-odt-entity #[771 "\300\211;\203\301\302#\202\303A@\"\207" [:utf-8 get-text-property 0 plist-get] 9 (#$ . 50563)])
#@152 Transcode a EXAMPLE-BLOCK element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn EXAMPLE-BLOCK CONTENTS INFO)
(defalias 'org-odt-example-block #[771 "\300\"\207" [org-odt-format-code] 6 (#$ . 50864)])
#@153 Transcode a EXPORT-SNIPPET object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn EXPORT-SNIPPET CONTENTS INFO)
(defalias 'org-odt-export-snippet #[771 "\300!\301=\205\302\211;\203\303\304#\202\305A@\"\266\202\207" [org-export-snippet-backend odt :value get-text-property 0 plist-get] 9 (#$ . 51115)])
#@150 Transcode a EXPORT-BLOCK element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn EXPORT-BLOCK CONTENTS INFO)
(defalias 'org-odt-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 "ODT" org-remove-indentation :value] 10 (#$ . 51476)])
#@148 Transcode a FIXED-WIDTH element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn FIXED-WIDTH CONTENTS INFO)
(defalias 'org-odt-fixed-width #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202\"\207" [org-odt-do-format-code :value get-text-property 0 plist-get] 10 (#$ . 51890)])
#@162 Transcode a FOOTNOTE-REFERENCE element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn FOOTNOTE-REFERENCE CONTENTS INFO)
(defalias 'org-odt-footnote-reference #[771 "\303\304\305\"\211\211:\204\211;\205\306\202\211@9\205\211@\262\307=\205)\310\311\312\313#\262\314\315\316$\317\315\316$\204C!\202F\320\"\321\322\323\315\324\325\315\211\211\211&#\315\326\203c\327\202d\330\331\326\332\331##\266\202\211:\204x\315\202\205\211@9\203\204\211AA\202\205\211\262@\315\211:\204\230\211;\205\240\306\202\240\211@9\205\240\211@\262\206\275\333\211;\203\265\334\335#\202\273\336A@\"\266\202>\203\307\337\202-    >\203\321\340\202-\341=\203\333\340\202-\306=\203\345\337\202-\204\355\337\202-\211\204\365\340\202-\211\211:\204\211;\205\f\306\202\f\211@9\205\f\211@\262\211\204\337\202+\211\n>\203 \337\202+\342!\203*\337\202+\340\262\266\202\266\202\340=\203:\211\202>\310\343\"\262\"\266\202\262P\207" [org-element-all-objects org-element-all-elements org-element-object-containers #[514 "\300\301\"\262\302P\303\300\304\300\305    \"\300\306    \"P$\207" [format "%d" "fn" "footnote" "<text:note text:id=\"%s\" text:note-class=\"%s\">%s</text:note>" "<text:note-citation>%s</text:note-citation>" "<text:note-body>%s</text:note-body>"] 12 "\n\n(fn N DEF)"] #[257 "\300\301\"\262\302\303\304P\300\305\306\300\307 %#\207" [format "%d" "footnote" "text" "fn" "<text:span text:style-name=\"%s\">%s</text:span>" "OrgSuperscript" "<text:note-ref text:note-class=\"%s\" text:reference-format=\"%s\" text:ref-name=\"%s\">%s</text:note-ref>"] 13 "\n\n(fn N)"] org-export-get-previous-element plain-text footnote-reference format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgSuperscript" "," org-export-get-footnote-number nil t org-export-footnote-first-reference-p org-export-get-footnote-definition org-export-data-with-backend record org-export-backend odt ((paragraph lambda (p c i) (org-odt--format-paragraph p c i "Footnote" "OrgFootnoteCenter" "OrgFootnoteQuotations"))) replace-regexp-in-string "\\`\\([     ]*\n\\)+" "\\`[     \n ]+" "" "[     \n ]+\\'" :parent get-text-property 0 plist-get object element org-data org-element-secondary-p "\n<text:p text:style-name=\"Footnote\">%s</text:p>"] 19 (#$ . 52226)])
#@164 Transcode a HEADLINE element using BACKEND.
INFO is a plist holding contextual information.
 
(fn HEADLINE BACKEND INFO &optional FORMAT-FUNCTION &rest EXTRA-KEYS)
(defalias 'org-odt-format-headline--wrap #[1155 "\206\300\301\"\262\302\"\303\\\304\"\305\"\205#\306\307\310#\300\311\"\205P\312\211;\203;\313\303#\202A\300A@\"\266\202\211\205N\314        #\262\211\205l\315    \211;\203d\313\303#\202j\300A@\"\266\202\300\316\"\205\214\317\n\211;\203\204\313\303#\202\212\300A@\"\266\202\314\320\f\211;\203\235\313\303#\202\243\300A@\"\266\202  #\300\n\321\"\205\270\322\f \"\323 \f\"\324 !\203\312\n\202\327\325\326\327\330\331!\332\"\333\334%\335\336    \337\340& \207" [plist-get :back-end org-export-get-relative-level 0 org-export-get-headline-number org-export-numbered-headline-p mapconcat number-to-string "." :with-todo-keywords :todo-keyword get-text-property org-export-data-with-backend :todo-type :with-priority :priority :title :with-tags org-export-get-tags org-export-get-reference functionp make-byte-code 1413 "\301\302\"A@\301\303\"A@\301\304\"A@\305\300\306\"                    %\207" vconcat vector [plist-member :level :section-number :headline-label plist-get :odt-format-headline-function] 15 "\n\n(fn TODO TODO-TYPE PRIORITY TEXT TAGS &key LEVEL SECTION-NUMBER HEADLINE-LABEL &allow-other-keys)" apply :headline-label :level :section-number] 29 (#$ . 54582)])
#@170 Transcode a HEADLINE element from Org to ODT.
CONTENTS holds the contents of the headline.  INFO is a plist
holding contextual information.
 
(fn HEADLINE CONTENTS INFO)
(defalias 'org-odt-headline #[771 "\300\211;\203\301\302#\202\303A@\"\266\202?\205\304\305#\306\"\307\"\310\"\311\211;\203=\301\302#\202C\303A@\"\266\202\211\203R\312\313\314P\"\202S\313\262\312\"\315    \"\203\366\316    \"\205\221\317\320\203u\321\202v\322\317\323\324!\211\203\214\315\"\203\214\325\202\215\326\262\"#\327\n\211:\204\235\305\202\252\211@9\203\251\211AA\202\252\211\262\236\330\205\313\211:\204\274\305\202\311\211@9\203\310\211AA\202\311\211\262\236\262\317\331\317\332\333P#\fP\203\344\334\202\345\335#\262\336 \n\"\205\362\337Q\202\317\340\317\341\203\313\202\342#\203\326\202\325P%P\266\206\207" [:footnote-section-p get-text-property 0 plist-get org-odt-format-headline--wrap nil org-export-get-relative-level org-export-numbered-headline-p org-export-get-reference :ID org-odt--target "" "ID-" org-export-low-level-p org-export-first-sibling-p format "\n<text:list text:style-name=\"%s\" %s>" "OrgNumberedList" "OrgBulletedList" "text:continue-numbering=\"%s\"" org-export-get-parent-headline "true" "false" section table "\n<text:list-item>\n%s\n%s" "\n<text:p text:style-name=\"%s\">%s</text:p>" "Text_20_body" "</text:list-header>" "</text:list-item>" org-export-last-sibling-p "</text:list>" "\n<text:h text:style-name=\"%s\" text:outline-level=\"%s\" text:is-list-header=\"%s\">%s</text:h>" "Heading_20_%s%s" "_unnumbered"] 18 (#$ . 56042)])
#@133 Default format function for a headline.
See `org-odt-format-headline-function' for details.
 
(fn TODO TODO-TYPE PRIORITY TEXT TAGS)
(defalias 'org-odt-format-headline-default-function #[1285 "\205\300=\203\301\202\302\303\304#\262\205+\303\305\"\303\306\"\303\304#\266\202\205<\307\303\310\311\312\313    \314##PR\207" [done "OrgDone" "OrgTodo" format "<text:span text:style-name=\"%s\">%s</text:span> " "OrgPriority-%c" "[#%c]" "<text:tab/>" "<text:span text:style-name=\"%s\">[%s]</text:span>" "OrgTags" mapconcat #[257 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgTag"] 5 "\n\n(fn TAG)"] " : "] 16 (#$ . 57688)])
#@157 Transcode an HORIZONTAL-RULE  object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn HORIZONTAL-RULE CONTENTS INFO)
(defalias 'org-odt-horizontal-rule #[771 "\300\301\302\303#\207" [format "\n<text:p text:style-name=\"%s\">%s</text:p>" "Horizontal_20_Line" ""] 7 (#$ . 58370)])
#@112 Return a character not used in string S.
This is used to choose a separator for constructs like \verb.
 
(fn S)
(defalias 'org-odt--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 (#$ . 58695)])
#@183 Transcode an INLINE-SRC-BLOCK element from Org to ODT.
CONTENTS holds the contents of the item.  INFO is a plist holding
contextual information.
 
(fn INLINE-SRC-BLOCK CONTENTS INFO)
(defalias 'org-odt-inline-src-block #[771 "\300\301!\207" [error "FIXME"] 5 (#$ . 59145)])
#@172 Transcode an INLINETASK element from Org to ODT.
CONTENTS holds the contents of the block.  INFO is a plist
holding contextual information.
 
(fn INLINETASK CONTENTS INFO)
(defalias 'org-odt-inlinetask #[771 "\300\301\"\205(\302\211;\203\303\304#\202\300A@\"\266\202\211\205&\305\"\262\211\205C\306\211;\203;\303\304#\202A\300A@\"\266\202\300\307\"\205a\310\211;\203Y\303\304#\202_\300A@\"\266\202\305\311\211;\203r\303\304#\202x\300A@\"\266\202\"\300\312\"\205\211\313\"\300\314\"\f&\207" [plist-get :with-todo-keywords :todo-keyword get-text-property 0 org-export-data :todo-type :with-priority :priority :title :with-tags org-export-get-tags :odt-format-inlinetask-function] 15 (#$ . 59425)])
#@145 Default format function for inlinetasks.
See `org-odt-format-inlinetask-function' for details.
 
(fn TODO TODO-TYPE PRIORITY NAME TAGS CONTENTS)
(defalias 'org-odt-format-inlinetask-default-function #[1542 "\300\301\302\303\300\301\304\305     %#P\306\211\307\310%#\207" [format "\n<text:p text:style-name=\"%s\">%s</text:p>" "Text_20_body" org-odt--textbox "OrgInlineTaskHeading" org-odt-format-headline-default-function nil "OrgInlineTaskFrame" " style:rel-width=\"100%\""] 19 (#$ . 60183)])
#@152 Transcode ITALIC from Org to ODT.
CONTENTS is the text with italic markup.  INFO is a plist holding
contextual information.
 
(fn ITALIC CONTENTS INFO)
(defalias 'org-odt-italic #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "Emphasis"] 7 (#$ . 60689)])
#@159 Transcode an ITEM element from Org to ODT.
CONTENTS holds the contents of the item.  INFO is a plist holding
contextual information.
 
(fn ITEM CONTENTS INFO)
(defalias 'org-odt-item #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\262\304\211;\203)\301\302#\202/\303A@\"\266\202\211\305>\204<\306\307\"\210\310\311\312\313\314    \315%\203O\316\202P\317#\207" [:parent get-text-property 0 plist-get :type (ordered unordered descriptive-1 descriptive-2) error "Unknown list type: %S" format "\n<text:list-item>\n%s\n%s" org-element-map table identity first-match "</text:list-header>" "</text:list-item>"] 14 (#$ . 60988)])
#@140 Transcode a KEYWORD element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual
information.
 
(fn KEYWORD CONTENTS INFO)
(defalias 'org-odt-keyword #[771 "\302\211;\203\303\304#\202\305A@\"\266\202\306\211;\203&\303\304#\202,\305A@\"\266\202\307\230\2038\211\202\235\310\230\203B\311\202\235\312\230\205\235\313\314\311\313\315#)\266\203\203\213\315\316\"\203j\317\320\304\"!\206n\305\321\"\322\311\313\315#)\266\203\323\205\205    #\266\202\202\234\324\311\313\315#)\266\203\205\234\311)\207" [case-fold-search inhibit-changing-match-data :key get-text-property 0 plist-get :value "ODT" "INDEX" nil "TOC" t "\\<headlines\\>" string-match "\\<[0-9]+\\>" string-to-number match-string :headline-levels "\\<local\\>" org-odt-toc "tables\\|figures\\|listings"] 13 (#$ . 61642)])
#@160 Transcode a LATEX-ENVIRONMENT element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn LATEX-ENVIRONMENT CONTENTS INFO)
(defalias 'org-odt-latex-environment #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202!\305\"\207" [org-remove-indentation :value get-text-property 0 plist-get org-odt-do-format-code] 10 (#$ . 62494)])
#@153 Transcode a LATEX-FRAGMENT object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn LATEX-FRAGMENT CONTENTS INFO)
(defalias 'org-odt-latex-fragment #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\305\306\307\310\"#\207" [:value get-text-property 0 plist-get format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgCode" org-odt--encode-plain-text t] 10 (#$ . 62877)])
#@145 Transcode a LINE-BREAK object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn LINE-BREAK CONTENTS INFO)
(defalias 'org-odt-line-break #[771 "\300\207" ["<text:line-break/>"] 4 (#$ . 63312)])
#@43 
 
(fn ELEMENT INFO &optional PREDICATE N)
(defalias 'org-odt--enumerate #[1026 "\203\"\204\300\301!\210\302\303\206\304\305\"#$\2056\306\307\310\n\"\311#\205;\311\307!Q\207" [cl--assertion-failed (funcall predicate element info) #[771 "\300!\301\302\301:\203R@\262\211:\204\211;\205&\303\202&\211@9\205&\211@\262\304=\205A\305\"X\205A\306\"\205A\211\262?\211\262\203RA\262\202\207" [org-element-lineage nil t plain-text headline org-export-get-relative-level org-export-numbered-headline-p] 10 "\n\n(fn ELEMENT N INFO)"] #[1027 "\300C\301\206 \302\303\"\211:\204\211;\205#\304\202#\211@9\205#\211@\262\305\306\307\310\311\f   $\312\"\313\314%\315%\207" [0 org-element-map plist-get :parse-tree plain-text make-byte-code 257 "\302\203 \302\301\"\205\303\211\242T\240\205\300=\205\303\242\207" vconcat vector [] 4 "\n\n(fn EL)" first-match] 17 "\n\n(fn ELEMENT SCOPE INFO &optional PREDICATE)"] plist-get :odt-display-outline-level mapconcat number-to-string org-export-get-headline-number "."] 13 (#$ . 63549)])
#@410 Return a label for ELEMENT.
 
ELEMENT is a `link', `table', `src-block' or `paragraph' type
element.  INFO is a plist used as a communication channel.  OP is
either `definition' or `reference', depending on the purpose of
the generated string.
 
Return value is a string if OP is set to `reference' or a cons
cell like CAPTION . SHORT-CAPTION) where CAPTION and
SHORT-CAPTION are strings.
 
(fn ELEMENT INFO OP)
(defalias 'org-odt-format-label #[771 "\211:\204\211;\205\302\202\211@9\205\211@\262\303>\204\"\304\305!\210\211:\2041\211;\2059\302\2029\211@9\2059\211@\262\211\306\267\202G\307!\202H\262\310\211;\203Y\311\312#\202_\313A@\"\266\202\204~\310\211;\203s\311\312#\202y\313A@\"\266\202\205\202\314\"\315!\211\205\216\316\"\262\317\204\231\205\273\211:\204\251\211;\205\261\302\202\261\211@9\205\261\211@\262\320\321\"\203\276\322\202\320\323\"\203\311\324\202\325\326\"\203\377\327\"\203\335\330\202\331\"\203\352\332\202\333\"\203\367\334\202\335\336    \"\202\335\337    \211:\204\211;\205\302\202\211@9\205\211@\262\"\262\317\204'\304\340!\210\341\"\211@A\211@A\211@A\211@A\n\342#\262\343\344#\262\345\267\202\260\346\347\"\350\343\351    \352#A@\344#\353B\354\346\355\211%B\356\206\203\357BE\"PB\202\265\351    \352#AA\211@A@\346\360\350\353\fB\354BD\"$\266\203\202\265\335\361\"\266\204\266\211\266\202\207" [org-odt-category-map-alist org-odt-label-styles plain-text #1=(link table src-block paragraph) cl--assertion-failed (memq (org-element-type element) '#1#) #s(hash-table size 1 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (link 65)) org-export-get-parent-element :name get-text-property 0 plist-get org-export-get-reference org-export-get-caption org-export-data nil eql table "__Table__" src-block "__Listing__" memql (link paragraph) org-odt--enumerable-latex-image-p "__DvipngImage__" org-odt--enumerable-image-p "__Figure__" org-odt--enumerable-formula-p "__MathFormula__" error "Don't know how to format label for link: %S" "Don't know how to format label for element type: %s" default-category assoc-default org-odt--enumerate org-export-translate :utf-8 #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (definition 346 reference 397)) format "\n<text:bookmark text:name=\"%s\"/>" format-spec assoc-string t 101 110 "<text:sequence text:ref-name=\"%s\" text:name=\"%s\" text:formula=\"ooow:%s+1\" style:num-format=\"1\">%s</text:sequence>" 99 "" "<text:sequence-ref text:reference-format=\"%s\" text:ref-name=\"%s\">%s</text:sequence-ref>" "Unknown %S on label"] 34 (#$ . 64657)])
#@50 Returns the internal name of the file
 
(fn PATH)
(defalias 'org-odt--copy-image-file #[257 "\303!\304\305\"\306\304\307    T\211$\310\311\312!#\210    \313U\203,\314\nP!\210\315\316\"\210\317\nP\320#\210\315\"\210)\207" [image-type org-odt-embedded-images-count org-odt-zip-dir file-name-extension format "image/%s" "Images/" "%s%04d.%s" message "Embedding %s as %s..." substring-no-properties 1 make-directory org-odt-create-manifest-file-entry "" copy-file overwrite] 8 (#$ . 67373)])
#@70 
 
(fn FILE INFO &optional USER-WIDTH USER-HEIGHT SCALE DPI EMBED-AS)
(defalias 'org-odt--image-size #[1794 "\302\303\206 \304\305\"\206\306?\205?\205 \211\205%?\205\203\307\310!\203X\311\312\313\"!\314\315\"\205J\316\317\320\"!\316\317\321\"!B\262#\262\206\203\3221j\323 \210\324\325!\326\"0\202l\210\327#\262\206\203\330\"A\206\203\331\332!\211@A \203\233\f_\262\211\f_\262\202\313\203\254\203\254\262\262\202\313\203\275\245_\262\262\202\313\203\313\245_\262\262    @    AV\204\333V\203\362\245\245^\211_\262\211_\262\266\266B\207" [org-odt-default-image-sizes-alist org-odt-max-image-size #[514 "\300\245_\207" [2.54] 6 "\n\n(fn PIXELS DPI)"] #[771 "\205@\"A\"B\207" [] 7 "\n\n(fn --PIXELS-TO-CMS SIZE-IN-PIXELS DPI)"] plist-get :odt-pixels-per-inch "paragraph" executable-find "identify" shell-command-to-string format "identify -format \"%%w:%%h\" \"%s\"" string-match "\\([0-9]+\\):\\([0-9]+\\)" string-to-number match-string 1 2 (error) clear-image-cache image-size create-image pixels nil assoc-string error "Cannot determine image size, aborting"] 23 (#$ . 67876)])
#@154 Return ODT code for an inline image.
LINK is the link pointing to the inline image.  INFO is a plist
used as a communication channel.
 
(fn ELEMENT INFO)
(defalias 'org-odt-link--inline-image #[514 "\211:\204\211;\205\300\202\211@9\205\211@\262\301=\204\"\302\303!\210\304\211;\2031\305\306#\2027\307A@\"\266\202\310\211;\203H\305\306#\202N\307A@\"\266\202\311\235\203]\312Q\202j\313!\203i\314!\202j\211\266\202\313!\203v\211\202\314\315\307\316\"!\"\317\320\321!\"\211:\204\224\211;\205\234\300\202\234\211@9\205\234\211@\262\211\322\267\202\253\323!\202\254\262\324\325\"\326\307\327\"\330\331#@\211\205\303\307\332\"\205\313\307\333\"E\334 \307\335\"\211\205\340\336!\262\307    \337\"\211\205\356\336!\262\307\n\340\"\211\205\374\336!\262\341\342&\211@A\343\"\211\203\342\202\344\345\346#\211@\211\205#\347\350Q\351\2040\2024\323!\211;\203A\305\306#\202G\307A@\"\266\202\211\205j\352\353\211:\204^\211;\205f\300\202f\211@9\205f\211@\262!!\205\205\354\211;\203}\305\306#\202\203\307A@\"\266\202\355\f\f\n&\207" [plain-text link cl--assertion-failed (eq (org-element-type element) 'link) :type get-text-property 0 plist-get :path ("http" "https") ":" file-name-absolute-p expand-file-name file-name-directory :input-file format "\n<draw:image xlink:href=\"%s\" xlink:type=\"simple\" xlink:show=\"embed\" xlink:actuate=\"onLoad\"/>" org-odt--copy-image-file #s(hash-table size 1 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (link 164)) org-export-get-parent-element org-export-read-attribute :attr_odt assoc-string :anchor (("as-char") ("paragraph") ("page")) t :style :attributes org-odt--image-size :width read :length :scale nil "paragraph" org-odt--standalone-link-p "as-char" org-odt-format-label definition "Captioned" "Image" :replaces capitalize symbol-name :value org-odt--render-image/formula] 31 (#$ . 69074)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt-link--inline-formula #[514 "\301\211;\203\302\303#\202\304A@\"\266\202\305!\203#\306!\202$\211\262\305!\2030\211\2029\306\307\304\310\"!\"\311\312\313\307\314!!#\315\"\211\203N\316\202O\317\320\321#\322\204`\202d\323    !\211;\203q\302\303#\202w\304A@\"\266\202\211\205\232\324\325\211:\204\216\211;\205\226\326\202\226\211@9\205\226\211@\262!!\205\265\327\211;\203\255\302\303#\202\263\304A@\"\266\202\330\211\331\267\202\317\332\333\n\330\211\n\n&\202\357\332\334\n\n\330\n\n&\335\320\321#@)\336Q\266\202\207" [org-odt-category-map-alist :path get-text-property 0 plist-get file-name-absolute-p expand-file-name file-name-directory :input-file format "\n<draw:object %s xlink:href=\"%s\" xlink:type=\"simple\"/>" " xlink:show=\"embed\" xlink:actuate=\"onLoad\"" org-odt--copy-formula-file org-odt--standalone-link-p paragraph character org-odt-format-label definition :replaces org-export-get-parent-element capitalize symbol-name plain-text :value nil #s(hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (character 190)) org-odt--render-image/formula "InlineFormula" "CaptionedDisplayFormula" (("__MathFormula__" "Text" "math-label" "Equation" org-odt--enumerable-formula-p)) "<text:tab/>"] 22 (#$ . 71056)])
#@54 Returns the internal name of the file
 
(fn SRC-FILE)
(defalias 'org-odt--copy-formula-file #[257 "\302\303T\211\"\211\304P\305    P!\210\306\307\310#\210\311\312#\210\313!\211\314\235\2030\315    P\316#\210\202G\211\317\230\203B\320\304    P#\210\202G\321\322\"\210\210\306\323\"\210\207" [org-odt-embedded-formulas-count org-odt-zip-dir format "Formula-%04d/" "content.xml" make-directory org-odt-create-manifest-file-entry "application/vnd.oasis.opendocument.formula" "1.2" message "Embedding %s as %s..." file-name-extension ("mathml" "mml") copy-file overwrite "odf" org-odt--zip-extract error "%s is not a formula file" "text/xml"] 9 (#$ . 72423)])
#@92 
 
(fn CFG-KEY HREF WIDTH HEIGHT &optional CAPTIONS USER-FRAME-PARAMS &rest TITLE-AND-DESC)
(defalias 'org-odt--render-image/formula #[1668 "\300@A\301\n\302#\211A@\3038\304\2041\211\"\262\305\306\307    \"%\202p\211\"\262\310!\211AA@\205I\311\312\n\"P\240\210\211\262\262\305\313\311\314\315\305\306\307\"%\fP#%\207" [(("As-CharImage" ("OrgInlineImage" nil "as-char")) ("ParagraphImage" ("OrgDisplayImage" nil "paragraph")) ("PageImage" ("OrgPageImage" nil "page")) ("CaptionedAs-CharImage" ("OrgCaptionedImage" " style:rel-width=\"100%\" style:rel-height=\"scale\"" "paragraph") ("OrgInlineImage" nil "as-char")) ("CaptionedParagraphImage" ("OrgCaptionedImage" " style:rel-width=\"100%\" style:rel-height=\"scale\"" "paragraph") ("OrgImageCaptionFrame" nil "paragraph")) ("CaptionedPageImage" ("OrgCaptionedImage" " style:rel-width=\"100%\" style:rel-height=\"scale\"" "paragraph") ("OrgPageImageCaptionFrame" nil "page")) ("InlineFormula" ("OrgInlineFormula" nil "as-char")) ("DisplayFormula" ("OrgDisplayFormula" nil "as-char")) ("CaptionedDisplayFormula" ("OrgCaptionedFormula" nil "paragraph") ("OrgFormulaCaptionFrame" nil "paragraph"))) assoc-string t 2 #[514 "\211\204\207G\300U\204\301\302!\210\211G\300U\204\301\303!\210\211\304\304\211:\203G@\262:\203G@\262\2068B\262A\262A\262\202!\211\237\207" [3 cl--assertion-failed (= (length default) 3) (= (length user) 3) nil] 9 "Merge default and user frame params.\n\n(fn DEFAULT USER)"] apply org-odt--frame append copy-sequence format " draw:name=\"%s\" " org-odt--textbox "\n<text:p text:style-name=\"%s\">%s</text:p>" "Illustration"] 28 (#$ . 73092)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt--enumerable-p #[514 "\300\211;\203\301\302#\202\303A@\"\266\202\2061\304\211;\203)\301\302#\202/\303A@\"\266\202\207" [:caption get-text-property 0 plist-get :name] 8 (#$ . 74783)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt--enumerable-image-p #[514 "\300\301\302\303\304\305\306    !\307\"\310\311%$\207" [org-odt--standalone-link-p #[257 "\300\211;\203\301\302#\202\303A@\"\266\202?\205L\304\211;\203*\301\302#\2020\303A@\"\266\202\206L\305\211;\203D\301\302#\202J\303A@\"\266\202\207" [:replaces get-text-property 0 plist-get :caption :name] 7 "\n\n(fn P)"] make-byte-code 257 "\211\211:\204\211;\205\301\202\211@9\205\211@\262\302=\204\"\303\304!\210\305\306\300\307\"\"\207" vconcat vector [plain-text link cl--assertion-failed (eq (org-element-type l) 'link) org-export-inline-image-p plist-get :odt-inline-image-rules] 6 "\n\n(fn L)"] 12 (#$ . 75027)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt--enumerable-latex-image-p #[514 "\300\301\302\303\304\305\306    !\307\"\310\311%$\207" [org-odt--standalone-link-p #[257 "\300\211;\203\301\302#\202\303A@\"\266\202\205K\304\211;\203)\301\302#\202/\303A@\"\266\202\206K\305\211;\203C\301\302#\202I\303A@\"\266\202\207" [:replaces get-text-property 0 plist-get :caption :name] 7 "\n\n(fn P)"] make-byte-code 257 "\211\211:\204\211;\205\301\202\211@9\205\211@\262\302=\204\"\303\304!\210\305\306\300\307\"\"\207" vconcat vector [plain-text link cl--assertion-failed (eq (org-element-type l) 'link) org-export-inline-image-p plist-get :odt-inline-image-rules] 6 "\n\n(fn L)"] 12 (#$ . 75744)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt--enumerable-formula-p #[514 "\300\301\302\303\304\305\306    !\307\"\310\311%$\207" [org-odt--standalone-link-p #[257 "\300\211;\203\301\302#\202\303A@\"\266\202\2061\304\211;\203)\301\302#\202/\303A@\"\266\202\207" [:caption get-text-property 0 plist-get :name] 7 "\n\n(fn P)"] make-byte-code 257 "\211\211:\204\211;\205\301\202\211@9\205\211@\262\302=\204\"\303\304!\210\305\306\300\307\"\"\207" vconcat vector [plain-text link cl--assertion-failed (eq (org-element-type l) 'link) org-export-inline-image-p plist-get :odt-inline-formula-rules] 6 "\n\n(fn L)"] 12 (#$ . 76466)])
#@578 Test if ELEMENT is a standalone link for the purpose ODT export.
INFO is a plist holding contextual information.
 
Return non-nil, if ELEMENT is of type paragraph satisfying
PARAGRAPH-PREDICATE and its sole content, save for whitespaces,
is a link that satisfies LINK-PREDICATE.
 
Return non-nil, if ELEMENT is of type link satisfying
LINK-PREDICATE and its containing paragraph satisfies
PARAGRAPH-PREDICATE in addition to having no other content save for
leading and trailing whitespaces.
 
Return nil, otherwise.
 
(fn ELEMENT INFO &optional PARAGRAPH-PREDICATE LINK-PREDICATE)
(defalias 'org-odt--standalone-link-p #[1026 "\211:\204\211;\205\300\202\211@9\205\211@\262\211\301\267\202J\202K\203-!\205K\302\211;\203=\303\304#\202C\305A@\"\266\202\262\202K\306\262\211\205\364\211\211:\204`\211;\205h\300\202h\211@9\205h\211@\262\307=\205\364\203y!\205\364\211\211:\204\203\306\202\220\211@9\203\217\211AA\202\220\211\262\211\306\304\310:\203\353@\262\211:\204\256\211;\205\266\300\202\266\211@9\205\266\211@\262\211\311\267\202\333\312!?\202\334\203\321!\205\334T\211\262\313U\202\334\306\262\211\262\203\353A\262\202\226\211\205\360\310\266\204\262\207" [plain-text #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (paragraph 31 link 35)) :parent get-text-property 0 plist-get nil paragraph t #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-text 190 link 197)) org-string-nw-p 1] 13 (#$ . 77120)])
#@25 
 
(fn DESTINATION INFO)
(defalias 'org-odt-link--infer-description #[514 "\300!\301!\211:\204\211;\205\302\202\211@9\205\211@\262\211\303>\203,\304\"\2021\305\306\"\262\307\310:\203o@\211:\204K\211;\205S\302\202S\211@9\205S\211@\262\311=\203d\262\310\211\262\202e\307\203oA\262\2026\266\202\211\310\211\211\211:\203\334\262\211A\262\242\262\211A\262\242\262\211:\204\235\211;\205\245\302\202\245\211@9\205\245\211@\262\311=\203\334\312\211;\203\273\313\314#\202\301\315A@\"\266\202\316=\205\320\317 \307#GTB\262AA\262\202v\211\237\266\205\307\310:\203%@\211:\204\370\211;\205\302\202\211@9\205\211@\262\320=\203\321@\n\"\203\262\310\211\262\202\307\203%A\262\202\343\266\202\211\310\211:\203l@\262\211:\204B\211;\205J\302\202J\211@9\205J\211@\262\320=\203e\322 \"\205a\317 \307#GTB\262A\262\202*\211\237\266\203\323\"\211\205\211\310>?\205\211\324\325\326\327\330##\262\266\204\206|\322\"\205\353B\310\307\310:\203\351@\262\211:\204\265\211;\205\275\302\202\275\211@9\205\275\211@\262\320=\203\336\321    \"\204\336\322    \"\203\336\262\310\211\262\202\337\307\203\351A\262\202\235\266\203\211\205\375\324\331\326\332\333 \"\334##\262\206|B\310\307\310:\203L@\262\211:\204 \211;\205(\302\202(\211@9\205(\211@\262\320=\203A\321    \"\204A\262\310\211\262\202B\307\203LA\262\202\266\203\211\205t\324\335\336\211;\203d\313\314#\202j\315A@\"\266\202\337\n\"\262#\262\206|\305\340!\207" [org-element-lineage reverse plain-text (headline target) org-export-get-reference error "FIXME: Unable to resolve %S" t nil plain-list :type get-text-property 0 plist-get ordered org-export-get-previous-element headline org-export-low-level-p org-export-numbered-headline-p append format "<text:bookmark-ref text:reference-format=\"number-all-superior\" text:ref-name=\"%s\">%s</text:bookmark-ref>" mapconcat #[257 "\211\204\300\207\301!\302P\207" [" " number-to-string "."] 3 "\n\n(fn N)"] "" "<text:bookmark-ref text:reference-format=\"chapter\" text:ref-name=\"OrgXref.%s\">%s</text:bookmark-ref>" number-to-string org-export-get-headline-number "." "<text:bookmark-ref text:reference-format=\"text\" text:ref-name=\"OrgXref.%s\">%s</text:bookmark-ref>" :title org-export-data "FIXME?"] 17 (#$ . 78683)])
#@199 Transcode a LINK object from Org to ODT.
 
DESC is the description part of the link, or the empty string.
INFO is a plist holding contextual information.  See
`org-export-data'.
 
(fn LINK DESC INFO)
(defalias 'org-odt-link #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\211;\203&\301\302#\202,\303A@\"\266\202\305\230?\2056\306\303\307\"\"\310\235\203L\311Q\202Y\312\230\203X\313!\202Y\314\315\316#\317    \320#\206\204x\203x\321    \"\202\204\221\306    \303    \322\"\"\203\221\323    \"\202\324\230\203\264\325    \"\211\204\245\202\257\326\327\330 \"#\262\202\331\235\203x\332\230\203\311\333    \"\202\317\334    \"\211\211:\204\336\211;\205\346\335\202\346\211@9\205\346\211@\262\211\336\267\202@\204\372\337\n\"\202q\340\230\203\341\211;\203\301\302#\202\303A@\"\266\202\206 \330\n\"\326\342    #\262\202q\326\342\330\f\"\206<\343 \"#\202q\3441N\345\n\346#0\202P\210\347\211\204\\\337 \"\202o\204e\211\202o\326\342\330 \"    #\262\262\262\202\350\230\203\233\326\351\352\n\"\"\353P\326\354\"\326\355#\"\266\202\202\211\203\203\211:\204\256\347\202\273\211@9\203\272\211AA\202\273\211\262\211A\204\370\211@\211\211:\204\323\211;\205\333\335\202\333\211@9\205\333\211@\262\356=\205\352\306\303 \307\"\"\262\203\370\326\357#\202\376\326\360#\262\202\211\203\326\360\211#\202\326\361\362#\207" [:type get-text-property 0 plist-get :path "" org-export-inline-image-p :odt-inline-image-rules ("http" "https" "ftp" "mailto") ":" "file" org-export-file-uri replace-regexp-in-string "&" "&amp;" org-export-custom-protocol-maybe odt org-odt-link--inline-image :odt-inline-formula-rules org-odt-link--inline-formula "radio" org-export-resolve-radio-link format "<text:bookmark-ref text:reference-format=\"text\" text:ref-name=\"OrgXref.%s\">%s</text:bookmark-ref>" org-export-get-reference ("custom-id" "fuzzy" "id") "fuzzy" org-export-resolve-fuzzy-link org-export-resolve-id-link plain-text #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (headline 238 target 299)) org-odt-link--infer-description "custom-id" :CUSTOM_ID "<text:a xlink:type=\"simple\" xlink:href=\"#%s\">%s</text:a>" org-export-get-ordinal (error) org-odt-format-label reference nil "coderef" "%d" org-export-resolve-coderef "coderef-" org-export-get-coderef-format "<text:bookmark-ref text:reference-format=\"number\" text:ref-name=\"OrgXref.%s\">%s</text:bookmark-ref>" link "\n<draw:a xlink:type=\"simple\" xlink:href=\"%s\">\n%s\n</draw:a>" "<text:a xlink:type=\"simple\" xlink:href=\"%s\">%s</text:a>" "<text:span text:style-name=\"%s\">%s</text:span>" "Emphasis"] 17 (#$ . 81079)])
#@152 Transcode a NODE-PROPERTY element from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual
information.
 
(fn NODE-PROPERTY CONTENTS INFO)
(defalias 'org-odt-node-property #[771 "\300\301\302\303\211;\203\304\305#\202\306A@\"\266\202\307\211;\203+\304\305#\2021\306A@\"\266\202\211\203=\310P\202>\311\262#!\207" [org-odt--encode-plain-text format "%s:%s" :key get-text-property 0 plist-get :value " " ""] 13 (#$ . 83848)])
#@98 Return style of PARAGRAPH.
Style is a symbol among `quoted', `centered' and nil.
 
(fn PARAGRAPH)
(defalias 'org-odt--paragraph-style #[257 "\211\300\211;\203\301\302#\202\303A@\"\266\202\211\262\203<\211\211:\204-\211;\2055\304\2025\211@9\2055\211@\262\305>\203\211\211:\204K\211;\205S\304\202S\211@9\205S\211@\262\211\306\267\202c\307\202d\310\202d\311\262\207" [:parent get-text-property 0 plist-get plain-text (center-block quote-block section) #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (center-block 91 quote-block 95)) centered quoted nil] 8 (#$ . 84311)])
#@397 Format paragraph according to given styles.
PARAGRAPH is a paragraph type element.  CONTENTS is the
transcoded contents of that paragraph, as a string.  INFO is
a plist used as a communication channel.  DEFAULT, CENTER and
QUOTE are, respectively, style to use when paragraph belongs to
no special environment, a center block, or a quote block.
 
(fn PARAGRAPH CONTENTS INFO DEFAULT CENTER QUOTE)
(defalias 'org-odt--format-paragraph #[1542 "\300\301\302!\211\303\267\202\202\202\262\304    \211;\203'\305\306#\202-\307A@\"\266\202\211\211:\204>\211;\205F\310\202F\211@9\205F\211@\262\311=\205Z\312\n    \"?\205Z\313!\262P#\207" [format "\n<text:p text:style-name=\"%s\">%s</text:p>" org-odt--paragraph-style #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (quoted 12 centered 16)) :parent get-text-property 0 plist-get plain-text item org-export-get-previous-element org-odt--checkbox] 15 (#$ . 84951)])
#@186 Transcode a PARAGRAPH element from Org to ODT.
CONTENTS is the contents of the paragraph, as a string.  INFO is
the plist used as a communication channel.
 
(fn PARAGRAPH CONTENTS INFO)
(defalias 'org-odt-paragraph #[771 "\300\301\211;\203\302\303#\202\304A@\"\266\202\206 \305\306\307&\207" [org-odt--format-paragraph :style get-text-property 0 plist-get "Text_20_body" "OrgCenter" "Quotations"] 13 (#$ . 85926)])
#@167 Transcode a PLAIN-LIST element from Org to ODT.
CONTENTS is the contents of the list.  INFO is a plist holding
contextual information.
 
(fn PLAIN-LIST CONTENTS INFO)
(defalias 'org-odt-plain-list #[771 "\300\301\302\211;\203\303\304#\202\305A@\"\266\202\211\306\267\202/\307\2020\310\2020\311\2020\311\2020\312\262\300\313\314\211;\203E\303\304#\202K\305A@\"\266\202\262\211\203u\211\211:\204b\211;\205j\315\202j\211@9\205j\211@\262\316=\203u\317\202v\320\262\"$\207" [format "\n<text:list text:style-name=\"%s\" %s>\n%s</text:list>" :type get-text-property 0 plist-get #s(hash-table size 4 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 31 unordered 35 descriptive-1 39 descriptive-2 43)) "OrgNumberedList" "OrgBulletedList" "OrgDescriptionList" nil "text:continue-numbering=\"%s\"" :parent plain-text item "true" "false"] 15 (#$ . 86362)])
#@13 
 
(fn LINE)
(defalias 'org-odt--encode-tabs-and-spaces #[257 "\300\301\302#\207" [replace-regexp-in-string "\\(    \\| \\{2,\\}\\)" #[257 "\211\300\230\203\301\207\302\303GS\"\207" ["    " "<text:tab/>" format " <text:s text:c=\"%d\"/>"] 4 "\n\n(fn S)"]] 5 (#$ . 87272)])
#@45 
 
(fn TEXT &optional NO-WHITESPACE-FILLING)
(defalias 'org-odt--encode-plain-text #[513 "\300\211\203\211@\301@A\302\211%\262A\266\202\202\210\211\203!\207\303!\207" [(("&" . "&amp;") ("<" . "&lt;") (">" . "&gt;")) replace-regexp-in-string t org-odt--encode-tabs-and-spaces] 10 (#$ . 87548)])
#@140 Transcode a TEXT string from Org to ODT.
TEXT is the string to transcode.  INFO is a plist holding
contextual information.
 
(fn TEXT INFO)
(defalias 'org-odt-plain-text #[514 "\301\302\"\262\303\304\"\203\305\306$\262\303\307\"\2038\211\2037\211@\310@A\302\311%\262A\266\202\202\210\303\312\"\203G\310\313\314\302$\262\211\207" [org-odt-special-string-regexps org-odt--encode-plain-text t plist-get :with-smart-quotes org-export-activate-smart-quotes :utf-8 :with-special-strings replace-regexp-in-string nil :preserve-breaks "\\(\\\\\\\\\\)?[     ]*\n" "<text:line-break/>"] 11 (#$ . 87861)])
#@143 Transcode a PLANNING element from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn PLANNING CONTENTS INFO)
(defalias 'org-odt-planning #[771 "\302\303\304\305\211;\203\306\307#\202\310A@\"\266\202\211\205,\302\311\312#\313#P\262\314\211;\203>\306\307#\202D\310A@\"\266\202\211\205W\302\311\315    #\313        #P\262\316\211;\203i\306\307#\202o\310A@\"\266\202\211\205\202\302\311\317    #\313\n\n#P\262Q#\207" [org-closed-string org-deadline-string format "\n<text:p text:style-name=\"%s\">%s</text:p>" "OrgPlanning" :closed get-text-property 0 plist-get "<text:span text:style-name=\"%s\">%s</text:span>" "OrgClosedKeyword" org-odt-timestamp :deadline "OrgDeadlineKeyword" :scheduled "OrgScheduledKeyword"] 14 (#$ . 88485)])
#@182 Transcode a PROPERTY-DRAWER element from Org to ODT.
CONTENTS holds the contents of the drawer.  INFO is a plist
holding contextual information.
 
(fn PROPERTY-DRAWER CONTENTS INFO)
(defalias 'org-odt-property-drawer #[771 "\300!\205\n\301\302\"\207" [org-string-nw-p format "<text:p text:style-name=\"OrgFixedWidthBlock\">%s</text:p>"] 6 (#$ . 89286)])
#@173 Transcode a QUOTE-BLOCK element from Org to ODT.
CONTENTS holds the contents of the block.  INFO is a plist
holding contextual information.
 
(fn QUOTE-BLOCK CONTENTS INFO)
(defalias 'org-odt-quote-block #[771 "\207" [] 4 (#$ . 89649)])
#@34 
 
(fn TEXT STYLE &optional NAME)
(defalias 'org-odt-format-section #[770 "\300\301!@\302\303\302\304\206\"$\207" [org-odt-add-automatic-style "Section" format "\n<text:section text:style-name=\"%s\" %s>\n%s\n</text:section>" "text:name=\"%s\""] 10 (#$ . 89892)])
#@167 Transcode a SECTION element from Org to ODT.
CONTENTS holds the contents of the section.  INFO is a plist
holding contextual information.
 
(fn SECTION CONTENTS INFO)
(defalias 'org-odt-section #[771 "\207" [] 4 (#$ . 90170)])
#@160 Transcode a RADIO-TARGET object from Org to ODT.
TEXT is the text of the target.  INFO is a plist holding
contextual information.
 
(fn RADIO-TARGET TEXT INFO)
(defalias 'org-odt-radio-target #[771 "\300\301\"\"\207" [org-odt--target org-export-get-reference] 8 (#$ . 90404)])
#@177 Transcode a SPECIAL-BLOCK element from Org to ODT.
CONTENTS holds the contents of the block.  INFO is a plist
holding contextual information.
 
(fn SPECIAL-BLOCK CONTENTS INFO)
(defalias 'org-odt-special-block #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\305\"\306\230\203f\303\307\"\2066\303\307\"\211\2054\310\"\262\303\311\"\206B\303\311\"@\312\313\312\314\205O\312\315\"\205\\\312\316\317\320\321#\" Q\"\"\266\202\202\231\322\230\203\230\303\323\"\303\324\"\303\325\"\303\326\"\303\327\"\312\330\331\332\f                    &#\266\205\202\231\207" [:type get-text-property 0 plist-get org-export-read-attribute :attr_odt "annotation" :author org-export-data :date format "\n<text:p>%s</text:p>" "<office:annotation>\n%s\n</office:annotation>" "<dc:creator>%s</dc:creator>" "<dc:date>%s</dc:date>" org-odt--format-timestamp nil iso-date "textbox" :width :height :style :extra :anchor "\n<text:p text:style-name=\"%s\">%s</text:p>" "Text_20_body" org-odt--textbox] 20 (#$ . 90690)])
#@563 Create custom style for face FN.
When FN is the default face, use its foreground and background
properties to create "OrgSrcBlock" paragraph style.  Otherwise
use its color attribute to create a character style whose name
is obtained from FN.  Currently all attributes of FN other than
color are ignored.
 
The style name for a face FN is derived using the following
operations on the face name in that order - de-dash, CamelCase
and prefix with "OrgSrc".  For example,
`font-lock-function-name-face' is associated with
"OrgSrcFontLockFunctionNameFace".
 
(fn FN)
(defalias 'org-odt-hfy-face-to-css #[257 "\302!\303\304\305\306\307!\310\"\311#P\312\313\"A\312\314\"A\2051\315\267\202,\316    #\2021\316    #B\207" [org-odt-create-custom-styles-for-srcblocks org-odt-src-block-paragraph-format hfy-face-to-style "OrgSrc" mapconcat capitalize split-string hfy-face-or-def-to-name "-" "" assoc "color" "background" #s(hash-table size 1 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (default 36)) format] 9 (#$ . 91724)])
#@13 
 
(fn LINE)
(defalias 'org-odt-htmlfontify-string #[257 "\306\307\310\311 !\312\313\"\203\211\202\313B\211\262\314\315\316!.\207" [hfy-html-quote-regex hfy-html-quote-map hfy-face-to-css hfy-optimizations hfy-begin-span-handler hfy-end-span-handler "\\([<\"&>     ]\\)" (("\"" "&quot;") ("<" "&lt;") ("&" "&amp;") (">" "&gt;") (" " "<text:s/>") ("    " "<text:tab/>")) org-odt-hfy-face-to-css copy-sequence memql body-text-only #[1028 "\300\301\"c\207" [format "<text:span text:style-name=\"%s\">"] 7 "\n\n(fn STYLE TEXT-BLOCK TEXT-ID TEXT-BEGINS-BLOCK-P)"] #[0 "\300c\207" ["</text:span>"] 1] htmlfontify-string] 5 (#$ . 92774)])
#@62 
 
(fn CODE INFO &optional LANG REFS RETAIN-LABELS NUM-START)
(defalias 'org-odt-do-format-code #[1538 "\301\"\206\211\205\302\303\304\"!\305\306\"\211G\307!\2052\310    \311\"\2052\312\313\314\315#\2052\316\317!\211\204;\n\202]\320\321!r\211q\210\322\323\324\325\326!\327\"\330$\216 c\210 \210\331 \210\332 *\262\203e\333\202f\334\203n\335\202o\336C\323C\305\306\"GU\204\200\337\340!\210\341\322\342\343\325\326    %\344\"\345\346%\f$\262    \204\247\202\275    \323U\203\267\303\347\350#\202\275\303\347\351#\207" [org-src-lang-modes assoc-default intern format "%s-mode" org-split-string "\n" functionp plist-get :odt-fontify-srcblocks require htmlfontify nil t fboundp htmlfontify-string generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205    \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 org-font-lock-ensure buffer-string org-odt-htmlfontify-string org-odt--encode-plain-text "OrgSrcBlock" "OrgFixedWidthBlock" cl--assertion-failed (= code-length (length (org-split-string code "\n"))) org-export-format-code 771 "\303\211\242\304\211\242T\240\301U\205\305P\240\210\205\300\205\306\307\"P\262\302!\262\211\2032\310\311P\"\262\303\242\204;\312\313!\210\306\314\303\242#\262\204I\207\306\315\"\207" ["LastLine" format " (%s)" org-odt--target "coderef-" cl--assertion-failed par-style "\n<text:p text:style-name=\"%s\">%s</text:p>" "\n<text:list-item>%s\n</text:list-item>"] 7 "\n\n(fn LOC LINE-NUM REF)" "\n<text:list text:style-name=\"OrgSrcBlockNumberedLine\"%s>%s</text:list>" " text:continue-numbering=\"false\"" " text:continue-numbering=\"true\""] 27 (#$ . 93421)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt-format-code #[514 "\300\211;\203\301\302#\202\303A@\"\266\202\304!\211@A\305\211;\203.\301\302#\2024\303A@\"\266\202\306\"\307&\207" [:language get-text-property 0 plist-get org-export-unravel-code :retain-labels org-export-get-loc org-odt-do-format-code] 15 (#$ . 95089)])
#@168 Transcode a SRC-BLOCK element from Org to ODT.
CONTENTS holds the contents of the item.  INFO is a plist holding
contextual information.
 
(fn SRC-BLOCK CONTENTS INFO)
(defalias 'org-odt-src-block #[771 "\300\301\"\302\303#@\211\205\304\305\306#\307\"\310\311\"\204#\211\202-\304\305\312\313\314\211\211$#\262P\207" [org-export-read-attribute :attr_odt org-odt-format-label definition format "\n<text:p text:style-name=\"%s\">%s</text:p>" "Listing" org-odt-format-code plist-get :textbox "Text_20_body" org-odt--textbox nil] 15 (#$ . 95444)])
#@159 Transcode a STATISTICS-COOKIE object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual information.
 
(fn STATISTICS-COOKIE CONTENTS INFO)
(defalias 'org-odt-statistics-cookie #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304\305\306#\207" [:value get-text-property 0 plist-get format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgCode"] 9 (#$ . 96007)])
#@176 Transcode STRIKE-THROUGH from Org to ODT.
CONTENTS is the text with strike-through markup.  INFO is a plist
holding contextual information.
 
(fn STRIKE-THROUGH CONTENTS INFO)
(defalias 'org-odt-strike-through #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "Strikethrough"] 7 (#$ . 96411)])
#@166 Transcode a SUBSCRIPT object from Org to ODT.
CONTENTS is the contents of the object.  INFO is a plist holding
contextual information.
 
(fn SUBSCRIPT CONTENTS INFO)
(defalias 'org-odt-subscript #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgSubscript"] 7 (#$ . 96747)])
#@170 Transcode a SUPERSCRIPT object from Org to ODT.
CONTENTS is the contents of the object.  INFO is a plist holding
contextual information.
 
(fn SUPERSCRIPT CONTENTS INFO)
(defalias 'org-odt-superscript #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgSuperscript"] 7 (#$ . 97067)])
#@21 
 
(fn ELEMENT INFO)
(defalias 'org-odt-table-style-spec #[514 "\300!\301\302\"\303\304\"\305\303\306\"\"\207" [org-export-get-parent-table org-export-read-attribute :attr_odt plist-get :style assoc :odt-table-styles] 10 (#$ . 97394)])
#@724 Retrieve styles applicable to a table cell.
R and C are (zero-based) row and column numbers of the table
cell.  STYLE-SPEC is an entry in `org-odt-table-styles'
applicable to the current table.  It is nil if the table is not
associated with any style attributes.
 
Return a cons of (TABLE-CELL-STYLE-NAME . PARAGRAPH-STYLE-NAME).
 
When STYLE-SPEC is nil, style the table cell the conventional way
- choose cell borders based on row and column groupings and
choose paragraph alignment based on `org-col-cookies' text
property.  See also
`org-odt-get-paragraph-style-cookie-for-table-cell'.
 
When STYLE-SPEC is non-nil, ignore the above cookie and return
styles congruent with the ODF-1.2 specification.
 
(fn TABLE-CELL INFO)
(defalias 'org-odt-get-table-cell-styles #[514 "\300\"\211@A\301\"\302\303!\"\205\270A@\3048\305\236A\203/\306U\203/\307\202\263\310\236A\203BTAU\203B\311\202\263\312\236A\203S\306U\203S\313\202\263\314\236A\203fT@U\203f\315\202\263\316\236A\203y\304\246\317U\203y\320\202\263\316\236A\203\214\304\246\306U\203\214\321\202\263\322\236A\203\237\304\246\317U\203\237\323\202\263\322\236A\203\262\304\246\306U\203\262\324\202\263\325P\266\203\207" [org-export-table-cell-address org-odt-table-style-spec org-export-table-dimensions org-export-get-parent-table 2 use-first-column-styles 0 "FirstColumn" use-last-column-styles "LastColumn" use-first-row-styles "FirstRow" use-last-row-styles "LastRow" use-banding-rows-styles 1 "EvenRow" "OddRow" use-banding-columns-styles "EvenColumn" "OddColumn" ""] 12 (#$ . 97642)])
#@147 Transcode a TABLE-CELL element from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn TABLE-CELL CONTENTS INFO)
(defalias 'org-odt-table-cell #[771 "\303\"\211@A\304\"\206\305\306\211;\203\"\307\305#\202(\310A@\"\266\202\262\311\"\211\203=\312\313\"\206\226\314\"\315U\203U\316\317!\"\203U\320\202\213\317    !\321\322\"\310\323\"\211\205h\324!\262\325!\203wS\202\200\203\305\202\200\326X\266\203\203\212\320\202\213\327\330\331\332\f \"!!P\203\241\312\333\"\206\316\334\335\n\"\204\261\305U\205\262\336\337 \"\205\273\340\341 \f\"\205\315\305U?\205\315\342R\312\343\"\305V\205\336\312\344T\"P\n\204\347\345\262 \204\357\346\347!\210\350\312\351\211:\204\376\350\202 \211@9\203\n\211AA\202 \211\262\211@\350\211:\204\211;\205'\352\202'\211@9\205'\211@\262\206D\306\211;\203<\307\305#\202B\310A@\"\266\202>\203N\353\202\264    >\203X\354\202\264\355=\203b\354\202\264\352=\203l\353\202\264\204t\353\202\264\211\204|\354\202\264\211\211:\204\213\211;\205\223\352\202\223\211@9\205\223\211@\262\211\204\235\353\202\262\211\n>\203\247\353\202\262\356!\203\261\353\202\262\354\262\266\202\266\202\354=\203\302\202\311\312\357    #\262#\350\305\211W\203\344\211\360P\262\210\211T\262\202\320\211\262\266\202\262\361R\207" [org-element-all-objects org-element-all-elements org-element-object-containers org-export-table-cell-address org-export-table-cell-width 0 :parent get-text-property plist-get org-odt-get-table-cell-styles format "%sTableParagraph" org-export-table-row-group 1 org-export-table-has-header-p org-export-get-parent-table "OrgTableHeading" org-export-read-attribute :attr_odt :header-columns read wholenump -1 "OrgTableContents" capitalize symbol-name org-export-table-cell-alignment "%sTableCell" "OrgTblCell" org-export-table-row-starts-rowgroup-p "T" org-export-table-row-ends-rowgroup-p "B" org-export-table-cell-starts-colgroup-p "L" " table:style-name=\"%s\"" " table:number-columns-spanned=\"%d\"" "" cl--assertion-failed paragraph-style nil "\n<table:table-cell%s>\n%s\n</table:table-cell>" plain-text object element org-data org-element-secondary-p "\n<text:p text:style-name=\"%s\">%s</text:p>" "\n<table:covered-table-cell/>" "\n"] 26 (#$ . 99245)])
#@165 Transcode a TABLE-ROW element from Org to ODT.
CONTENTS is the contents of the row.  INFO is a plist used as a
communication channel.
 
(fn TABLE-ROW CONTENTS INFO)
(defalias 'org-odt-table-row #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\304=\205M\305\"\306U\2032\307\310!\"\2032\311\2023\312\313\"\205<\211@\314\315\"\316\"\205JAQ\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 ("\n<table:table-header-rows>" . "\n</table:table-header-rows>") ("\n<table:table-rows>" . "\n</table:table-rows>") org-export-table-row-starts-rowgroup-p format "\n<table:table-row>\n%s\n</table:table-row>" org-export-table-row-ends-rowgroup-p] 9 (#$ . 101607)])
#@19 
 
(fn TABLE INFO)
(defalias 'org-odt-table-first-row-data-cells #[514 "\300\301\302\303%\304!\211\204*\211:\204\305\202%\211@9\203$\211AA\202%\211\262\202D\211:\2044\305\202A\211@9\203@\211AA\202A\211\262A\207" [org-element-map table-row #[257 "\300\211;\203\301\302#\202\303A@\"\266\202\304=?\205\211\207" [:type get-text-property 0 plist-get rule] 7 "\n\n(fn ROW)"] first-match org-export-table-has-special-column-p nil] 8 (#$ . 102383)])
#@158 Transcode a TABLE element from Org to ODT.
CONTENTS is the contents of the table.  INFO is a plist holding
contextual information.
 
(fn TABLE CONTENTS INFO)
(defalias 'org-odt--table #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\211\304\267\202%\305\306\307!\210\202t\310\311#\211@A\312\313\"\314\"A@\315\205F\316\317\320#\321\320\"\316\322\206VA\206V\323\205`\316\324\n\"\260#\262 \f#\325\f\326\260\266\206\207" [:type get-text-property 0 plist-get #s(hash-table size 1 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (table\.el 29)) nil message "(ox-odt): Found table.el-type table in the source Org file.  table.el doesn't support export to ODT format.  Stripping the table from export." org-odt-format-label definition org-export-read-attribute :attr_odt org-odt-table-style-spec #[771 "\206\300\301\302\"\303\304\305\306\307\310\"\311\"\312\313%\314\"\315#\207" ["OrgTable" format "%sColumn" mapconcat make-byte-code 257 "\302\300\"\206\303T\304\305\301\"\306\303\211W\203$\211P\262\210\211T\262\202\211\262\266\202\207" vconcat vector [org-export-table-cell-width 0 format "\n<table:table-column table:style-name=\"%s\"/>" nil] 9 "\n\n(fn TABLE-CELL)" org-odt-table-first-row-data-cells "\n"] 13 "\n\n(fn CUSTOM-TABLE-STYLE TABLE INFO)"] format "\n<text:p text:style-name=\"%s\">%s</text:p>" "Table" org-odt-add-automatic-style "\n<table:table table:style-name=\"%s\"%s>" "OrgTable" " table:name=\"%s\"" "\n" "</table:table>"] 18 (#$ . 102860)])
#@250 Transcode a TABLE element from Org to ODT.
CONTENTS is the contents of the table.  INFO is a plist holding
contextual information.
 
Use `org-odt--table' to typeset the table.  Handle details
pertaining to indentation here.
 
(fn TABLE CONTENTS INFO)
(defalias 'org-odt-table #[771 "\300\301\211#\302\303\304\302#\305#\306\304\"G\307\245\310\311\"\205)\312\"\266\203\303\313\237\302#R\207" [#[514 "\300\301#\302\301\302:\203=@\262\211:\204 \211;\205(\303\202(\211@9\205(\211@\262\304=\211\262?\211\262\203=A\262\202\207" [org-export-get-previous-element t nil plain-text table] 8 "\n\n(fn ELEMENT INFO)"] #[771 "\300!\211@\211:\204\211;\205\301\202\211@9\205\211@\262\302=\205\\\211\303\211:\203X@\262\211:\204=\211;\205E\301\202E\211@9\205E\211@\262\304>\203QB\262A\262\202%\211\237\266\203\305\306\303\211:\203\321@\262\211:\204y\211;\205\201\301\202\201\211@9\205\201\211@\262\307=\203\312\310    \"\203\312\307\311\211;\203\242\312\313#\202\250\314A@\"\266\202\262\211:\204\265\303\202\302\211@9\203\301\211AA\202\302\211\262\236DB\262A\262\202a\211\237\266\203\"\303\303\211:\203t@\262\211:\204\362\211;\205\372\301\202\372\211@9\205\372\211@\262\211\315\267\202f\262\316\317\320\321\211;\203\312\313#\202\314A@\"\266\202\211\322\267\2026\323\2027\324\2027\325\2027\325\2027\303\262\326#B\202g\204U\n\n\n\"\203Q\327\202g\330\202g\n\n\"\203b\331\202g\332\202g\303\262B\262A\262\202\332\211\237\266\203\303\302\303:\203@\262\333\267\202\302\262\262\316\317\320\334\"\203\241\323\202\242\324\326#B\202\335\262\204\301   \"\203\275\336\202\337\202\340 \"\211\205\211\211:\204\332\211;\205\342\301\202\342\211@9\205\342\211@\262\341=\205\342\211:\204\364\303\202\211@9\203\211AA\202\211\262\236\262\203 \343\202\344\202\303B\262A\262\202|\211\237\266\204\244\207" [org-element-lineage plain-text item nil (item plain-list) apply nconc headline org-export-low-level-p :parent get-text-property 0 plist-get #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-list 258 item 319)) "</text:list>" format "\n<text:list text:style-name=\"%s\" %s>" :type #s(hash-table size 4 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (ordered 294 unordered 298 descriptive-1 302 descriptive-2 306)) "OrgNumberedList" "OrgBulletedList" "OrgDescriptionList" "text:continue-numbering=\"true\"" ("</text:list-header>" . "<text:list-header>") ("</text:list-item>" . "<text:list-header>") ("</text:list-header>" . "<text:list-header>") ("</text:list-item>" . "<text:list-item>") #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (plain-list 395 item 424)) org-export-numbered-headline-p plain-list ("</text:list-header>" . "<text:list-header>") ("</text:list-item>" . "<text:list-header>") org-export-get-previous-element section table ("</text:list-header>" . "<text:list-header>") ("</text:list-item>" . "<text:list-item>")] 20 "\n\n(fn --ELEMENT-PRECEDED-BY-TABLE-P TABLE INFO)"] "\n" mapconcat car org-odt--table mapcar 2 format "OrgIndentedSection-Level-%d" org-odt-format-section cdr] 14 (#$ . 104407)])
#@137 Transcode a TARGET object from Org to ODT.
CONTENTS is nil.  INFO is a plist holding contextual
information.
 
(fn TARGET CONTENTS INFO)
(defalias 'org-odt-target #[771 "\300\301\302\"\"\207" [org-odt--target "" org-export-get-reference] 8 (#$ . 107703)])
#@144 Transcode a TIMESTAMP object from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn TIMESTAMP CONTENTS INFO)
(defalias 'org-odt-timestamp #[771 "\300\211;\203\301\302#\202\303A@\"\266\202\303\304\"\204a\305\306!\"\300\211;\2033\301\302#\2029\303A@\"\266\202\307\310\"\203J\311\312\313#\202Z\307\314\"\203Y\311\312\315#\202Z\262\262\202\265\211\316\267\202\251\311\312\313\311\317\320    !\"#\202\265\311\312\315\311\321\320    !\"#\202\265\311\312\313\311\322\320    !\320\n\323\"##\202\265\311\312\315\311\324\320    !\320\n\323\"##\202\265\311\312\325\305\306!\"#\207" [:type get-text-property 0 plist-get :odt-use-date-fields org-odt-plain-text org-timestamp-translate memql (active active-range) format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgActiveTimestamp" (inactive inactive-range) "OrgInactiveTimestamp" #s(hash-table size 4 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (active 103 inactive 117 active-range 131 inactive-range 150)) "&lt;%s&gt;" org-odt--format-timestamp "[%s]" "&lt;%s&gt;&#x2013;&lt;%s&gt;" end "[%s]&#x2013;[%s]" "OrgDiaryTimestamp"] 13 (#$ . 107967)])
#@161 Transcode UNDERLINE from Org to ODT.
CONTENTS is the text with underline markup.  INFO is a plist
holding contextual information.
 
(fn UNDERLINE CONTENTS INFO)
(defalias 'org-odt-underline #[771 "\300\301\302#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "Underline"] 7 (#$ . 109160)])
#@142 Transcode a VERBATIM object from Org to ODT.
CONTENTS is nil.  INFO is a plist used as a communication
channel.
 
(fn VERBATIM CONTENTS INFO)
(defalias 'org-odt-verbatim #[771 "\300\301\302\303\304\211;\203\305\306#\202\307A@\"\266\202!#\207" [format "<text:span text:style-name=\"%s\">%s</text:span>" "OrgCode" org-odt--encode-plain-text :value get-text-property 0 plist-get] 13 (#$ . 109473)])
#@165 Transcode a VERSE-BLOCK element from Org to ODT.
CONTENTS is verse block contents.  INFO is a plist holding
contextual information.
 
(fn VERSE-BLOCK CONTENTS INFO)
(defalias 'org-odt-verse-block #[771 "\300\301\302\303\304\302\305\306    ##\"\207" [format "\n<text:p text:style-name=\"OrgVerse\">%s</text:p>" replace-regexp-in-string "^[     ]+" org-odt--encode-tabs-and-spaces "\\(<text:line-break/>\\)?[     ]*$" "<text:line-break/>"] 12 (#$ . 109885)])
#@26 
 
(fn DATA BACKEND INFO)
(defalias 'org-odt--translate-image-links #[771 "\301#\207" [org-odt-inline-image-rules org-export-insert-image-links] 7 (#$ . 110339)])
#@26 
 
(fn TREE BACKEND INFO)
(defalias 'org-odt--translate-latex-fragments #[771 "\300\301\"C\302C\303\242\304\"\203,\305\306!\203!\306 \203!\307\240\210\202\232\310\311!\210\312\240\210\202\232\303\242\313\"\203\222\314\315\316\317!\206S\211?\205S\320\321\203Q\322\323\"\202R\315#\266\203\203\207\242\324=\203c\325\202d\326\315\316\317!\206\202\211?\205\202\320\321\203\200\322\323\"\202\201\315#\266\203\204\232\310\327!\210\312\240\210\202\232\310\330!\210\312\240\210\300\301\"\203\250\331\301\242#\210\310\332\242\"\210\242\333>\203\321\334\335\336\337\340\341\342\n\n\n#\343\"\344\345%\346\211\316&\210\266\207" [plist-get :with-latex 0 memql (t mathml) fboundp org-format-latex-mathml-available-p mathml message "LaTeX to MathML converter not available." verbatim (dvipng imagemagick) "latex" "" t executable-find error "Can't find `%s'%s" format " (%s)" dvipng "dvipng" "convert" "LaTeX to PNG converter not available." "Unknown LaTeX option.  Forcing verbatim." plist-put "Formatting LaTeX using %s" (mathml dvipng imagemagick) org-element-map (latex-fragment latex-environment) make-byte-code 257 "\302\211\242T\240\210\303\211;\203\304\305#\202\306A@\"\266\202\306\300\307\"\310!\311\301\242\312\"\2030\313\2029\314\301\242\315\"\2059\316\317\320!!P\311\301\242\321\"\203O\322\323\302\242\"\202\\\314\301\242\315\"\205\\\322\324\302\242\"\325\326!r\211q\210\327\305\330\331\332!\333\"\334$\216c\210\301\242\315=\204\213\306\300\335\"\211\203\212\336\337\340\341#\261\210\210\342\343\211\343\343\301\242&\210eb\210\344\343w\210\345 *\262\211\211:\204\265\211;\205\275\346\202\275\211@9\205\275\211@\262\347=\204\312\350\351!\202 \211:\204\332\211;\205\342\346\202\342\211@9\205\342\211@\262\211\352\267\202\220\353\354\355\356\211\f\211;\203\376\304\305#\202\306A@\"\266\202\357\211\211;\203\304\305#\202\306A@\"\266\202\257DC\211\204,\202\207\211\211\203]\211@\211\360\206:;\203I\361\343$\210\202TA\362A@#\240\210\266A\266\202\202-\210\203\202\363\364\211\211:\204o\343\202|\211@9\203{\211AA\202|\211\262\244#\210\206\207\211\266\202\202\221\202\221\343\262\211\365    \211:\204\245\211;\205\255\346\202\255\211@9\205\255\211@\262\303\nDD;\203\303\361\343$\210\202\316A\362A@#\240\210\266\211\366\211\n\211;\203\342\304\305#\202\350\306A@\"\266\202;\203\371\361\343$\210\202A\362A@#\240\210\266\367\"\262\207" vconcat vector [:value get-text-property 0 plist-get :input-file file-name-directory memql (dvipng imagemagick) "ltxpng/" eql mathml "ltxmathml/" file-name-sans-extension file-name-nondirectory (dvipng imagemagick) format "Creating LaTeX Image %d..." "Creating MathML snippet %d..." generate-new-buffer " *temp*" make-byte-code "\301\300!\205    \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 :latex-header "\n" replace-regexp-in-string "^" "#+LATEX_HEADER: " org-format-latex nil "     \n" org-element-link-parser plain-text link message "LaTeX Conversion failed." #s(hash-table size 2 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (latex-environment 234 latex-fragment 396)) paragraph :style "OrgFormula" :name :caption :parent org-add-props plist-put apply org-element-set-contents :replaces :post-blank org-element-set-element] 20 "\n\n(fn LATEX-*)" nil] 16 (#$ . 110510)])
#@26 
 
(fn TREE BACKEND INFO)
(defalias 'org-odt--translate-description-lists #[771 "\300\301\302$\210\207" [org-element-map plain-list #[257 "\300\211;\203\301\302#\202\303A@\"\266\202\304=\203E\305\306\307\310\300\311DD\312\313\211:\2042\314\202?\211@9\203>\211AA\202?\211\262\"#\"\210\314\207" [:type get-text-property 0 plist-get descriptive org-element-set-element apply org-element-adopt-elements plain-list descriptive-1 mapcar #[257 "\300\301\211\211;\203\302\303#\202\304A@\"\266\202DD\305\306\307D\310\211;\203.\302\303#\2024\304A@\"\266\202\206:\311E\312\313\314DD\315\316\300\317D\211:\204P\317\202]\211@9\203\\\211AA\202]\211\262#C\211\204i\202\304\211\211\203\232\211@\211\320\206w;\203\206\321\317$\210\202\221A\322A@#\240\210\266A\266\202\202j\210\203\277\315\323\211\211:\204\254\317\202\271\211@9\203\270\211AA\202\271\211\262\244#\210\206\304\211\266\202D\211\204\317\202*\211\211\203\211@\211\320\206\335;\203\354\321\317$\210\202\367A\322A@#\240\210\266A\266\202\202\320\210\203%\315\323\211\211:\204\317\202\211@9\203\211AA\202\211\262\244#\210\206*\211\207" [item :checkbox get-text-property 0 plist-get paragraph :style "Text_20_body_20_bold" :tag "(no term)" plain-list :type descriptive-2 apply org-element-adopt-elements nil :parent org-add-props plist-put org-element-set-contents] 15 "\n\n(fn ITEM)"] nil] 10 "\n\n(fn EL)"]] 8 (#$ . 113927)])
#@26 
 
(fn TREE BACKEND INFO)
(defalias 'org-odt--translate-list-tables #[771 "\300\301\302\303\304\305\306!\307\"\310\311%$\210\207" [org-element-map plain-list make-byte-code 257 "\301\302\303#\203'\304\305\306\307\310D\311\312\313\314\315\316\317\300!\320\"\321\322%\300\323\312&#\"\210\323\207" vconcat vector [org-export-read-attribute :attr_odt :list-table org-element-set-element apply org-element-adopt-elements table (:type org :attr_odt (":style \"GriddedTable\"")) org-element-map item make-byte-code 257 "\211\211:\204\n\301\202\211@9\203\211AA\202\211\262\301\211\301\203J@\211:\2041\211;\2059\302\2029\211@9\2059\211@\262\303=\204J\262A\262\202\211\203V\211\301\241\210@\262\262\266\304\305\306\307\310DD\304\305\311\301D#\312\313\314\300\301\313&$\207" vconcat vector [nil plain-text plain-list apply org-element-adopt-elements table-row :type standard table-cell org-element-map item #[257 "\300\301\302\303D\211:\204\303\202\211@9\203\211AA\202\211\262#\207" [apply org-element-adopt-elements table-cell nil] 6 "\n\n(fn L2-ITEM)"]] 15 "\n\n(fn L1-ITEM)" nil] 15 "\n\n(fn L1-LIST)"] 12 (#$ . 115412)])
#@19 
 
(fn &rest ARGS)
(defalias 'org-odt-create-manifest-file-entry #[128 "\211B\211\207" [org-odt-manifest-file-entries] 3 (#$ . 116586)])
(defalias 'org-odt-write-manifest-file #[0 "\304\305P!\210\306Pr\307\310\311\")q\210\312c\210\n\211\203?\211@\3138\211\204(\314\202,\315\316\"\315 @A@$c\266A\266\202\202\210\317c)\207" [org-odt-zip-dir nxml-auto-insert-xml-declaration-flag org-odt-manifest-file-entries org-odt-manifest-file-entry-tag make-directory "META-INF" "META-INF/manifest.xml" nil find-file-noselect t "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n     <manifest:manifest xmlns:manifest=\"urn:oasis:names:tc:opendocument:xmlns:manifest:1.0\" manifest:version=\"1.2\">\n" 2 "" format " manifest:version=\"%s\"" "\n</manifest:manifest>"] 10])
#@28 
 
(fn OUT-FILE &rest BODY)
(defalias 'org-odt--export-wrap '(macro . #[385 "\300\301D\302B\303\304\305\306\305B\307BBB\310BBBE\207" [let* --out-file ((out-file-type (file-name-extension --out-file)) (org-odt-xml-files '("META-INF/manifest.xml" "content.xml" "meta.xml" "styles.xml")) (org-odt-zip-dir (file-name-as-directory (make-temp-file (format "%s-" out-file-type) t))) (org-odt-manifest-file-entries nil) (--cleanup-xml-buffers (lambda nil (dolist (file org-odt-xml-files) (let ((buf (find-buffer-visiting (concat org-odt-zip-dir file)))) (when buf (with-current-buffer buf (set-buffer-modified-p nil) (kill-buffer buf))))) (delete-directory org-odt-zip-dir t)))) condition-case err progn (unless (executable-find "zip") (error "Executable \"zip\" needed for creating OpenDocument files")) ((org-odt-create-manifest-file-entry "text/xml" "content.xml") (let* ((mimetypes '(("odt" . "application/vnd.oasis.opendocument.text") ("odf" . "application/vnd.oasis.opendocument.formula"))) (mimetype (cdr (assoc-string out-file-type mimetypes t)))) (unless mimetype (error "Unknown OpenDocument backend %S" out-file-type)) (write-region mimetype nil (concat org-odt-zip-dir "mimetype")) (org-odt-create-manifest-file-entry mimetype "/" "1.2")) (org-odt-write-manifest-file) (dolist (file org-odt-xml-files) (let ((buf (find-buffer-visiting (concat org-odt-zip-dir file)))) (when buf (with-current-buffer buf (when org-odt-prettify-xml (indent-region (point-min) (point-max))) (save-buffer 0))))) (let* ((target --out-file) (target-name (file-name-nondirectory target)) (cmds `(("zip" "-mX0" ,target-name "mimetype") ("zip" "-rmTq" ,target-name ".")))) (when (file-exists-p target) (delete-file target)) (let ((coding-system-for-write 'no-conversion) exitcode err-string) (message "Creating ODT file...") (with-current-buffer (find-file-noselect (concat org-odt-zip-dir "content.xml") t) (dolist (cmd cmds) (message "Running %s" (mapconcat 'identity cmd " ")) (setq err-string (with-output-to-string (setq exitcode (apply 'call-process (car cmd) nil standard-output nil (cdr cmd))))) (or (zerop exitcode) (error (concat "Unable to create OpenDocument file." "  Zip failed with error (%s)") err-string))))) (rename-file (concat org-odt-zip-dir target-name) target) (message "Created %s" (expand-file-name target)) (funcall --cleanup-xml-buffers) (find-file-noselect target t) (cond (org-odt-preferred-output-format (or (org-odt-convert target org-odt-preferred-output-format) target)) (t target)))) ((error (funcall --cleanup-xml-buffers) (message "OpenDocument export failed: %s" (error-message-string err))))] 10 (#$ . 117361)]))
#@418 Export LATEX-FRAG as OpenDocument formula file ODF-FILE.
Use `org-create-math-formula' to convert LATEX-FRAG first to
MathML.  When invoked as an interactive command, use
`org-latex-regexps' to infer LATEX-FRAG from currently active
region.  If no LaTeX fragments are found, prompt for it.  Push
MathML source to kill ring depending on the value of
`org-export-copy-to-kill-ring'.
 
(fn LATEX-FRAG &optional ODF-FILE)
(defalias 'org-odt-export-as-odf #[513 "\211\206\306\307\310!!\311\312Q\313!\"\211\314!\315\316\317\320\321\"\322\"!\323\324\3251x\326\327!\2041\330\331!\210\332\333!\210\323\334    \335P\322\")\336\211\211q\210\337\f!\210\340!\211\204U\330\341!\210\211c\210\342 \203b\343\344 !\210\210*\210\345\346\335\"\210\347\350\322#A\211\204{\330\351\"\210\352\323    \353P#\210\345\354\355#\266\356 \210\211\203\270\211@\357    P!\211\203\260r\211q\210@\203\253\360ed\"\210\361\362!\210)\210A\266\202\202\216\210\310!\327\363\364BBB\327\365\366BBBD\367!\203\326\370!\210\371\323\211\372\373!\210r\334    \335P\322\"q\210\211\203?\211@\372\374\375\376\377#\"\210\201C\201D\201E!!A\201F\216AA\201G\201H@\323A\323A&\262)rAq\210\344 +\262\362U\2048\330\201I\"\210A\266\202\202\351\210*\266\201J    P\"\210\372\201K\306!\"\210!\210\334\322\"\210B\203q\201LB\"\206r\202r\266\2030\202\210!\210\372\201M\201N!\"\262*\266\204\207" [buffer-file-name org-odt-zip-dir org-odt-manifest-file-entries nxml-auto-insert-xml-declaration-flag coding-system-for-write save-buffer-coding-system expand-file-name file-name-sans-extension file-name-nondirectory "." "odf" file-name-directory file-name-extension ("META-INF/manifest.xml" "content.xml" "meta.xml" "styles.xml") file-name-as-directory make-temp-file format "%s-" t nil #[257 "\211\211\203%\211@\301P!\211\203r\211q\210\302\303!\210\304!\210)\210A\266\202\202\210\305\306\"\207" [org-odt-zip-dir find-buffer-visiting set-buffer-modified-p nil kill-buffer delete-directory t] 6 "\n\n(fn ORG-ODT-XML-FILES)"] (error) executable-find "zip" error "Executable \"zip\" needed for creating OpenDocument files" require nxml-mode find-file-noselect "content.xml" utf-8 set-buffer-file-coding-system org-create-math-formula "No Math formula created" org-export--copy-to-kill-ring-p org-kill-new buffer-string org-odt-create-manifest-file-entry "text/xml" (("odt" . "application/vnd.oasis.opendocument.text") ("odf" . "application/vnd.oasis.opendocument.formula")) assoc-string "Unknown OpenDocument backend %S" write-region "mimetype" "/" "1.2" org-odt-write-manifest-file find-buffer-visiting indent-region save-buffer 0 "-mX0" ("mimetype") "-rmTq" (".") file-exists-p delete-file no-conversion message "Creating ODT file..." "Running %s" mapconcat identity " " org-odt-prettify-xml standard-output org-odt-preferred-output-format get-buffer-create generate-new-buffer-name " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] apply call-process "Unable to create OpenDocument file.  Zip failed with error (%s)" rename-file "Created %s" org-odt-convert "OpenDocument export failed: %s" error-message-string] 23 (#$ . 119999) (byte-code "\302\303 \205 \304 \305 {\211\262\205B\302\306\302:\203@@\262\307A@\"\205/\310\3118\"\211\262?\211\262\203@A\262\202\266\203\262\312\313\302$\262\314\315\316    !!\317\320Q\321    !\"\322\323\302\302\316!%\262D\207" [org-latex-regexps buffer-file-name nil region-active-p region-beginning region-end t string-match match-string 2 read-string "LaTeX Fragment: " expand-file-name file-name-sans-extension file-name-nondirectory "." "odf" file-name-directory read-file-name "ODF filename: "] 9)])
#@154 Export LaTeX fragment as OpenDocument formula and immediately open it.
Use `org-odt-export-as-odf' to read LaTeX fragment and OpenDocument
formula file.
(defalias 'org-odt-export-as-odf-and-open #[0 "\300\301\302!\303\"\207" [org-open-file call-interactively org-odt-export-as-odf system] 3 (#$ . 123704) nil])
#@780 Export current buffer to a ODT 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.
 
EXT-PLIST, when provided, is a property list with external
parameters overriding Org default settings, but still inferior to
file-local settings.
 
Return output file's name.
 
(fn &optional ASYNC SUBTREEP VISIBLE-ONLY EXT-PLIST)
(defalias 'org-odt-export-to-odt #[1024 "\306\307\"\203\310\311C\312\313\314\315\316\"\317\"\320$\216\203(\211\321 \240\210\322\323\"\210\324p!\325\326!\327\330\331!!\312\313\332\315\316!\333\"\334$\216r\211q\210\335\336\337\340\341\342\343\fD\344\345\346\347\350\351\352\353\354\355\356\357\311 \257DD\360BBEEDDD\257#c\210)r\211q\210\361\311\211\311\313%\210*\266\311\330\362!\363\364\365\326\347\n \"\366F\f\203\241\367\370\fE\202\244\370 D\370D#\"\371\372!\311#\210\373\374\375\376\353\377\201L\201M\201N\201O\201P\201N\353\201Q\343\201RBBE\201SBB\201TBBB\201U\201V\201WDEEEEE\"\262)\266\202\266\203)\266\202\202\357\211\201X!\201Y\201Z\325\335\201[\"\201\\\"!@\311A\201]\201^1\334\201_\201`!\204:\201a\201b!\210\313\211BC\311\211DE\311F\356\201c        \311\n%\201d\201e!\210\311G\201f@\201gP\201\\\")r\211q\210\201h \210c\210)\266-\201i\201j\201g\"\210\201k\201l\201\\#A\211\204\244\201a\201m\"\210\361\311@\201nP#\210\201i\201o\201p#\266\201q \210\211\203\363\211@\201r@P!\211\203\353r\211q\210H\203\344\201sed\"\210\201t\313!\210)\210A\266\202\202\302\210\201u!\201`\201v\201wBBB\201`\201x\201yBBBD\201z!\203#\201W!\210\201{\311\211I\322\201|!\210r\201f@\201gP\201\\\"q\210\211\203\236\211@\322\201}\201~\201\201\200#\"\210\327\330\201\201!!J\201\202\216JJ\363\201\203@\311J\311A&\262)rJq\210\201\204 +\262\313U\204\227\201a\201\205\"\210A\266\202\202B\210*\266\201\206@P\"\210\322\201\207\347!\"\210!\210\201f\201\\\"\210K\203\325\201\210K\"\206\326\202\326\266\2030\202\354!\210\322\201\211\201\212!\"\262*\266\204\207" [buffer-file-coding-system process-connection-type invocation-name invocation-directory org-export-async-init-file user-init-file org-export-output-file-name ".odt" "Initializing asynchronous export process" nil make-byte-code 0 "\300\205\301\242\203\302\303\301\242\"\207\302\304!\207" vconcat vector [message #1="%s" nil] 3 current-message message #1# org-export--generate-copy-script make-temp-file "org-export-process" get-buffer-create generate-new-buffer-name " *temp file*" "\301\300!\205    \302\300!\207" [buffer-name kill-buffer] 2 format ";; -*- coding: %s; -*-\n%S" with-temp-buffer (when org-export-async-debug '(setq debug-on-error t)) (setq kill-emacs-hook nil org-babel-confirm-evaluate-answer-no t) (require 'ox) funcall (restore-buffer-modified-p nil) print progn expand-file-name org-odt--export-wrap let* ((org-odt-embedded-images-count 0) (org-odt-embedded-formulas-count 0) (org-odt-automatic-styles nil) (org-odt-object-counters nil) (hfy-user-sheet-assoc nil)) let (out-buf (progn (require 'nxml-mode) (let ((nxml-auto-insert-xml-declaration-flag nil)) (find-file-noselect (concat org-odt-zip-dir "content.xml") t)))) output org-export-as 'odt ((with-current-buffer out-buf (erase-buffer) (insert output))) write-region "*Org Export Process*" apply start-process append "--batch" "-Q" "-l" org-export-add-to-stack get-buffer #[257 "\300\301\"\207" [org-export-add-to-stack odt] 4 "\n\n(fn F)"] set-process-sentinel lambda (p status) ((proc-buffer (process-buffer p))) org-odt-zip-dir org-odt-manifest-file-entries org-odt-embedded-images-count org-odt-embedded-formulas-count org-odt-automatic-styles org-odt-object-counters hfy-user-sheet-assoc nxml-auto-insert-xml-declaration-flag org-odt-prettify-xml coding-system-for-write standard-output org-odt-preferred-output-format when (eq (process-status p) 'exit) unwind-protect if (zerop (process-exit-status p)) ((results (with-current-buffer proc-buffer (goto-char (point-max)) (backward-sexp) (read (current-buffer))))) (results) ((unless org-export-async-debug (and (get-buffer proc-buffer) (kill-buffer proc-buffer)))) ((org-export-add-to-stack proc-buffer nil p) (ding) (message "Process `%s' exited abnormally" p)) unless org-export-async-debug delete-file file-name-extension ("META-INF/manifest.xml" "content.xml" "meta.xml" "styles.xml") file-name-as-directory "%s-" t #[257 "\211\211\203%\211@\301P!\211\203r\211q\210\302\303!\210\304!\210)\210A\266\202\202\210\305\306\"\207" [org-odt-zip-dir find-buffer-visiting set-buffer-modified-p nil kill-buffer delete-directory t] 6 "\n\n(fn ORG-ODT-XML-FILES)"] (error) executable-find "zip" error "Executable \"zip\" needed for creating OpenDocument files" odt require nxml-mode find-file-noselect "content.xml" erase-buffer org-odt-create-manifest-file-entry "text/xml" (("odt" . "application/vnd.oasis.opendocument.text") ("odf" . "application/vnd.oasis.opendocument.formula")) assoc-string "Unknown OpenDocument backend %S" "mimetype" "/" "1.2" org-odt-write-manifest-file find-buffer-visiting indent-region save-buffer file-name-nondirectory "-mX0" ("mimetype") "-rmTq" (".") file-exists-p no-conversion "Creating ODT file..." "Running %s" mapconcat identity " " " *string-output*" #[0 "\301!\207" [standard-output kill-buffer] 2] call-process buffer-string "Unable to create OpenDocument file.  Zip failed with error (%s)" rename-file "Created %s" org-odt-convert "OpenDocument export failed: %s" error-message-string] 38 (#$ . 124022) nil])
#@76 Return non-nil if IN-FMT can be converted to OUT-FMT.
 
(fn IN-FMT OUT-FMT)
(defalias 'org-odt-reachable-p #[514 "\3002,\301!\211\211\205'\211@\302A\"\211\203\303\300@B\"\210\210A\266\202\202\262\2620\207" [done org-odt-do-reachable-formats assoc throw] 10 (#$ . 130026)])
#@79 Workhorse routine for `org-odt-convert'.
 
(fn IN-FILE OUT-FMT &optional OPEN)
(defalias 'org-odt-do-convert #[770 "\301\302!\210\303\206\n!\304!\203\211\202\305\306\"\262\307!\206%\305\310!\311\"\2061\305\312#\211@\313!\314A\206=A@Q\315A8\206H\316\317!\320\321\322 !B\323\324\f!B\325\nB\326B\327\324\n!B\330\322    !B\331\324\n!B\332 B\257\"\333!\203\205\334!\210\335\336\"\210\337!\335\340\"\266\333!\203\261\335\341\"\210    \203\255\335\342\"\210\343\344\"\210\202\267\335\345\"\210\346\207" [buffer-file-name require browse-url expand-file-name file-readable-p error "Cannot read %s" file-name-extension "Output format unspecified" org-odt-reachable-p "Cannot convert from %s format to %s format?" file-name-sans-extension "." 2 "" file-name-directory format-spec 105 shell-quote-argument 73 browse-url-file-url 102 111 79 100 68 120 file-exists-p delete-file message "Executing %s" shell-command-to-string "%s" "Exported to %s" "Opening %s..." org-open-file system "Export to %s failed" nil] 22 (#$ . 130318)])
#@286 Return verbose info about formats to which IN-FMT can be converted.
Return a list where each element is of the
form (CONVERTER-PROCESS . OUTPUT-FMT-ALIST).  See
`org-odt-convert-processes' for CONVERTER-PROCESS and see
`org-odt-convert-capabilities' for OUTPUT-FMT-ALIST.
 
(fn IN-FMT)
(defalias 'org-odt-do-reachable-formats #[257 "\205 \303    \304#A@\205\303    \304#A@\205\n\305\203?\211\203>\211@A@\235\2037\3068BB\262A\266\202\202 \210\207" [org-odt-convert-process org-odt-convert-processes org-odt-convert-capabilities assoc-string t nil 2] 9 (#$ . 131389)])
#@125 Return list of formats to which IN-FMT can be converted.
The list of the form (OUTPUT-FMT-1 OUTPUT-FMT-2 ...).
 
(fn IN-FMT)
(defalias 'org-odt-reachable-formats #[257 "\300\301\302\303\304\305!\"\"!\207" [copy-sequence apply append mapcar #[257 "\300\301A\"\207" [mapcar car] 4 "\n\n(fn E)"] org-odt-do-reachable-formats] 8 (#$ . 131978)])
#@107 Return IN-FILE and OUT-FMT params for `org-odt-do-convert'.
This is a helper routine for interactive use.
(defalias 'org-odt-convert-read-params #[0 "\301\302!\203\n\303\202 \304\305\306\307\310$\311!\312!\211\203%\313\307\211\211%\206)\314\315\"D\207" [buffer-file-name featurep ido ido-completing-read completing-read read-file-name "File to be converted: " nil t file-name-extension org-odt-reachable-formats "Output format: " error "No known converter or no known output formats for %s files"] 10 (#$ . 132328)])
#@373 Convert IN-FILE to format OUT-FMT using a command line converter.
IN-FILE is the file to be converted.  If unspecified, it defaults
to variable `buffer-file-name'.  OUT-FMT is the desired output
format.  Use `org-odt-convert-process' as the converter.  If OPEN
is non-nil then the newly converted file is opened using
`org-open-file'.
 
(fn &optional IN-FILE OUT-FMT OPEN)
(defalias 'org-odt-convert #[768 "\300#\207" [org-odt-do-convert] 7 (#$ . 132864) (byte-code "\301\302 \"\207" [current-prefix-arg append org-odt-convert-read-params] 3)])
(byte-code "\211\203\211@\301\302\303@\304Q\305B\"\210A\266\202\202\210\306\307!\207" [org-odt-file-extensions add-to-list auto-mode-alist "\\." "\\'" archive-mode provide ox-odt] 7)