From: Po Lu <luangruo@yahoo.com>
To: Kyle Meyer <kyle@kyleam.com>
Cc: emacs-devel@gnu.org, Ihor Radchenko <yantar92@posteo.net>
Subject: Re: master 5a125fb5a97 1/2: Update to Org 9.7.3
Date: Mon, 10 Jun 2024 11:45:10 +0800 [thread overview]
Message-ID: <8734plcvg9.fsf@yahoo.com> (raw)
In-Reply-To: <87h6e1lhtd.fsf@kyleam.com> (Kyle Meyer's message of "Sun, 09 Jun 2024 21:14:54 -0400")
[-- Attachment #1: Type: text/plain, Size: 511 bytes --]
Kyle Meyer <kyle@kyleam.com> writes:
> Po Lu writes:
>
>> This interferes with bootstrapping org.texi, for which I've installed a
>> temporary workaround that you should revert once the error is resolved
>> on Org's part.
>
> Could you please provide more details about the error? I don't see any
> specifics mentioned in 8d1d9798f77 (Fix bootstrap of org.texi), and
> running 'make bootstrap' on its parent commit (77d0eed74e1) completes
> without errors for me.
Yes, here's a complete backtrace from Org:
[-- Attachment #2: backtrace.txt --]
[-- Type: text/plain, Size: 568672 bytes --]
GEN org.texi
Could not read ‘org-id-locations’ from ~/.emacs.d/.org-id-locations, setting it to nil
Executing Emacs-Lisp code block at position 643527...
Error: arith-error nil
ceiling(0 0)
(if pixels pixel-width (ceiling pixel-width symbol-width))
(let (pixel-width symbol-width) (let* ((modified (buffer-modified-p)) (buffer-undo-list t) (inhibit-read-only t) (inhibit-modification-hooks t)) (unwind-protect (progn (erase-buffer) (insert string) (setq pixel-width (org-buffer-text-pixel-width)) (if pixels nil (erase-buffer) (insert (propertize "a" 'face (or default-face 'default))) (setq symbol-width (org-buffer-text-pixel-width)))) (if (memq modified '(nil autosaved)) (progn (restore-buffer-modified-p modified))))) (if pixels pixel-width (ceiling pixel-width symbol-width)))
(save-current-buffer (set-buffer (get-buffer-create " *Org string width*")) (set (make-local-variable 'display-line-numbers) nil) (set (make-local-variable 'line-prefix) nil) (set (make-local-variable 'wrap-prefix) nil) (set (make-local-variable 'buffer-invisibility-spec) (if (listp current-invisibility-spec) (mapcar #'(lambda (el) (if (and (consp el) (cdr el)) (list (car el)) el)) current-invisibility-spec) current-invisibility-spec)) (set (make-local-variable 'char-property-alias-alist) current-char-property-alias-alist) (let (pixel-width symbol-width) (let* ((modified (buffer-modified-p)) (buffer-undo-list t) (inhibit-read-only t) (inhibit-modification-hooks t)) (unwind-protect (progn (erase-buffer) (insert string) (setq pixel-width (org-buffer-text-pixel-width)) (if pixels nil (erase-buffer) (insert (propertize "a" 'face (or default-face 'default))) (setq symbol-width (org-buffer-text-pixel-width)))) (if (memq modified '(nil autosaved)) (progn (restore-buffer-modified-p modified))))) (if pixels pixel-width (ceiling pixel-width symbol-width))))
(let ((current-invisibility-spec (or (and (not (listp buffer-invisibility-spec)) buffer-invisibility-spec) (let (result) (let ((tail buffer-invisibility-spec)) (while tail (let ((el (car tail))) (if (or (memq el '(org-fold-drawer org-fold-block org-fold-outline)) (and (listp el) (memq (car el) '(org-fold-drawer org-fold-block org-fold-outline)))) nil (setq result (cons el result))) (setq tail (cdr tail))))) result))) (current-char-property-alias-alist char-property-alias-alist)) (save-current-buffer (set-buffer (get-buffer-create " *Org string width*")) (set (make-local-variable 'display-line-numbers) nil) (set (make-local-variable 'line-prefix) nil) (set (make-local-variable 'wrap-prefix) nil) (set (make-local-variable 'buffer-invisibility-spec) (if (listp current-invisibility-spec) (mapcar #'(lambda (el) (if (and (consp el) (cdr el)) (list (car el)) el)) current-invisibility-spec) current-invisibility-spec)) (set (make-local-variable 'char-property-alias-alist) current-char-property-alias-alist) (let (pixel-width symbol-width) (let* ((modified (buffer-modified-p)) (buffer-undo-list t) (inhibit-read-only t) (inhibit-modification-hooks t)) (unwind-protect (progn (erase-buffer) (insert string) (setq pixel-width (org-buffer-text-pixel-width)) (if pixels nil (erase-buffer) (insert (propertize "a" 'face (or default-face 'default))) (setq symbol-width (org-buffer-text-pixel-width)))) (if (memq modified '(nil autosaved)) (progn (restore-buffer-modified-p modified))))) (if pixels pixel-width (ceiling pixel-width symbol-width)))))
(if (and (version< emacs-version "28") (not pixels)) (org--string-width-1 string) (remove-text-properties 0 (length string) '(wrap-prefix t line-prefix t) string) (if pixels nil (put-text-property 0 (length string) 'face (or default-face 'default) string)) (let ((current-invisibility-spec (or (and (not (listp buffer-invisibility-spec)) buffer-invisibility-spec) (let (result) (let ((tail buffer-invisibility-spec)) (while tail (let ((el (car tail))) (if (or (memq el '(org-fold-drawer org-fold-block org-fold-outline)) (and (listp el) (memq (car el) '(org-fold-drawer org-fold-block org-fold-outline)))) nil (setq result (cons el result))) (setq tail (cdr tail))))) result))) (current-char-property-alias-alist char-property-alias-alist)) (save-current-buffer (set-buffer (get-buffer-create " *Org string width*")) (set (make-local-variable 'display-line-numbers) nil) (set (make-local-variable 'line-prefix) nil) (set (make-local-variable 'wrap-prefix) nil) (set (make-local-variable 'buffer-invisibility-spec) (if (listp current-invisibility-spec) (mapcar #'(lambda (el) (if (and (consp el) (cdr el)) (list (car el)) el)) current-invisibility-spec) current-invisibility-spec)) (set (make-local-variable 'char-property-alias-alist) current-char-property-alias-alist) (let (pixel-width symbol-width) (let* ((modified (buffer-modified-p)) (buffer-undo-list t) (inhibit-read-only t) (inhibit-modification-hooks t)) (unwind-protect (progn (erase-buffer) (insert string) (setq pixel-width (org-buffer-text-pixel-width)) (if pixels nil (erase-buffer) (insert (propertize "a" 'face (or default-face 'default))) (setq symbol-width (org-buffer-text-pixel-width)))) (if (memq modified '(nil autosaved)) (progn (restore-buffer-modified-p modified))))) (if pixels pixel-width (ceiling pixel-width symbol-width))))))
org-string-width(#("~:author~" 0 9 (face org-table)) nil org-table)
(max max-width (org-string-width cell nil 'org-table))
(setq max-width (max max-width (org-string-width cell nil 'org-table)))
(let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers)))))))
(let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail)))
(while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))
(let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail)))))
(let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))
(let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments))))
(while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))
(let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter))))
(if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments)))
(let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))
(progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil)))
(unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil))
(let ((--begin (copy-marker (org-table-begin))) (--end (copy-marker (org-table-end) t)) (--shrunk-columns (org-table--list-shrunk-columns))) (let ((--mepom --begin)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil))))))))))) (progn (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil)))))))))))))) (setq --mepom (let ((idx (or 0 0))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :begin --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :begin)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :begin) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :begin)) nil nil)))))))))))))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))) (org-table-expand --begin --end))))) (unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil)))
(progn (font-lock-ensure beg end) (move-marker org-table-aligned-begin-marker beg) (move-marker org-table-aligned-end-marker end) (goto-char beg) (let ((--begin (copy-marker (org-table-begin))) (--end (copy-marker (org-table-end) t)) (--shrunk-columns (org-table--list-shrunk-columns))) (let ((--mepom --begin)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil))))))))))) (progn (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil)))))))))))))) (setq --mepom (let ((idx (or 0 0))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :begin --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :begin)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :begin) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :begin)) nil nil)))))))))))))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))) (org-table-expand --begin --end))))) (unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil))))
(unwind-protect (progn (font-lock-ensure beg end) (move-marker org-table-aligned-begin-marker beg) (move-marker org-table-aligned-end-marker end) (goto-char beg) (let ((--begin (copy-marker (org-table-begin))) (--end (copy-marker (org-table-end) t)) (--shrunk-columns (org-table--list-shrunk-columns))) (let ((--mepom --begin)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil))))))))))) (progn (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil)))))))))))))) (setq --mepom (let ((idx (or 0 0))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :begin --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :begin)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :begin) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :begin)) nil nil)))))))))))))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))) (org-table-expand --begin --end))))) (unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil)))) (goto-char --line) (org-table-goto-column --column) (set-marker --line nil))
(let ((--line (copy-marker (line-beginning-position))) (--column (org-table-current-column))) (unwind-protect (progn (font-lock-ensure beg end) (move-marker org-table-aligned-begin-marker beg) (move-marker org-table-aligned-end-marker end) (goto-char beg) (let ((--begin (copy-marker (org-table-begin))) (--end (copy-marker (org-table-end) t)) (--shrunk-columns (org-table--list-shrunk-columns))) (let ((--mepom --begin)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil))))))))))) (progn (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil)))))))))))))) (setq --mepom (let ((idx (or 0 0))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :begin --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :begin)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :begin) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :begin)) nil nil)))))))))))))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))) (org-table-expand --begin --end))))) (unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil)))) (goto-char --line) (org-table-goto-column --column) (set-marker --line nil)))
(let ((beg (org-table-begin)) (end (copy-marker (org-table-end)))) (let ((--line (copy-marker (line-beginning-position))) (--column (org-table-current-column))) (unwind-protect (progn (font-lock-ensure beg end) (move-marker org-table-aligned-begin-marker beg) (move-marker org-table-aligned-end-marker end) (goto-char beg) (let ((--begin (copy-marker (org-table-begin))) (--end (copy-marker (org-table-end) t)) (--shrunk-columns (org-table--list-shrunk-columns))) (let ((--mepom --begin)) (save-excursion (cond ((markerp --mepom) (set-buffer (marker-buffer --mepom))) ((numberp --mepom)) (t (if (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil))))))))))) (progn (set-buffer (let ((idx (or 14 14))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :buffer --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :buffer)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :buffer) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :buffer)) nil nil)))))))))))))) (setq --mepom (let ((idx (or 0 0))) (let* ((parray (and t (and idx (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) 'nil) (t (let nil (if (eq :standard-properties (car (nth 1 --mepom))) (car (cdr (nth 1 --mepom))) (plist-get (nth 1 --mepom) :standard-properties)))))))))) (if parray (let* ((val (aref parray idx))) (if (eq val 'org-element-ast--nil) 'nil (let ((val val)) val))) (let* ((val (org-element-type --mepom))) (cond ((null val) 'nil) ((eq val 'plain-text) (let nil (or (get-text-property 0 :begin --mepom) (if nil (progn (if (with-no-warnings (plist-member (text-properties-at 0 --mepom) :begin)) nil nil)))))) (t (let nil (or (plist-get (nth 1 --mepom) :begin) (if nil (progn (if (with-no-warnings (plist-member (nth 1 --mepom) :begin)) nil nil)))))))))))))) (save-excursion (save-restriction (widen) (goto-char (or --mepom (point))) (org-table-expand --begin --end))))) (unwind-protect (progn (let* ((table (org-table-to-lisp)) (rows (remq 'hline table)) (widths nil) (alignments nil) (columns-number 1)) (if (null rows) (let ((end (line-end-position))) (save-excursion (while (search-forward "+" end t) (setq columns-number (1+ columns-number)))) (setq widths (make-list columns-number 1)) (setq alignments (make-list columns-number "l"))) (setq columns-number (apply #'max (mapcar #'length rows))) (let ((upper-bound columns-number) (counter 0)) (while (< counter upper-bound) (let ((i counter)) (let ((max-width 1) (fixed-align? nil) (numbers 0) (non-empty 0)) (let ((tail rows)) (while tail (let ((row (car tail))) (let ((cell (or (nth i row) ""))) (setq max-width (max max-width (org-string-width cell nil 'org-table))) (cond (fixed-align? nil) ((equal cell "") nil) ((string-match "\\`<\\([lrc]\\)[0-9]*>\\'" cell) (setq fixed-align? (match-string 1 cell))) (t (setq non-empty (1+ non-empty)) (if (string-match-p org-table-number-regexp cell) (progn (setq numbers (1+ numbers))))))) (setq tail (cdr tail))))) (setq widths (cons max-width widths)) (setq alignments (cons (cond (fixed-align?) ((>= numbers (* org-table-number-fraction non-empty)) "r") (t "l")) alignments)))) (setq counter (1+ counter)))) (setq widths (nreverse widths)) (setq alignments (nreverse alignments))) (setq org-table-last-alignment alignments) (setq org-table-last-column-widths widths) (let ((rule (and (memq 'hline table) (mapconcat #'(lambda (w) (make-string (+ 2 w) 45)) widths "+"))) (indent (progn (looking-at "[ \11]*|") (match-string 0)))) (let ((tail table)) (while tail (let ((row (car tail))) (let ((previous (buffer-substring (point) (line-end-position))) (new (concat indent (if (eq row 'hline) rule (let* ((offset (- columns-number (length row))) (fields (if (= 0 offset) row (append row (make-list offset ""))))) (mapconcat #'identity (cl-mapcar #'org-table--align-field fields widths alignments) "|"))) "|"))) (if (equal new previous) (forward-line) (insert new "\n") (delete-region (point) (line-beginning-position 2)))) (setq tail (cdr tail)))))) (set-marker end nil) (if org-table-overlay-coordinates (progn (org-table-overlay-coordinates))) (setq org-table-may-need-update nil))) (org-table--shrink-columns --shrunk-columns --begin --end) (set-marker --begin nil) (set-marker --end nil)))) (goto-char --line) (org-table-goto-column --column) (set-marker --line nil))))
org-table-align()
(progn (insert contents) (org-table-align) (buffer-string))
(unwind-protect (progn (insert contents) (org-table-align) (buffer-string)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert contents) (org-table-align) (buffer-string)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
(let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert contents) (org-table-align) (buffer-string)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
(concat (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert contents) (org-table-align) (buffer-string)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (mapconcat #'(lambda (fm) (concat "#+TBLFM: " fm)) (reverse (org-element--property :tblfm table nil nil)) "\n"))
(if (eq (org-element--property :type table nil nil) 'table.el) (org-remove-indentation (org-element--property :value table nil nil)) (concat (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert contents) (org-table-align) (buffer-string)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (mapconcat #'(lambda (fm) (concat "#+TBLFM: " fm)) (reverse (org-element--property :tblfm table nil nil)) "\n")))
org-element-table-interpreter((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n")
funcall(org-element-table-interpreter (table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n")
(concat (and with-affiliated (eq (org-element-class blob) 'element) (org-element--interpret-affiliated-keywords blob)) (funcall (intern (format "org-element-%s-interpreter" type)) blob contents))
(let ((type (org-element-type blob))) (concat (and with-affiliated (eq (org-element-class blob) 'element) (org-element--interpret-affiliated-keywords blob)) (funcall (intern (format "org-element-%s-interpreter" type)) blob contents)))
org-export-expand((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" t)
(replace-regexp-in-string "^[ \11]*#\\+attr_[-_a-z0-9]+:\\(?: .*\\)?\n" "" (org-export-expand blob contents t))
(let ((case-fold-search t)) (replace-regexp-in-string "^[ \11]*#\\+attr_[-_a-z0-9]+:\\(?: .*\\)?\n" "" (org-export-expand blob contents t)))
org-org-identity((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name org :parent nil :transcoders ((babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :options ((:with-special-rows nil nil org-org-with-special-rows) (:with-cite-processors nil nil org-org-with-cite-processors)) :filters ((:filter-parse-tree . org-org--add-missing-sections)) :blocks nil :menu (79 "Export to Org" ((79 "As Org buffer" org-org-export-as-org) (111 "As Org file" org-org-export-to-org) (118 "As Org file and open" (lambda (a s v b) (if a (org-org-export-to-org t s v b) (org-open-file (org-org-export-to-org nil s v b)))))))) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 0/401 0x1659ef9 ...> :internal-references nil))
funcall(org-org-identity (table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name org :parent nil :transcoders ((babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :options ((:with-special-rows nil nil org-org-with-special-rows) (:with-cite-processors nil nil org-org-with-cite-processors)) :filters ((:filter-parse-tree . org-org--add-missing-sections)) :blocks nil :menu (79 "Export to Org" ((79 "As Org buffer" org-org-export-as-org) (111 "As Org file" org-org-export-to-org) (118 "As Org file and open" (lambda (a s v b) (if a (org-org-export-to-org t s v b) (org-open-file (org-org-export-to-org nil s v b)))))))) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 0/401 0x1659ef9 ...> :internal-references nil))
(if (eq type 'plain-text) (funcall transcoder data new-info) (funcall transcoder data contents new-info))
(prog1 (if (eq type 'plain-text) (funcall transcoder data new-info) (funcall transcoder data contents new-info)) (plist-put info :internal-references (plist-get new-info :internal-references)))
(let ((new-info (org-combine-plists info (list :back-end backend :translate-alist all-transcoders :exported-data (make-hash-table :test #'eq :size 401))))) (prog1 (if (eq type 'plain-text) (funcall transcoder data new-info) (funcall transcoder data contents new-info)) (plist-put info :internal-references (plist-get new-info :internal-references))))
(let* ((all-transcoders (org-export-get-all-transcoders backend)) (transcoder (cdr (assq type all-transcoders)))) (if (functionp transcoder) nil (error "No foreign transcoder available")) (let ((new-info (org-combine-plists info (list :back-end backend :translate-alist all-transcoders :exported-data (make-hash-table :test #'eq :size 401))))) (prog1 (if (eq type 'plain-text) (funcall transcoder data new-info) (funcall transcoder data contents new-info)) (plist-put info :internal-references (plist-get new-info :internal-references)))))
(let ((type (org-element-type data))) (if (memq type '(nil org-data raw)) (progn (error "No foreign transcoder available"))) (let* ((all-transcoders (org-export-get-all-transcoders backend)) (transcoder (cdr (assq type all-transcoders)))) (if (functionp transcoder) nil (error "No foreign transcoder available")) (let ((new-info (org-combine-plists info (list :back-end backend :translate-alist all-transcoders :exported-data (make-hash-table :test #'eq :size 401))))) (prog1 (if (eq type 'plain-text) (funcall transcoder data new-info) (funcall transcoder data contents new-info)) (plist-put info :internal-references (plist-get new-info :internal-references))))))
org-export-with-backend(org (table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name nil :parent org :transcoders ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) :options nil :filters nil :blocks nil :menu nil) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil)) (babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 205/401 0x98e84d ...> :internal-references nil))
(concat nil (org-export-with-backend 'org table contents info) nil)
(lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil))((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name nil :parent org :transcoders ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) :options nil :filters nil :blocks nil :menu nil) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil)) (babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 205/401 0x98e84d ...> :internal-references nil))
funcall((lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) "| ~:author~ | ~user-full-name~ |\n| ~:email~ | ~user-mail-address~ |\n| ~:language~ | ~org-export-default-language~ |\n| ~:select-tags~ | ~org-export-select-tags~ |\n| ~:exclude-tags~ | ~org-export-exclude-tags~ |\n| ~:creator~ | ~org-export-creator-string~ |\n| ~:headline-levels~ | ~org-export-headline-levels~ |\n| ~:preserve-breaks~ | ~org-export-preserve-breaks~ |\n| ~:section-numbers~ | ~org-export-with-section-numbers~ |\n| ~:time-stamp-file~ | ~org-export-timestamp-file~ |\n| ~:with-archived-trees~ | ~org-export-with-archived-trees~ |\n| ~:with-author~ | ~org-export-with-author~ |\n| ~:expand-links~ | ~org-export-expand-links~ |\n| ~:with-broken-links~ | ~org-export-with-broken-links~ |\n| ~:with-clocks~ | ~org-export-with-clocks~ |\n| ~:with-creator~ | ~org-export-with-creator~ |\n| ~:with-date~ | ~org-export-with-date~ |\n| ~:with-drawers~ | ~org-export-with-drawers~ |\n| ~:with-email~ | ~org-export-with-email~ |\n| ~:with-emphasize~ | ~org-export-with-emphasize~ |\n| ~:with-entities~ | ~org-export-with-entities~ |\n| ~:with-fixed-width~ | ~org-export-with-fixed-width~ |\n| ~:with-footnotes~ | ~org-export-with-footnotes~ |\n| ~:with-inlinetasks~ | ~org-export-with-inlinetasks~ |\n| ~:with-latex~ | ~org-export-with-latex~ |\n| ~:with-planning~ | ~org-export-with-planning~ |\n| ~:with-priority~ | ~org-export-with-priority~ |\n| ~:with-properties~ | ~org-export-with-properties~ |\n| ~:with-smart-quotes~ | ~org-export-with-smart-quotes~ |\n| ~:with-special-strings~ | ~org-export-with-special-strings~ |\n| ~:with-statistics-cookies~ | ~org-export-with-statistics-cookies~ |\n| ~:with-sub-superscript~ | ~org-export-with-sub-superscripts~ |\n| ~:with-toc~ | ~org-export-with-toc~ |\n| ~:with-tables~ | ~org-export-with-tables~ |\n| ~:with-tags~ | ~org-export-with-tags~ |\n| ~:with-tasks~ | ~org-export-with-tasks~ |\n| ~:with-timestamps~ | ~org-export-with-timestamps~ |\n| ~:with-title~ | ~org-export-with-title~ |\n| ~:with-todo-keywords~ | ~org-export-with-todo-keywords~ |\n| ~:with-cite-processors~ | ~org-export-process-citations~ |\n| ~:cite-export~ | ~org-cite-export-processors~ |\n" (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name nil :parent org :transcoders ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) :options nil :filters nil :blocks nil :menu nil) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil)) (babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 205/401 0x98e84d ...> :internal-references nil))
(progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info))
(condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil)))))
(let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))))
(progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil)))))))
(if transcoder (progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))))))
(let ((transcoder (org-export-transcoder data info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil)))))))))
(cond ((memq data (plist-get info :ignore-list)) nil) ((eq type 'raw) (car (org-element-contents data))) ((eq type 'plain-text) (org-export-filter-apply-functions (plist-get info :filter-plain-text) (let ((transcoder (org-export-transcoder data info))) (if transcoder (funcall transcoder data info) data)) info)) ((not type) (mapconcat #'(lambda (obj) (org-export-data obj info)) data "")) ((or (not (org-element-contents data)) (and (eq type 'headline) (eq (plist-get info :with-archived-trees) 'headline) (org-element--property :archivedp data nil nil))) (let ((transcoder (org-export-transcoder data info))) (and (functionp transcoder) (if (eq type 'link) (condition-case err (progn (funcall transcoder data nil info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))) (funcall transcoder data nil info))))) (t (let ((transcoder (org-export-transcoder data info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil)))))))))))
(let* ((type (org-element-type data)) (parent (org-element-parent data)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type 'raw) (car (org-element-contents data))) ((eq type 'plain-text) (org-export-filter-apply-functions (plist-get info :filter-plain-text) (let ((transcoder (org-export-transcoder data info))) (if transcoder (funcall transcoder data info) data)) info)) ((not type) (mapconcat #'(lambda (obj) (org-export-data obj info)) data "")) ((or (not (org-element-contents data)) (and (eq type 'headline) (eq (plist-get info :with-archived-trees) 'headline) (org-element--property :archivedp data nil nil))) (let ((transcoder (org-export-transcoder data info))) (and (functionp transcoder) (if (eq type 'link) (condition-case err (progn (funcall transcoder data nil info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))) (funcall transcoder data nil info))))) (t (let ((transcoder (org-export-transcoder data info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))))))))))) (puthash data (cond ((not results) (or (org-export--keep-spaces data info) "")) ((memq type '(nil org-data plain-text raw)) results) (t (org-export-filter-apply-functions (plist-get info (intern (format ":filter-%s" type))) (let ((blank (or (org-element-post-blank data) 0))) (if (eq (org-element-class data parent) 'object) (concat results (make-string blank 32)) (concat (org-element-normalize-string results) (make-string blank 10)))) info))) (plist-get info :exported-data)))
(or (gethash data (plist-get info :exported-data)) (let* ((type (org-element-type data)) (parent (org-element-parent data)) (results (cond ((memq data (plist-get info :ignore-list)) nil) ((eq type 'raw) (car (org-element-contents data))) ((eq type 'plain-text) (org-export-filter-apply-functions (plist-get info :filter-plain-text) (let ((transcoder (org-export-transcoder data info))) (if transcoder (funcall transcoder data info) data)) info)) ((not type) (mapconcat #'(lambda (obj) (org-export-data obj info)) data "")) ((or (not (org-element-contents data)) (and (eq type 'headline) (eq (plist-get info :with-archived-trees) 'headline) (org-element--property :archivedp data nil nil))) (let ((transcoder (org-export-transcoder data info))) (and (functionp transcoder) (if (eq type 'link) (condition-case err (progn (funcall transcoder data nil info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))) (funcall transcoder data nil info))))) (t (let ((transcoder (org-export-transcoder data info))) (if transcoder (progn (let* ((greaterp (memq type org-element-greater-elements)) (objectp (and (not greaterp) (memq type org-element-recursive-objects))) (contents (mapconcat #'(lambda (element) (org-export-data element info)) (org-element-contents (if (or greaterp objectp) data (org-element-normalize-contents data (and (eq type 'paragraph) (memq (org-element-type parent t) '(footnote-definition item)) (eq (car (org-element-contents parent)) data) (eq (org-element--property :pre-blank parent nil nil) 0))))) ""))) (condition-case err (progn (funcall transcoder data (if (not greaterp) contents (org-element-normalize-string contents)) info)) (org-link-broken (let* ((val (plist-get info :with-broken-links))) (cond ((null val) (let nil (user-error "Org export aborted. Unable to resolve link: %S\nSee `org-export-with-broken-links'." (nth 1 err)))) ((eq val 'mark) (let nil (org-export-data (format "[BROKEN LINK: %s]" (nth 1 err)) info))) (t 'nil))))))))))))) (puthash data (cond ((not results) (or (org-export--keep-spaces data info) "")) ((memq type '(nil org-data plain-text raw)) results) (t (org-export-filter-apply-functions (plist-get info (intern (format ":filter-%s" type))) (let ((blank (or (org-element-post-blank data) 0))) (if (eq (org-element-class data parent) 'object) (concat results (make-string blank 32)) (concat (org-element-normalize-string results) (make-string blank 10)))) info))) (plist-get info :exported-data))))
org-export-data((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name nil :parent org :transcoders ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) :options nil :filters nil :blocks nil :menu nil) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil :translate-alist ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil)) (babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :exported-data #<hash-table eq 205/401 0x98e84d ...> :internal-references nil))
(prog1 (org-export-data data new-info) (plist-put info :internal-references (plist-get new-info :internal-references)))
(let ((new-info (org-combine-plists info (list :back-end backend :translate-alist (org-export-get-all-transcoders backend) :exported-data (make-hash-table :test 'eq :size 401))))) (prog1 (org-export-data data new-info) (plist-put info :internal-references (plist-get new-info :internal-references))))
org-export-data-with-backend((table (:standard-properties [1 1 1 2039 2039 0 nil top-comment nil nil nil nil nil nil #<killed buffer> nil nil (section (:standard-properties [1 1 1 2039 2039 0 nil first-section nil nil nil 1 2039 nil #<killed buffer> nil nil (org-data (:standard-properties [1 1 1 2039 2039 0 nil org-data nil nil nil 3 2039 nil #<killed buffer> nil nil nil] :path nil :CATEGORY nil) #5)]) #0)] :type org :tblfm nil :value nil) (table-row (:standard-properties [1 1 2 32 33 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [2 nil 3 12 14 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [3 nil nil nil 12 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6] :value ":author"))) (table-cell (:standard-properties [14 nil 14 30 32 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #3]) (code (:standard-properties [14 nil nil nil 30 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value "user-full-name")))) (table-row (:standard-properties [33 33 34 66 67 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [34 nil 35 43 45 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [35 nil nil nil 43 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7] :value ":email"))) (table-cell (:standard-properties [45 nil 45 64 66 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #4]) (code (:standard-properties [45 nil nil nil 64 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value "user-mail-address")))) (table-row (:standard-properties [67 67 68 113 114 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [68 nil 69 80 82 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [69 nil nil nil 80 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8] :value ":language"))) (table-cell (:standard-properties [82 nil 82 111 113 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #5]) (code (:standard-properties [82 nil nil nil 111 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value "org-export-default-language")))) (table-row (:standard-properties [114 114 115 158 159 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [115 nil 116 130 132 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [116 nil nil nil 130 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9] :value ":select-tags"))) (table-cell (:standard-properties [132 nil 132 156 158 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #6]) (code (:standard-properties [132 nil nil nil 156 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value "org-export-select-tags")))) (table-row (:standard-properties [159 159 160 205 206 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [160 nil 161 176 178 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [161 nil nil nil 176 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10] :value ":exclude-tags"))) (table-cell (:standard-properties [178 nil 178 203 205 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #7]) (code (:standard-properties [178 nil nil nil 203 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value "org-export-exclude-tags")))) (table-row (:standard-properties [206 206 207 249 250 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [207 nil 208 218 220 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [208 nil nil nil 218 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11] :value ":creator"))) (table-cell (:standard-properties [220 nil 220 247 249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #8]) (code (:standard-properties [220 nil nil nil 247 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value "org-export-creator-string")))) (table-row (:standard-properties [250 250 251 302 303 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [251 nil 252 270 272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [252 nil nil nil 270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12] :value ":headline-levels"))) (table-cell (:standard-properties [272 nil 272 300 302 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #9]) (code (:standard-properties [272 nil nil nil 300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value "org-export-headline-levels")))) (table-row (:standard-properties [303 303 304 355 356 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [304 nil 305 323 325 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [305 nil nil nil 323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13] :value ":preserve-breaks"))) (table-cell (:standard-properties [325 nil 325 353 355 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #10]) (code (:standard-properties [325 nil nil nil 353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value "org-export-preserve-breaks")))) (table-row (:standard-properties [356 356 357 413 414 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [357 nil 358 376 378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [358 nil nil nil 376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14] :value ":section-numbers"))) (table-cell (:standard-properties [378 nil 378 411 413 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #11]) (code (:standard-properties [378 nil nil nil 411 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value "org-export-with-section-numbers")))) (table-row (:standard-properties [414 414 415 465 466 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [415 nil 416 434 436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [416 nil nil nil 434 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15] :value ":time-stamp-file"))) (table-cell (:standard-properties [436 nil 436 463 465 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #12]) (code (:standard-properties [436 nil nil nil 463 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value "org-export-timestamp-file")))) (table-row (:standard-properties [466 466 467 526 527 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [467 nil 468 490 492 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [468 nil nil nil 490 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16] :value ":with-archived-trees"))) (table-cell (:standard-properties [492 nil 492 524 526 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #13]) (code (:standard-properties [492 nil nil nil 524 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value "org-export-with-archived-trees")))) (table-row (:standard-properties [527 527 528 571 572 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [528 nil 529 543 545 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [529 nil nil nil 543 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17] :value ":with-author"))) (table-cell (:standard-properties [545 nil 545 569 571 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #14]) (code (:standard-properties [545 nil nil nil 569 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value "org-export-with-author")))) (table-row (:standard-properties [572 572 573 618 619 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [573 nil 574 589 591 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [574 nil nil nil 589 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18] :value ":expand-links"))) (table-cell (:standard-properties [591 nil 591 616 618 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #15]) (code (:standard-properties [591 nil nil nil 616 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value "org-export-expand-links")))) (table-row (:standard-properties [619 619 620 675 676 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [620 nil 621 641 643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [621 nil nil nil 641 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19] :value ":with-broken-links"))) (table-cell (:standard-properties [643 nil 643 673 675 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #16]) (code (:standard-properties [643 nil nil nil 673 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value "org-export-with-broken-links")))) (table-row (:standard-properties [676 676 677 720 721 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [677 nil 678 692 694 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [678 nil nil nil 692 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20] :value ":with-clocks"))) (table-cell (:standard-properties [694 nil 694 718 720 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #17]) (code (:standard-properties [694 nil nil nil 718 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value "org-export-with-clocks")))) (table-row (:standard-properties [721 721 722 767 768 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [722 nil 723 738 740 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [723 nil nil nil 738 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21] :value ":with-creator"))) (table-cell (:standard-properties [740 nil 740 765 767 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #18]) (code (:standard-properties [740 nil nil nil 765 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value "org-export-with-creator")))) (table-row (:standard-properties [768 768 769 808 809 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [769 nil 770 782 784 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [770 nil nil nil 782 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22] :value ":with-date"))) (table-cell (:standard-properties [784 nil 784 806 808 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #19]) (code (:standard-properties [784 nil nil nil 806 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value "org-export-with-date")))) (table-row (:standard-properties [809 809 810 855 856 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [810 nil 811 826 828 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [811 nil nil nil 826 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23] :value ":with-drawers"))) (table-cell (:standard-properties [828 nil 828 853 855 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #20]) (code (:standard-properties [828 nil nil nil 853 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value "org-export-with-drawers")))) (table-row (:standard-properties [856 856 857 898 899 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [857 nil 858 871 873 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [858 nil nil nil 871 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24] :value ":with-email"))) (table-cell (:standard-properties [873 nil 873 896 898 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #21]) (code (:standard-properties [873 nil nil nil 896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value "org-export-with-email")))) (table-row (:standard-properties [899 899 900 949 950 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [900 nil 901 918 920 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [901 nil nil nil 918 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25] :value ":with-emphasize"))) (table-cell (:standard-properties [920 nil 920 947 949 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #22]) (code (:standard-properties [920 nil nil nil 947 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value "org-export-with-emphasize")))) (table-row (:standard-properties [950 950 951 998 999 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [951 nil 952 968 970 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [952 nil nil nil 968 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26] :value ":with-entities"))) (table-cell (:standard-properties [970 nil 970 996 998 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #23]) (code (:standard-properties [970 nil nil nil 996 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value "org-export-with-entities")))) (table-row (:standard-properties [999 999 1000 1053 1054 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1000 nil 1001 1020 1022 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1001 nil nil nil 1020 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27] :value ":with-fixed-width"))) (table-cell (:standard-properties [1022 nil 1022 1051 1053 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #24]) (code (:standard-properties [1022 nil nil nil 1051 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value "org-export-with-fixed-width")))) (table-row (:standard-properties [1054 1054 1055 1104 1105 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1055 nil 1056 1073 1075 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1056 nil nil nil 1073 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28] :value ":with-footnotes"))) (table-cell (:standard-properties [1075 nil 1075 1102 1104 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #25]) (code (:standard-properties [1075 nil nil nil 1102 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value "org-export-with-footnotes")))) (table-row (:standard-properties [1105 1105 1106 1159 1160 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1106 nil 1107 1126 1128 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1107 nil nil nil 1126 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29] :value ":with-inlinetasks"))) (table-cell (:standard-properties [1128 nil 1128 1157 1159 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #26]) (code (:standard-properties [1128 nil nil nil 1157 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value "org-export-with-inlinetasks")))) (table-row (:standard-properties [1160 1160 1161 1202 1203 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1161 nil 1162 1175 1177 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1162 nil nil nil 1175 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30] :value ":with-latex"))) (table-cell (:standard-properties [1177 nil 1177 1200 1202 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #27]) (code (:standard-properties [1177 nil nil nil 1200 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value "org-export-with-latex")))) (table-row (:standard-properties [1203 1203 1204 1251 1252 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1204 nil 1205 1221 1223 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1205 nil nil nil 1221 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31] :value ":with-planning"))) (table-cell (:standard-properties [1223 nil 1223 1249 1251 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #28]) (code (:standard-properties [1223 nil nil nil 1249 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value "org-export-with-planning")))) (table-row (:standard-properties [1252 1252 1253 1300 1301 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1253 nil 1254 1270 1272 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1254 nil nil nil 1270 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32] :value ":with-priority"))) (table-cell (:standard-properties [1272 nil 1272 1298 1300 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #29]) (code (:standard-properties [1272 nil nil nil 1298 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value "org-export-with-priority")))) (table-row (:standard-properties [1301 1301 1302 1353 1354 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1302 nil 1303 1321 1323 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1303 nil nil nil 1321 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33] :value ":with-properties"))) (table-cell (:standard-properties [1323 nil 1323 1351 1353 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #30]) (code (:standard-properties [1323 nil nil nil 1351 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value "org-export-with-properties")))) (table-row (:standard-properties [1354 1354 1355 1410 1411 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1355 nil 1356 1376 1378 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1356 nil nil nil 1376 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34] :value ":with-smart-quotes"))) (table-cell (:standard-properties [1378 nil 1378 1408 1410 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #31]) (code (:standard-properties [1378 nil nil nil 1408 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value "org-export-with-smart-quotes")))) (table-row (:standard-properties [1411 1411 1412 1473 1474 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1412 nil 1413 1436 1438 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1413 nil nil nil 1436 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35] :value ":with-special-strings"))) (table-cell (:standard-properties [1438 nil 1438 1471 1473 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #32]) (code (:standard-properties [1438 nil nil nil 1471 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value "org-export-with-special-strings")))) (table-row (:standard-properties [1474 1474 1475 1542 1543 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1475 nil 1476 1502 1504 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1476 nil nil nil 1502 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36] :value ":with-statistics-cookies"))) (table-cell (:standard-properties [1504 nil 1504 1540 1542 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #33]) (code (:standard-properties [1504 nil nil nil 1540 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value "org-export-with-statistics-cookies")))) (table-row (:standard-properties [1543 1543 1544 1606 1607 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1544 nil 1545 1568 1570 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1545 nil nil nil 1568 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37] :value ":with-sub-superscript"))) (table-cell (:standard-properties [1570 nil 1570 1604 1606 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #34]) (code (:standard-properties [1570 nil nil nil 1604 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value "org-export-with-sub-superscripts")))) (table-row (:standard-properties [1607 1607 1608 1645 1646 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1608 nil 1609 1620 1622 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1609 nil nil nil 1620 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38] :value ":with-toc"))) (table-cell (:standard-properties [1622 nil 1622 1643 1645 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #35]) (code (:standard-properties [1622 nil nil nil 1643 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value "org-export-with-toc")))) (table-row (:standard-properties [1646 1646 1647 1690 1691 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1647 nil 1648 1662 1664 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1648 nil nil nil 1662 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39] :value ":with-tables"))) (table-cell (:standard-properties [1664 nil 1664 1688 1690 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #36]) (code (:standard-properties [1664 nil nil nil 1688 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value "org-export-with-tables")))) (table-row (:standard-properties [1691 1691 1692 1731 1732 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1692 nil 1693 1705 1707 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1693 nil nil nil 1705 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40] :value ":with-tags"))) (table-cell (:standard-properties [1707 nil 1707 1729 1731 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #37]) (code (:standard-properties [1707 nil nil nil 1729 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value "org-export-with-tags")))) (table-row (:standard-properties [1732 1732 1733 1774 1775 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1733 nil 1734 1747 1749 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1734 nil nil nil 1747 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41] :value ":with-tasks"))) (table-cell (:standard-properties [1749 nil 1749 1772 1774 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #38]) (code (:standard-properties [1749 nil nil nil 1772 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value "org-export-with-tasks")))) (table-row (:standard-properties [1775 1775 1776 1827 1828 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1776 nil 1777 1795 1797 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1777 nil nil nil 1795 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42] :value ":with-timestamps"))) (table-cell (:standard-properties [1797 nil 1797 1825 1827 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #39]) (code (:standard-properties [1797 nil nil nil 1825 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value "org-export-with-timestamps")))) (table-row (:standard-properties [1828 1828 1829 1870 1871 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1829 nil 1830 1843 1845 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1830 nil nil nil 1843 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43] :value ":with-title"))) (table-cell (:standard-properties [1845 nil 1845 1868 1870 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #40]) (code (:standard-properties [1845 nil nil nil 1868 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value "org-export-with-title")))) (table-row (:standard-properties [1871 1871 1872 1929 1930 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1872 nil 1873 1894 1896 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1873 nil nil nil 1894 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #44] :value ":with-todo-keywords"))) (table-cell (:standard-properties [1896 nil 1896 1927 1929 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #41]) (code (:standard-properties [1896 nil nil nil 1927 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value "org-export-with-todo-keywords")))) (table-row (:standard-properties [1930 1930 1931 1989 1990 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1931 nil 1932 1955 1957 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1932 nil nil nil 1955 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #45] :value ":with-cite-processors"))) (table-cell (:standard-properties [1957 nil 1957 1987 1989 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #42]) (code (:standard-properties [1957 nil nil nil 1987 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value "org-export-process-citations")))) (table-row (:standard-properties [1990 1990 1991 2038 2039 0 nil table-row nil nil nil nil nil nil #<killed buffer> nil nil #0] :type standard) (table-cell (:standard-properties [1991 nil 1992 2006 2008 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [1992 nil nil nil 2006 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #46] :value ":cite-export"))) (table-cell (:standard-properties [2008 nil 2008 2036 2038 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #43]) (code (:standard-properties [2008 nil nil nil 2036 0 nil nil nil nil nil nil nil nil #<killed buffer> nil nil #47] :value "org-cite-export-processors"))))) #s(org-export-backend :name nil :parent org :transcoders ((table lambda (table contents info) (concat nil (org-export-with-backend 'org table contents info) nil)) (table-row lambda (row contents info) (if (eq (org-element-property :type row) 'rule) (org-export-with-backend 'org row nil info) (let ((headerp nil) (last-header-p nil) (lastp (not (org-export-get-next-element row info)))) (when contents (cond nil nil nil (t (concat (cond nil nil nil (t (org-export-with-backend 'org row contents info)))))))))) (table-cell lambda (cell contents info) nil (let ((headerp nil) (column nil)) (when contents nil (cond nil nil)) (org-export-with-backend 'org cell contents info))) (macro lambda (m c i) (org-element-macro-interpreter m nil))) :options nil :filters nil :blocks nil :menu nil) (:with-special-rows t :with-cite-processors nil :title nil :date nil :author (#("Po Lu" 0 5 (:parent #10))) :email "staff@trinity" :language "en" :select-tags ("export") :exclude-tags ("noexport") :creator "Emacs 30.0.50 (Org mode 9.7.3)" :headline-levels 3 :preserve-breaks nil :section-numbers t :time-stamp-file t :with-archived-trees headline :with-author t :expand-links t :with-broken-links nil :with-clocks nil :with-creator nil :with-date t :with-drawers (not "LOGBOOK") :with-email nil :with-emphasize t :with-entities t :with-fixed-width t :with-footnotes t :with-inlinetasks t :with-latex t :with-planning nil :with-priority nil :with-properties nil :with-smart-quotes nil :with-special-strings t :with-statistics-cookies t :with-sub-superscript t :with-toc t :with-tables t :with-tags t :with-tasks t :with-timestamps t :with-title t :with-todo-keywords t :cite-export ((t basic)) :backend org :back-end #s(org-export-backend :name org :parent nil :transcoders ((babel-call . org-org-identity) (bold . org-org-identity) (center-block . org-org-identity) (clock . org-org-identity) (code . org-org-identity) (diary-sexp . org-org-identity) (drawer . org-org-identity) (dynamic-block . org-org-identity) (entity . org-org-identity) (example-block . org-org-identity) (export-block . org-org-export-block) (fixed-width . org-org-identity) (footnote-definition . ignore) (footnote-reference . org-org-identity) (headline . org-org-headline) (horizontal-rule . org-org-identity) (inline-babel-call . org-org-identity) (inline-src-block . org-org-identity) (inlinetask . org-org-identity) (italic . org-org-identity) (citation . org-org-identity) (citation-reference . org-org-identity) (item . org-org-identity) (keyword . org-org-keyword) (latex-environment . org-org-identity) (latex-fragment . org-org-identity) (line-break . org-org-identity) (link . org-org-link) (node-property . org-org-identity) (template . org-org-template) (paragraph . org-org-identity) (plain-list . org-org-identity) (planning . org-org-identity) (property-drawer . org-org-identity) (quote-block . org-org-identity) (radio-target . org-org-identity) (section . org-org-section) (special-block . org-org-identity) (src-block . org-org-identity) (statistics-cookie . org-org-identity) (strike-through . org-org-identity) (subscript . org-org-identity) (superscript . org-org-identity) (table . org-org-identity) (table-cell . org-org-identity) (table-row . org-org-identity) (target . org-org-identity) (timestamp . org-org-timestamp) (underline . org-org-identity) (verbatim . org-org-identity) (verse-block . org-org-identity)) :options ((:with-special-rows nil nil org-org-with-special-rows) (:with-cite-processors nil nil org-org-with-cite-processors)) :filters ((:filter-parse-tree . org-org--add-missing-sections)) :blocks nil :menu (79 "Export to Org" ((79 "As Org buffer" org-org-export-as-org) (111 "As Org file" org-org-export-to-org) (118 "As Org file and open" (lambda (a s v b) (if a (org-org-export-to-org t s v b) (org-open-file (org-org-export-to-org nil s v b)))))))) :filter-parse-tree (org-org--add-missing-sections) :ignore-list nil))
(let ((output (org-export-data-with-backend data custom-backend info))) (if (org-string-nw-p output) (substring-no-properties output 0 -1) ""))
(let* ((backend (plist-get params :backend)) (custom-backend (org-export-create-backend :parent (or backend 'org) :transcoders (cons (cons 'table (org-table--to-generic-table params)) (cons (cons 'table-row (org-table--to-generic-row params)) (cons (cons 'table-cell (org-table--to-generic-cell params)) '((macro lambda (m c i) (org-element-macro-interpreter m nil)))))))) data info) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (let ((org-inhibit-startup t)) (org-mode)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (let ((standard-output (current-buffer)) (org-element-use-cache nil)) (let ((tail table)) (while tail (let ((e (car tail))) (cond ((eq e 'hline) (princ "|--\n")) ((consp e) (princ "| ") (let ((tail e)) (while tail (let ((c (car tail))) (princ c) (princ " |") (setq tail (cdr tail))))) (princ "\n"))) (setq tail (cdr tail)))))) (org-element-cache-reset) (setq info (let ((org-export-filters-alist nil)) (org-export-install-filters (org-combine-plists (org-export-get-environment backend nil params) (list ':back-end (org-export-get-backend backend)))))) (setq data (org-export-filter-apply-functions (plist-get info :filter-parse-tree) (org-element-map (org-element-parse-buffer) 'table #'identity nil t) info)) (if (and backend (symbolp backend) (not (org-export-get-backend backend))) (progn (user-error "Unknown :backend value")))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (or (not backend) (plist-get info :raw)) (progn (require 'ox-org))) (let ((skip (plist-get info :skip))) (if skip (progn (if (wholenump skip) nil (user-error "Wrong :skip value")) (let ((n 0)) (org-element-map data 'table-row #'(lambda (row) (if (>= n skip) t (org-element-extract row) (setq n (1+ n)) nil)) nil t))))) (let ((skipcols (plist-get info :skipcols))) (if skipcols (progn (if (consp skipcols) nil (user-error "Wrong :skipcols value")) (org-element-map data 'table #'(lambda (table) (let ((specialp (org-export-table-has-special-column-p table))) (let ((tail (org-element-contents table))) (while tail (let ((row (car tail))) (if (eq (org-element--property :type row nil nil) 'standard) (progn (let ((c 1)) (let ((tail (nthcdr (if specialp 1 0) (org-element-contents row)))) (while tail (let ((cell (car tail))) (if (memq c skipcols) (progn (org-element-extract cell))) (setq c (1+ c)) (setq tail (cdr tail)))))))) (setq tail (cdr tail))))))))))) (let ((special? (org-export-table-has-special-column-p data)) ignore) (org-element-map data (if special? '(table-cell table-row) 'table-row) #'(lambda (datum) (if (if (eq (org-element-type datum t) 'table-row) (org-export-table-row-is-special-p datum nil) (org-export-first-sibling-p datum nil)) (progn (setq ignore (cons datum ignore)))))) (setq info (plist-put info :ignore-list ignore))) (let ((output (org-export-data-with-backend data custom-backend info))) (if (org-string-nw-p output) (substring-no-properties output 0 -1) "")))
orgtbl-to-generic((("~:author~" "~user-full-name~") ("~:email~" "~user-mail-address~") ("~:language~" "~org-export-default-language~") ("~:select-tags~" "~org-export-select-tags~") ("~:exclude-tags~" "~org-export-exclude-tags~") ("~:creator~" "~org-export-creator-string~") ("~:headline-levels~" "~org-export-headline-levels~") ("~:preserve-breaks~" "~org-export-preserve-breaks~") ("~:section-numbers~" "~org-export-with-section-numbers~") ("~:time-stamp-file~" "~org-export-timestamp-file~") ("~:with-archived-trees~" "~org-export-with-archived-trees~") ("~:with-author~" "~org-export-with-author~") ("~:expand-links~" "~org-export-expand-links~") ("~:with-broken-links~" "~org-export-with-broken-links~") ("~:with-clocks~" "~org-export-with-clocks~") ("~:with-creator~" "~org-export-with-creator~") ("~:with-date~" "~org-export-with-date~") ("~:with-drawers~" "~org-export-with-drawers~") ("~:with-email~" "~org-export-with-email~") ("~:with-emphasize~" "~org-export-with-emphasize~") ("~:with-entities~" "~org-export-with-entities~") ("~:with-fixed-width~" "~org-export-with-fixed-width~") ("~:with-footnotes~" "~org-export-with-footnotes~") ("~:with-inlinetasks~" "~org-export-with-inlinetasks~") ("~:with-latex~" "~org-export-with-latex~") ("~:with-planning~" "~org-export-with-planning~") ("~:with-priority~" "~org-export-with-priority~") ("~:with-properties~" "~org-export-with-properties~") ("~:with-smart-quotes~" "~org-export-with-smart-quotes~") ("~:with-special-strings~" "~org-export-with-special-strings~") ("~:with-statistics-cookies~" "~org-export-with-statistics-cookies~") ("~:with-sub-superscript~" "~org-export-with-sub-superscripts~") ("~:with-toc~" "~org-export-with-toc~") ("~:with-tables~" "~org-export-with-tables~") ("~:with-tags~" "~org-export-with-tags~") ("~:with-tasks~" "~org-export-with-tasks~") ("~:with-timestamps~" "~org-export-with-timestamps~") ("~:with-title~" "~org-export-with-title~") ("~:with-todo-keywords~" "~org-export-with-todo-keywords~") ("~:with-cite-processors~" "~org-export-process-citations~") ("~:cite-export~" "~org-cite-export-processors~")) (:backend org))
orgtbl-to-orgtbl((("~:author~" "~user-full-name~") ("~:email~" "~user-mail-address~") ("~:language~" "~org-export-default-language~") ("~:select-tags~" "~org-export-select-tags~") ("~:exclude-tags~" "~org-export-exclude-tags~") ("~:creator~" "~org-export-creator-string~") ("~:headline-levels~" "~org-export-headline-levels~") ("~:preserve-breaks~" "~org-export-preserve-breaks~") ("~:section-numbers~" "~org-export-with-section-numbers~") ("~:time-stamp-file~" "~org-export-timestamp-file~") ("~:with-archived-trees~" "~org-export-with-archived-trees~") ("~:with-author~" "~org-export-with-author~") ("~:expand-links~" "~org-export-expand-links~") ("~:with-broken-links~" "~org-export-with-broken-links~") ("~:with-clocks~" "~org-export-with-clocks~") ("~:with-creator~" "~org-export-with-creator~") ("~:with-date~" "~org-export-with-date~") ("~:with-drawers~" "~org-export-with-drawers~") ("~:with-email~" "~org-export-with-email~") ("~:with-emphasize~" "~org-export-with-emphasize~") ("~:with-entities~" "~org-export-with-entities~") ("~:with-fixed-width~" "~org-export-with-fixed-width~") ("~:with-footnotes~" "~org-export-with-footnotes~") ("~:with-inlinetasks~" "~org-export-with-inlinetasks~") ("~:with-latex~" "~org-export-with-latex~") ("~:with-planning~" "~org-export-with-planning~") ("~:with-priority~" "~org-export-with-priority~") ("~:with-properties~" "~org-export-with-properties~") ("~:with-smart-quotes~" "~org-export-with-smart-quotes~") ("~:with-special-strings~" "~org-export-with-special-strings~") ("~:with-statistics-cookies~" "~org-export-with-statistics-cookies~") ("~:with-sub-superscript~" "~org-export-with-sub-superscripts~") ("~:with-toc~" "~org-export-with-toc~") ("~:with-tables~" "~org-export-with-tables~") ("~:with-tags~" "~org-export-with-tags~") ("~:with-tasks~" "~org-export-with-tasks~") ("~:with-timestamps~" "~org-export-with-timestamps~") ("~:with-title~" "~org-export-with-title~") ("~:with-todo-keywords~" "~org-export-with-todo-keywords~") ("~:with-cite-processors~" "~org-export-process-citations~") ("~:cite-export~" "~org-cite-export-processors~")) nil)
(concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")
(insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n"))
(cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result)))
(let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline)))))
(progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info))))
(unwind-protect (progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info)))) (if end (progn (set-marker end nil))) (if outside-scope (progn (narrow-to-region visible-beg visible-end))) (set-marker visible-beg nil) (set-marker visible-end nil))
(let* ((visible-beg (point-min-marker)) (visible-end (copy-marker (point-max) t)) (existing-result (org-babel-where-is-src-block-result t nil hash)) (results-switches (cdr (assq :results_switches (nth 2 info)))) (outside-scope (and existing-result (buffer-narrowed-p) (or (> visible-beg existing-result) (<= visible-end existing-result)))) beg end indent) (if (and (org-string-nw-p result) (not inline) (not (string-equal (substring result -1) "\n"))) (progn (setq result (concat result "\n")))) (unwind-protect (progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info)))) (if end (progn (set-marker end nil))) (if outside-scope (progn (narrow-to-region visible-beg visible-end))) (set-marker visible-beg nil) (set-marker visible-end nil)))
(save-excursion (let* ((visible-beg (point-min-marker)) (visible-end (copy-marker (point-max) t)) (existing-result (org-babel-where-is-src-block-result t nil hash)) (results-switches (cdr (assq :results_switches (nth 2 info)))) (outside-scope (and existing-result (buffer-narrowed-p) (or (> visible-beg existing-result) (<= visible-end existing-result)))) beg end indent) (if (and (org-string-nw-p result) (not inline) (not (string-equal (substring result -1) "\n"))) (progn (setq result (concat result "\n")))) (unwind-protect (progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info)))) (if end (progn (set-marker end nil))) (if outside-scope (progn (narrow-to-region visible-beg visible-end))) (set-marker visible-beg nil) (set-marker visible-end nil))))
(let ((inline (let ((context (org-element-context))) (and (memq (org-element-type context t) '(inline-babel-call inline-src-block)) context)))) (if inline (progn (let ((warning (or (and (member "table" result-params) "`:results table'") (and (member "drawer" result-params) "`:results drawer'") (and result (listp result) "list result") (and result (string-match-p "\n." result) "multiline result") (and (member "list" result-params) "`:results list'")))) (if warning (progn (user-error "Inline error: %s cannot be used" warning)))))) (save-excursion (let* ((visible-beg (point-min-marker)) (visible-end (copy-marker (point-max) t)) (existing-result (org-babel-where-is-src-block-result t nil hash)) (results-switches (cdr (assq :results_switches (nth 2 info)))) (outside-scope (and existing-result (buffer-narrowed-p) (or (> visible-beg existing-result) (<= visible-end existing-result)))) beg end indent) (if (and (org-string-nw-p result) (not inline) (not (string-equal (substring result -1) "\n"))) (progn (setq result (concat result "\n")))) (unwind-protect (progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info)))) (if end (progn (set-marker end nil))) (if outside-scope (progn (narrow-to-region visible-beg visible-end))) (set-marker visible-beg nil) (set-marker visible-end nil)))))
(if (and result-params (member "silent" result-params)) (progn (message (replace-regexp-in-string "%" "%%" (format "%S" result))) result) (let ((inline (let ((context (org-element-context))) (and (memq (org-element-type context t) '(inline-babel-call inline-src-block)) context)))) (if inline (progn (let ((warning (or (and (member "table" result-params) "`:results table'") (and (member "drawer" result-params) "`:results drawer'") (and result (listp result) "list result") (and result (string-match-p "\n." result) "multiline result") (and (member "list" result-params) "`:results list'")))) (if warning (progn (user-error "Inline error: %s cannot be used" warning)))))) (save-excursion (let* ((visible-beg (point-min-marker)) (visible-end (copy-marker (point-max) t)) (existing-result (org-babel-where-is-src-block-result t nil hash)) (results-switches (cdr (assq :results_switches (nth 2 info)))) (outside-scope (and existing-result (buffer-narrowed-p) (or (> visible-beg existing-result) (<= visible-end existing-result)))) beg end indent) (if (and (org-string-nw-p result) (not inline) (not (string-equal (substring result -1) "\n"))) (progn (setq result (concat result "\n")))) (unwind-protect (progn (if outside-scope (progn (widen))) (if existing-result (goto-char existing-result) (goto-char (org-element-end inline)) (skip-chars-backward " \11")) (if inline nil (setq indent (current-indentation)) (forward-line 1)) (setq beg (point)) (cond (inline (if existing-result nil (insert " ") (setq beg (point)))) ((member "replace" result-params) (delete-region (point) (org-babel-result-end))) ((member "append" result-params) (goto-char (org-babel-result-end)) (setq beg (point-marker)))) (setq results-switches (if results-switches (concat " " results-switches) "")) (let ((wrap #'(lambda (start finish &optional no-escape no-newlines inline-start inline-finish) (if inline (progn (setq start inline-start) (setq finish inline-finish) (setq no-newlines t))) (let ((before-finish (copy-marker end))) (goto-char end) (insert (concat finish (if no-newlines nil "\n"))) (goto-char beg) (insert (concat start (if no-newlines nil "\n"))) (if no-escape nil (org-escape-code-in-region (min (point) before-finish) before-finish)) (goto-char end)))) (tabulablep #'(lambda (r) (and (proper-list-p r) (cl-every #'(lambda (e) (or (atom e) (proper-list-p e))) result))))) (cond ((null result)) ((member "list" result-params) (insert (org-trim (org-list-to-org (cons 'unordered (mapcar #'(lambda (e) (cond ((stringp e) (list e)) ((listp e) (mapcar #'(lambda (x) (if (stringp x) x (format "%S" x))) e)) (t (list (format "%S" e))))) (if (listp result) result (split-string result "\n" t)))) '(:splicep nil :istart "- " :iend "\n"))) "\n")) ((funcall tabulablep result) (goto-char beg) (insert (concat (orgtbl-to-orgtbl (if (cl-every #'(lambda (e) (or (eq e 'hline) (listp e))) result) result (list result)) nil) "\n")) (goto-char beg) (if (org-at-table-p) (progn (org-table-align))) (goto-char (org-table-end))) ((listp result) (insert (format "%s\n" result))) ((member "file" result-params) (if inline (progn (setq result (org-macro-escape-arguments result)))) (insert result)) ((and inline (not (member "raw" result-params))) (insert (org-macro-escape-arguments (org-babel-chomp result "\n")))) (t (goto-char beg) (insert result))) (setq end (copy-marker (point) t)) (cond ((assq :wrap (nth 2 info)) (let* ((full (or (cdr (assq :wrap (nth 2 info))) "results")) (split (split-string full)) (type (car split)) (opening-line (concat "#+begin_" full)) (closing-line (concat "#+end_" type))) (cond ((org-string-equal-ignore-case type "export") (let ((backend (if (consp split) (let* ((x43 (cdr-safe split))) (cond ((null x43) (let nil "none")) ((consp x43) (let* ((x44 (car-safe x43))) (let ((b x44)) b)))))))) (funcall wrap opening-line closing-line nil nil (format "{{{results(@@%s:" backend) "@@)}}}"))) ((org-string-equal-ignore-case type "example") (funcall wrap opening-line closing-line nil nil "{{{results(=" "=)}}}")) ((org-string-equal-ignore-case type "src") (let ((inline-open (if (consp split) (let* ((x47 (cdr-safe split))) (cond ((null x47) (let nil "{{{results(src_none{")) ((consp x47) (let* ((x48 (car-safe x47)) (x49 (cdr-safe x47))) (if (null x49) (let ((language x48)) (format "{{{results(src_%s{" language)) (let ((language x48) (rest x49)) (let ((r (mapconcat #'identity rest " "))) (format "{{{results(src_%s[%s]{" language r))))))))))) (funcall wrap opening-line closing-line nil nil inline-open "})}}}"))) (t (funcall wrap opening-line closing-line t nil "{{{results(" ")}}}"))))) ((member "html" result-params) (funcall wrap "#+begin_export html" "#+end_export" nil nil "{{{results(@@html:" "@@)}}}")) ((member "latex" result-params) (funcall wrap "#+begin_export latex" "#+end_export" nil nil "{{{results(@@latex:" "@@)}}}")) ((member "org" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap "#+begin_src org" "#+end_src" nil nil "{{{results(src_org{" "})}}}")) ((member "code" result-params) (let ((lang (or lang "none"))) (funcall wrap (format "#+begin_src %s%s" lang results-switches) "#+end_src" nil nil (format "{{{results(src_%s[%s]{" lang results-switches) "})}}}"))) ((member "raw" result-params) (goto-char beg) (if (org-at-table-p) (progn (org-cycle)))) ((or (member "drawer" result-params) (member "wrap" result-params)) (goto-char beg) (if (org-at-table-p) (progn (org-cycle))) (funcall wrap ":results:" ":end:" 'no-escape nil "{{{results(" ")}}}")) ((and inline (member "file" result-params)) (funcall wrap nil nil nil nil "{{{results(" ")}}}")) ((and (not (funcall tabulablep result)) (not (member "file" result-params))) (let ((org-babel-inline-result-wrap (format "{{{results(%s)}}}" org-babel-inline-result-wrap))) (org-babel-examplify-region beg end results-switches inline))))) (if (and (not inline) (numberp indent) (> indent 0) (not (and (listp result) (member "append" result-params)))) (progn (indent-rigidly beg end indent))) (let ((time-info (if (and exec-time (> (float-time exec-time) 0.05)) (format " (took %.1fs)" (float-time exec-time)) ""))) (if (null result) (if (member "value" result-params) (message "Code block returned no value%s." time-info) (message "Code block produced no output%s." time-info)) (message "Code block evaluation complete%s." time-info)))) (if end (progn (set-marker end nil))) (if outside-scope (progn (narrow-to-region visible-beg visible-end))) (set-marker visible-beg nil) (set-marker visible-end nil))))))
org-babel-insert-result((("~:author~" "~user-full-name~") ("~:email~" "~user-mail-address~") ("~:language~" "~org-export-default-language~") ("~:select-tags~" "~org-export-select-tags~") ("~:exclude-tags~" "~org-export-exclude-tags~") ("~:creator~" "~org-export-creator-string~") ("~:headline-levels~" "~org-export-headline-levels~") ("~:preserve-breaks~" "~org-export-preserve-breaks~") ("~:section-numbers~" "~org-export-with-section-numbers~") ("~:time-stamp-file~" "~org-export-timestamp-file~") ("~:with-archived-trees~" "~org-export-with-archived-trees~") ("~:with-author~" "~org-export-with-author~") ("~:expand-links~" "~org-export-expand-links~") ("~:with-broken-links~" "~org-export-with-broken-links~") ("~:with-clocks~" "~org-export-with-clocks~") ("~:with-creator~" "~org-export-with-creator~") ("~:with-date~" "~org-export-with-date~") ("~:with-drawers~" "~org-export-with-drawers~") ("~:with-email~" "~org-export-with-email~") ("~:with-emphasize~" "~org-export-with-emphasize~") ("~:with-entities~" "~org-export-with-entities~") ("~:with-fixed-width~" "~org-export-with-fixed-width~") ("~:with-footnotes~" "~org-export-with-footnotes~") ("~:with-inlinetasks~" "~org-export-with-inlinetasks~") ("~:with-latex~" "~org-export-with-latex~") ("~:with-planning~" "~org-export-with-planning~") ("~:with-priority~" "~org-export-with-priority~") ("~:with-properties~" "~org-export-with-properties~") ("~:with-smart-quotes~" "~org-export-with-smart-quotes~") ("~:with-special-strings~" "~org-export-with-special-strings~") ("~:with-statistics-cookies~" "~org-export-with-statistics-cookies~") ("~:with-sub-superscript~" "~org-export-with-sub-superscripts~") ("~:with-toc~" "~org-export-with-toc~") ("~:with-tables~" "~org-export-with-tables~") ("~:with-tags~" "~org-export-with-tags~") ("~:with-tasks~" "~org-export-with-tasks~") ("~:with-timestamps~" "~org-export-with-timestamps~") ("~:with-title~" "~org-export-with-title~") ("~:with-todo-keywords~" "~org-export-with-todo-keywords~") ("~:with-cite-processors~" "~org-export-process-citations~") ("~:cite-export~" "~org-cite-export-processors~")) ("table" "replace") ("emacs-lisp" "(require 'ox)\n(let ((alist org-export-options-alist))\n(require 'ox)\n(let (result)\n (dolist (spec alist)\n (when (and (nth 3 spec) (symbolp (nth 3 spec))) ; has customization\n (push (list (format \"~%s~\" (car spec)) (format \"~%s~\" (nth 3 spec))) result)))\n (nreverse result))\n)" ((:colname-names) (:rowname-names) (:result-params "table" "replace") (:result-type . value) (:results . "table replace") (:exports . "results") (:cache . "no") (:eval . "yes") (:hlines . "no") (:lexical . "no") (:noweb . "yes") (:session . "none") (:tangle . "no")) "" nil 643527 "(ref:%s)") nil "emacs-lisp" (0 0 205 857000))
(if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))
(let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time))))
(let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result)
(cond (current-cache (save-excursion (goto-char (org-babel-where-is-src-block-result nil info)) (forward-line) (skip-chars-forward " \11") (let ((result (org-babel-read-result))) (message (format "Cached: %s" (replace-regexp-in-string "%" "%%" (format "%S" result)))) result))) ((org-babel-confirm-evaluate info) (let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result)))
(let* ((params (nth 2 info)) (cache (let ((c (cdr (assq :cache params)))) (and (not arg) c (string= "yes" c)))) (new-hash (and cache (org-babel-sha1-hash info :eval))) (old-hash (and cache (org-babel-current-result-hash))) (current-cache (and new-hash (equal new-hash old-hash)))) (cond (current-cache (save-excursion (goto-char (org-babel-where-is-src-block-result nil info)) (forward-line) (skip-chars-forward " \11") (let ((result (org-babel-read-result))) (message (format "Cached: %s" (replace-regexp-in-string "%" "%%" (format "%S" result)))) result))) ((org-babel-confirm-evaluate info) (let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result))))
(progn (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (car c)))) (let* ((params (nth 2 info)) (cache (let ((c (cdr (assq :cache params)))) (and (not arg) c (string= "yes" c)))) (new-hash (and cache (org-babel-sha1-hash info :eval))) (old-hash (and cache (org-babel-current-result-hash))) (current-cache (and new-hash (equal new-hash old-hash)))) (cond (current-cache (save-excursion (goto-char (org-babel-where-is-src-block-result nil info)) (forward-line) (skip-chars-forward " \11") (let ((result (org-babel-read-result))) (message (format "Cached: %s" (replace-regexp-in-string "%" "%%" (format "%S" result)))) result))) ((org-babel-confirm-evaluate info) (let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result)))))
(if (org-babel-check-evaluate info) (progn (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (car c)))) (let* ((params (nth 2 info)) (cache (let ((c (cdr (assq :cache params)))) (and (not arg) c (string= "yes" c)))) (new-hash (and cache (org-babel-sha1-hash info :eval))) (old-hash (and cache (org-babel-current-result-hash))) (current-cache (and new-hash (equal new-hash old-hash)))) (cond (current-cache (save-excursion (goto-char (org-babel-where-is-src-block-result nil info)) (forward-line) (skip-chars-forward " \11") (let ((result (org-babel-read-result))) (message (format "Cached: %s" (replace-regexp-in-string "%" "%%" (format "%S" result)))) result))) ((org-babel-confirm-evaluate info) (let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result))))))
(let* ((org-babel-current-src-block-location (or org-babel-current-src-block-location (nth 5 info) (org-babel-where-is-src-block-head))) (info (if info (copy-tree info) (org-babel-get-src-block-info))) (executor-type (or executor-type (let* ((val (and org-babel-current-src-block-location (char-after org-babel-current-src-block-location)))) (cond ((eql val 115) (let nil 'inline-src-block)) ((eql val 99) (let nil 'inline-babel-call)) ((eql val 35) (let nil (let* ((val (char-after (+ 2 org-babel-current-src-block-location)))) (cond ((eql val 98) (let nil 'src-block)) ((eql val 99) (let nil 'call-block)) (t (let nil 'unknown)))))) (t (let nil 'unknown))))))) (let* ((c (nthcdr 2 info))) (setcar c (org-babel-merge-params (car c) params))) (if (org-babel-check-evaluate info) (progn (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (car c)))) (let* ((params (nth 2 info)) (cache (let ((c (cdr (assq :cache params)))) (and (not arg) c (string= "yes" c)))) (new-hash (and cache (org-babel-sha1-hash info :eval))) (old-hash (and cache (org-babel-current-result-hash))) (current-cache (and new-hash (equal new-hash old-hash)))) (cond (current-cache (save-excursion (goto-char (org-babel-where-is-src-block-result nil info)) (forward-line) (skip-chars-forward " \11") (let ((result (org-babel-read-result))) (message (format "Cached: %s" (replace-regexp-in-string "%" "%%" (format "%S" result)))) result))) ((org-babel-confirm-evaluate info) (let* ((lang (nth 0 info)) (result-params (cdr (assq :result-params params))) (body (org-babel--expand-body info)) (dir (cdr (assq :dir params))) (mkdirp (cdr (assq :mkdirp params))) (default-directory (cond ((not dir) default-directory) ((let* ((session (and t (org-babel-session-buffer info)))) (if session (buffer-local-value 'default-directory (get-buffer session)) nil))) ((member mkdirp '("no" "nil" nil)) (file-name-as-directory (expand-file-name dir))) (t (let ((d (file-name-as-directory (expand-file-name dir)))) (make-directory d 'parents) d)))) (cmd (intern (concat "org-babel-execute:" lang))) result exec-start-time) (if (fboundp cmd) nil (error "No org-babel-execute function for %s!" lang)) (message "Executing %s %s %s..." (capitalize lang) (cond ((eq executor-type 'src-block) (let nil "code block")) ((eq executor-type 'inline-src-block) (let nil "inline code block")) ((eq executor-type 'babel-call) (let nil "call")) ((eq executor-type 'inline-babel-call) (let nil "inline call")) (t (let ((e executor-type)) (symbol-name e)))) (let ((name (nth 4 info))) (if name (format "(%s)" name) (format "at position %S" (nth 5 info))))) (progn (setq exec-start-time (current-time)) (setq result (let ((r (save-current-buffer (funcall cmd body params)))) (if (and (eq (cdr (assq :result-type params)) 'value) (or (member "vector" result-params) (member "table" result-params)) (not (listp r))) (list (list r)) r)))) (let ((file (and (member "file" result-params) (cdr (assq :file params))))) (if file (progn (if (and result (not (or (member "link" result-params) (member "graphics" result-params)))) (progn (let ((temp-file file) (temp-buffer (generate-new-buffer " *temp file*" t))) (unwind-protect (prog1 (save-current-buffer (set-buffer temp-buffer) (insert (org-babel-format-result result (cdr (assq :sep params))))) (save-current-buffer (set-buffer temp-buffer) (write-region nil nil temp-file nil 0))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (if (assq :file-mode params) (progn (set-file-modes file (cdr (assq :file-mode params))))))) (setq result file))) (let ((post (cdr (assq :post params)))) (if post (progn (let ((*this* (if (not file) result (org-babel-result-to-file file (org-babel--file-desc params result) 'attachment)))) (setq result (org-babel-ref-resolve post)) (if file (progn (setq result-params (remove "file" result-params)))))))) (if (member "none" result-params) nil (org-babel-insert-result result result-params info (if (member "replace" result-params) (progn new-hash)) lang (time-subtract (current-time) exec-start-time)))) (run-hooks 'org-babel-after-execute-hook) result)))))))
org-babel-execute-src-block(nil ("emacs-lisp" "(require 'ox)\n(let ((alist org-export-options-alist))\n(require 'ox)\n(let (result)\n (dolist (spec alist)\n (when (and (nth 3 spec) (symbolp (nth 3 spec))) ; has customization\n (push (list (format \"~%s~\" (car spec)) (format \"~%s~\" (nth 3 spec))) result)))\n (nreverse result))\n)" ((:colname-names) (:rowname-names) (:result-params "replace" "table") (:result-type . value) (:results . "replace table") (:exports . "results") (:tangle . "no") (:session . "none") (:noweb . "yes") (:lexical . "no") (:hlines . "no") (:eval . "yes") (:cache . "no")) "" nil 643527 "(ref:%s)"))
(let nil (org-babel-execute-src-block nil info))
(cond ((eq type 'block) (let nil (org-babel-execute-src-block nil info))) ((eq type 'inline) (let nil (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))) ((eq type 'lob) (let nil (save-excursion (goto-char (nth 5 info)) (org-babel-execute-src-block nil info)))))
(if (not (fboundp (intern (concat "org-babel-execute:" lang)))) (warn "org-export: No org-babel-execute function for %s. Not updating exported results." lang) (org-babel-eval-wipe-error-buffer) (let* ((c (nthcdr 1 info))) (setcar c body)) (let* ((c (nthcdr 2 info))) (setcar c (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (org-babel-process-params (org-babel-merge-params (nth 2 info) (list (cons ':results (if silent "silent" "replace"))))))))))) (cond ((eq type 'block) (let nil (org-babel-execute-src-block nil info))) ((eq type 'inline) (let nil (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))) ((eq type 'lob) (let nil (save-excursion (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))))))
(let ((lang (nth 0 info)) (body (if (org-babel-noweb-p (nth 2 info) :eval) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info))) (info (copy-sequence info)) (org-babel-current-src-block-location (point-marker))) (if (not (fboundp (intern (concat "org-babel-execute:" lang)))) (warn "org-export: No org-babel-execute function for %s. Not updating exported results." lang) (org-babel-eval-wipe-error-buffer) (let* ((c (nthcdr 1 info))) (setcar c body)) (let* ((c (nthcdr 2 info))) (setcar c (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (org-babel-process-params (org-babel-merge-params (nth 2 info) (list (cons ':results (if silent "silent" "replace"))))))))))) (cond ((eq type 'block) (let nil (org-babel-execute-src-block nil info))) ((eq type 'inline) (let nil (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))) ((eq type 'lob) (let nil (save-excursion (goto-char (nth 5 info)) (org-babel-execute-src-block nil info)))))))
(if (and hash (equal hash (org-babel-current-result-hash))) nil (let ((lang (nth 0 info)) (body (if (org-babel-noweb-p (nth 2 info) :eval) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info))) (info (copy-sequence info)) (org-babel-current-src-block-location (point-marker))) (if (not (fboundp (intern (concat "org-babel-execute:" lang)))) (warn "org-export: No org-babel-execute function for %s. Not updating exported results." lang) (org-babel-eval-wipe-error-buffer) (let* ((c (nthcdr 1 info))) (setcar c body)) (let* ((c (nthcdr 2 info))) (setcar c (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (org-babel-process-params (org-babel-merge-params (nth 2 info) (list (cons ':results (if silent "silent" "replace"))))))))))) (cond ((eq type 'block) (let nil (org-babel-execute-src-block nil info))) ((eq type 'inline) (let nil (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))) ((eq type 'lob) (let nil (save-excursion (goto-char (nth 5 info)) (org-babel-execute-src-block nil info))))))))
org-babel-exp-results(("emacs-lisp" "(require 'ox)\n(let ((alist org-export-options-alist))\n<<org-manual-get-export-props-customizations>>\n)" ((:cache . "no") (:colname-names) (:eval . "yes") (:exports . "results") (:hlines . "no") (:lexical . "no") (:noweb . "yes") (:result-params "replace" "table") (:result-type . value) (:results . "replace table") (:rowname-names) (:session . "none") (:tangle . "no")) "" nil 643527 "(ref:%s)") block nil "863e2b7ab28e31fc0e059f14418ae94c5683e512")
(let nil (org-babel-exp-results info type nil hash) "")
(cond ((equal val '"none") (let nil (funcall silently) (funcall clean) "")) ((equal val '"code") (let nil (funcall silently) (funcall clean) (org-babel-exp-code info type))) ((equal val '"results") (let nil (org-babel-exp-results info type nil hash) "")) ((equal val '"both") (let nil (org-babel-exp-results info type nil hash) (org-babel-exp-code info type))) (t (let ((unknown-value val)) (warn "Unknown value of src block parameter :exports %S" unknown-value) nil)))
(let* ((val (or (cdr (assq :exports (nth 2 info))) "code"))) (cond ((equal val '"none") (let nil (funcall silently) (funcall clean) "")) ((equal val '"code") (let nil (funcall silently) (funcall clean) (org-babel-exp-code info type))) ((equal val '"results") (let nil (org-babel-exp-results info type nil hash) "")) ((equal val '"both") (let nil (org-babel-exp-results info type nil hash) (org-babel-exp-code info type))) (t (let ((unknown-value val)) (warn "Unknown value of src block parameter :exports %S" unknown-value) nil))))
(let ((silently #'(lambda nil (let ((session (cdr (assq :session (nth 2 info))))) (if (equal "none" session) nil (org-babel-exp-results info type 'silent))))) (clean #'(lambda nil (if (eq type 'inline) (org-babel-remove-inline-result) (org-babel-remove-result info))))) (let* ((val (or (cdr (assq :exports (nth 2 info))) "code"))) (cond ((equal val '"none") (let nil (funcall silently) (funcall clean) "")) ((equal val '"code") (let nil (funcall silently) (funcall clean) (org-babel-exp-code info type))) ((equal val '"results") (let nil (org-babel-exp-results info type nil hash) "")) ((equal val '"both") (let nil (org-babel-exp-results info type nil hash) (org-babel-exp-code info type))) (t (let ((unknown-value val)) (warn "Unknown value of src block parameter :exports %S" unknown-value) nil)))))
org-babel-exp-do-export(("emacs-lisp" "(require 'ox)\n(let ((alist org-export-options-alist))\n<<org-manual-get-export-props-customizations>>\n)" ((:cache . "no") (:colname-names) (:eval . "yes") (:exports . "results") (:hlines . "no") (:lexical . "no") (:noweb . "yes") (:result-params "replace" "table") (:result-type . value) (:results . "replace table") (:rowname-names) (:session . "none") (:tangle . "no")) "" nil 643527 "(ref:%s)") block "863e2b7ab28e31fc0e059f14418ae94c5683e512")
(progn (if (member (cdr (assq :exports (nth 2 info))) '("both" "results")) (progn (let ((lang-headers (intern (concat "org-babel-default-header-args:" lang)))) (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (apply #'org-babel-merge-params org-babel-default-header-args (and (boundp lang-headers) (symbol-value lang-headers)) (append (org-babel-params-from-properties lang) (list raw-params))))))))))) (setq hash (org-babel-sha1-hash info :export)))) (org-babel-exp-do-export info 'block hash))
(if info (progn (if (member (cdr (assq :exports (nth 2 info))) '("both" "results")) (progn (let ((lang-headers (intern (concat "org-babel-default-header-args:" lang)))) (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (apply #'org-babel-merge-params org-babel-default-header-args (and (boundp lang-headers) (symbol-value lang-headers)) (append (org-babel-params-from-properties lang) (list raw-params))))))))))) (setq hash (org-babel-sha1-hash info :export)))) (org-babel-exp-do-export info 'block hash)))
(let* ((info (org-babel-get-src-block-info nil element)) (lang (nth 0 info)) (raw-params (nth 2 info)) hash) (if noninteractive nil (message "org-babel-exp process %s at position %d..." lang (line-beginning-position))) (if info (progn (if (member (cdr (assq :exports (nth 2 info))) '("both" "results")) (progn (let ((lang-headers (intern (concat "org-babel-default-header-args:" lang)))) (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (apply #'org-babel-merge-params org-babel-default-header-args (and (boundp lang-headers) (symbol-value lang-headers)) (append (org-babel-params-from-properties lang) (list raw-params))))))))))) (setq hash (org-babel-sha1-hash info :export)))) (org-babel-exp-do-export info 'block hash))))
(save-excursion (let* ((info (org-babel-get-src-block-info nil element)) (lang (nth 0 info)) (raw-params (nth 2 info)) hash) (if noninteractive nil (message "org-babel-exp process %s at position %d..." lang (line-beginning-position))) (if info (progn (if (member (cdr (assq :exports (nth 2 info))) '("both" "results")) (progn (let ((lang-headers (intern (concat "org-babel-default-header-args:" lang)))) (let ((source (get-text-property (point) 'org-reference))) (save-current-buffer (set-buffer (if source org-babel-exp-reference-buffer (current-buffer))) (save-excursion (save-restriction (widen) (if source (progn (goto-char source))) (let* ((c (nthcdr 2 info))) (setcar c (org-babel-process-params (apply #'org-babel-merge-params org-babel-default-header-args (and (boundp lang-headers) (symbol-value lang-headers)) (append (org-babel-params-from-properties lang) (list raw-params))))))))))) (setq hash (org-babel-sha1-hash info :export)))) (org-babel-exp-do-export info 'block hash)))))
org-babel-exp-src-block((src-block (:standard-properties [643527 643527 nil nil 643718 2 nil nil element t (1294 . 643527) nil nil nil #<buffer *temp*-95112> nil nil (section (:standard-properties [643488 643488 643488 643720 643720 0 nil section element t (1294 . 643487) 643488 643720 nil #<buffer *temp*-95112> nil nil (headline (:standard-properties [643464 643464 643488 643730 643730 0 (:title) nil nil t (1294 . 643464) 643490 643730 4 #<buffer *temp*-95112> [org-element-deferred org-element--headline-deferred nil t] nil (headline (:standard-properties [642680 642680 642710 645841 645841 0 (:title) nil element t (1293 . 642680) 642804 645839 3 #<buffer *temp*-95112> nil nil (headline (:standard-properties [637312 637312 637329 650839 650839 0 (:title) nil element t (1293 . 637312) 637380 650837 2 #<buffer *temp*-95112> nil nil (headline (:standard-properties [636693 636693 636706 656697 656697 0 (:title) nil element t nil 636777 656695 1 #<buffer *temp*-95112> nil nil (org-data (:standard-properties [1 1 1 873901 873901 0 nil org-data nil t nil 3 873901 nil #<buffer *temp*-95112> nil nil nil] :path nil :CATEGORY nil :fragile-cache nil))] :pre-blank 0 :raw-value [org-element-deferred org-element--headline-raw-value (2 12) nil] :title [org-element-deferred org-element-property-2 (:raw-value) nil] :level 1 :priority nil :tags nil :todo-keyword nil :todo-type nil :footnote-section-p [org-element-deferred org-element--headline-footnote-section-p nil nil] :archivedp [org-element-deferred org-element--headline-archivedp nil nil] :commentedp nil :fragile-cache nil :DESCRIPTION [org-element-deferred org-element--substring (40 78) nil]))] :pre-blank 0 :raw-value [org-element-deferred org-element--headline-raw-value (3 16) nil] :title [org-element-deferred org-element-property-2 (:raw-value) nil] :level 2 :priority nil :tags nil :todo-keyword nil :todo-type nil :footnote-section-p [org-element-deferred org-element--headline-footnote-section-p nil nil] :archivedp [org-element-deferred org-element--headline-archivedp nil nil] :commentedp nil :DESCRIPTION [org-element-deferred org-element--substring (44 62) nil] :fragile-cache nil))] :pre-blank 0 :raw-value [org-element-deferred org-element--headline-raw-value (4 29) nil] :title [org-element-deferred org-element-property-2 (:raw-value) nil] :level 3 :priority nil :tags nil :todo-keyword nil :todo-type nil :footnote-section-p [org-element-deferred org-element--headline-footnote-section-p nil nil] :archivedp [org-element-deferred org-element--headline-archivedp nil nil] :commentedp nil :DESCRIPTION [org-element-deferred org-element--substring (57 87) nil] :ALT_TITLE [org-element-deferred org-element--substring (100 118) nil] :fragile-cache nil))] :pre-blank 0 :raw-value [org-element-deferred org-element--headline-parse-title (t) nil] :title [org-element-deferred org-element--headline-parse-title (t) nil] :level [org-element-deferred org-element--headline-parse-title (t) nil] :priority [org-element-deferred org-element--headline-parse-title (t) nil] :tags [org-element-deferred org-element--headline-parse-title (t) nil] :todo-keyword [org-element-deferred org-element--headline-parse-title (t) nil] :todo-type [org-element-deferred org-element--headline-parse-title (t) nil] :footnote-section-p [org-element-deferred org-element--headline-parse-title (t) nil] :archivedp [org-element-deferred org-element--headline-parse-title (t) nil] :commentedp [org-element-deferred org-element--headline-parse-title (t) nil]))] :fragile-cache nil))] :language "emacs-lisp" :switches nil :parameters ":exports results :results table :eval yes :noweb yes" :number-lines nil :preserve-indent nil :retain-labels t :use-labels t :label-fmt nil :value [org-element-deferred org-element--unescape-substring (76 179) nil])))
(progn (goto-char match-start) (org-babel-exp-src-block element))
(let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement))))))
(let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))
(let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil)))
(cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil)))))
(let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))
(if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil)))
(while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))
(progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil)))))
(unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick)))
(let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))
(save-excursion (goto-char (point-min)) (while (re-search-forward regexp nil t) (let ((s (match-beginning 0))) (put-text-property s (line-end-position) 'org-reference s))) (goto-char (point-min)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick)))))
(unwind-protect (save-excursion (goto-char (point-min)) (while (re-search-forward regexp nil t) (let ((s (match-beginning 0))) (put-text-property s (line-end-position) 'org-reference s))) (goto-char (point-min)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))) (kill-buffer org-babel-exp-reference-buffer) (remove-text-properties (point-min) (point-max) '(org-reference nil)))
(let ((case-fold-search t) (regexp "\\(call\\|src\\)_\\|^[ \11]*#\\+\\(BEGIN_SRC\\|CALL:\\)") (org-babel-exp-reference-buffer (org-export-copy-buffer)) element) (unwind-protect (save-excursion (goto-char (point-min)) (while (re-search-forward regexp nil t) (let ((s (match-beginning 0))) (put-text-property s (line-end-position) 'org-reference s))) (goto-char (point-min)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))) (kill-buffer org-babel-exp-reference-buffer) (remove-text-properties (point-min) (point-max) '(org-reference nil))))
(progn (let ((case-fold-search t) (regexp "\\(call\\|src\\)_\\|^[ \11]*#\\+\\(BEGIN_SRC\\|CALL:\\)") (org-babel-exp-reference-buffer (org-export-copy-buffer)) element) (unwind-protect (save-excursion (goto-char (point-min)) (while (re-search-forward regexp nil t) (let ((s (match-beginning 0))) (put-text-property s (line-end-position) 'org-reference s))) (goto-char (point-min)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))) (kill-buffer org-babel-exp-reference-buffer) (remove-text-properties (point-min) (point-max) '(org-reference nil)))))
(if org-export-use-babel (progn (let ((case-fold-search t) (regexp "\\(call\\|src\\)_\\|^[ \11]*#\\+\\(BEGIN_SRC\\|CALL:\\)") (org-babel-exp-reference-buffer (org-export-copy-buffer)) element) (unwind-protect (save-excursion (goto-char (point-min)) (while (re-search-forward regexp nil t) (let ((s (match-beginning 0))) (put-text-property s (line-end-position) 'org-reference s))) (goto-char (point-min)) (let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (while (re-search-forward regexp nil t) (setq element (let ((saved-match-data (match-data))) (unwind-protect (progn (org-element-at-point)) (set-match-data saved-match-data t)))) (if (let ((saved-match-data (match-data))) (unwind-protect (progn (or (org-in-commented-heading-p nil element) (org-in-archived-heading-p nil element))) (set-match-data saved-match-data t))) nil (let* ((object? (match-end 1)) (element (let ((saved-match-data (match-data))) (unwind-protect (progn (if object? (org-element-context element) element)) (set-match-data saved-match-data t)))) (type (let* ((val (org-element-type element))) (cond ((not (memq val '(src-block babel-call))) (let ((type val)) type)) (object? 'nil) (t (let ((type val)) type))))) (begin (copy-marker (org-element-begin element))) (end (copy-marker (save-excursion (goto-char (org-element-end element)) (skip-chars-backward " \15\11\n") (point))))) (cond ((eq type 'inline-src-block) (let nil (let* ((info (org-babel-get-src-block-info nil element)) (params (nth 2 info))) (let* ((c (nthcdr 1 info))) (setcar c (if (and (cdr (assq :noweb params)) (string= "yes" (cdr (assq :noweb params)))) (org-babel-expand-noweb-references info org-babel-exp-reference-buffer) (nth 1 info)))) (goto-char begin) (let ((replacement (org-babel-exp-do-export info 'inline))) (cond ((equal replacement "") (delete-region begin (progn (goto-char end) (skip-chars-forward " \11") (point)))) ((not replacement) (goto-char end)) ((not (string= replacement (buffer-substring begin end))) (delete-region begin end) (insert replacement)) (t (goto-char end))))))) ((memq type '(inline-babel-call babel-call)) (let nil (org-babel-exp-do-export (or (org-babel-lob-get-info element) (user-error "Unknown Babel reference: %s" (org-element--property :call element nil nil))) 'lob) (let ((rep (org-fill-template org-babel-exp-call-line-template (list (cons "line" (org-element--property :value element nil nil)))))) (cond ((equal rep "") (delete-region begin (progn (goto-char end) (if (not (eq type 'babel-call)) (progn (skip-chars-forward " \11") (point)) (skip-chars-forward " \15\11\n") (line-beginning-position))))) ((not rep) (goto-char end)) (t (goto-char begin) (delete-region begin end) (insert rep)))))) ((eq type 'src-block) (let nil (let ((match-start (copy-marker (match-beginning 0))) (ind (let ((buffer-invisibility-spec nil)) (current-indentation)))) (let ((replacement (progn (goto-char match-start) (org-babel-exp-src-block element)))) (cond ((not replacement) (goto-char end)) ((equal replacement "") (goto-char end) (skip-chars-forward " \15\11\n") (forward-line 0) (delete-region begin (point))) (t (if (org-src-preserve-indentation-p element) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (skip-chars-backward " \15\11\n") (indent-line-to ind) (goto-char 1) (indent-line-to ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (fboundp 'indent-tabs-mode) (progn (indent-tabs-mode -1) (set (make-local-variable 'indent-tabs-mode) nil))) (insert replacement) (indent-rigidly 1 (point) ind) (setq replacement (buffer-string))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))) (goto-char match-start) (let ((rend (save-excursion (goto-char end) (line-end-position)))) (if (string-equal replacement (buffer-substring match-start rend)) (goto-char rend) (delete-region match-start (save-excursion (goto-char end) (line-end-position))) (insert replacement)))))) (set-marker match-start nil))))) (set-marker begin nil) (set-marker end nil))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))) (kill-buffer org-babel-exp-reference-buffer) (remove-text-properties (point-min) (point-max) '(org-reference nil))))))
org-babel-exp-process-buffer()
(progn (org-babel-exp-process-buffer) (org-macro-replace-all '(("results" . "$1")) parsed-keywords) (if (eq modified-tick (buffer-chars-modified-tick)) nil (org-set-regexps-and-options) (org-update-radio-target-regexp)) (setq modified-tick (buffer-chars-modified-tick)))
(if org-export-use-babel (progn (org-babel-exp-process-buffer) (org-macro-replace-all '(("results" . "$1")) parsed-keywords) (if (eq modified-tick (buffer-chars-modified-tick)) nil (org-set-regexps-and-options) (org-update-radio-target-regexp)) (setq modified-tick (buffer-chars-modified-tick))))
(let ((parsed-keywords (delq nil (mapcar #'(lambda (o) (and (eq (nth 4 o) 'parse) (nth 1 o))) (append (org-export-get-all-options backend) org-export-options-alist)))) tree modified-tick) (run-hook-with-args 'org-export-before-processing-hook (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (org-export-expand-include-keyword nil nil nil nil (plist-get info :expand-links)) (org-export--delete-comment-trees) (org-macro-initialize-templates org-export-global-macros) (org-macro-replace-all org-macro-templates parsed-keywords) (org-set-regexps-and-options) (org-update-radio-target-regexp) (setq modified-tick (buffer-chars-modified-tick)) (if org-export-use-babel (progn (org-babel-exp-process-buffer) (org-macro-replace-all '(("results" . "$1")) parsed-keywords) (if (eq modified-tick (buffer-chars-modified-tick)) nil (org-set-regexps-and-options) (org-update-radio-target-regexp)) (setq modified-tick (buffer-chars-modified-tick)))) (goto-char (point-min)) (save-excursion (run-hook-with-args 'org-export-before-parsing-hook (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1))))) (if (eq modified-tick (buffer-chars-modified-tick)) nil (org-set-regexps-and-options) (org-update-radio-target-regexp)) (setq modified-tick (buffer-chars-modified-tick)) (setq info (org-combine-plists info (org-export-get-environment backend subtreep ext-plist))) (if (plist-get info :with-cite-processors) (progn (org-cite-store-bibliography info) (org-cite-store-export-processor info))) (let ((tail (append (org-export-get-all-options backend) org-export-options-alist))) (while tail (let ((entry (car tail))) (if (consp entry) (let* ((x562 (car-safe entry)) (x563 (cdr-safe entry))) (if (consp x563) (let* ((x565 (cdr-safe x563))) (if (consp x565) (let* ((x567 (cdr-safe x565))) (if (consp x567) (let* ((x569 (cdr-safe x567))) (if (equal x569 '(parse)) (let ((p x562)) (let ((value (plist-get info p))) (plist-put info p (org-export--remove-uninterpreted-data value info)))) 'nil)) 'nil)) 'nil)) 'nil)) 'nil) (setq tail (cdr tail))))) (setq info (org-export-install-filters info)) (let ((backend-name (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1))))) (let ((tail (plist-get info :filter-options))) (while tail (let ((filter (car tail))) (let ((result (funcall filter info backend-name))) (if result (progn (setq info result)))) (setq tail (cdr tail)))))) (setq tree (org-element-parse-buffer nil visible-only 'defer)) (org-export--prune-tree tree info) (org-export--remove-uninterpreted-data tree info) (org-export--expand-links tree info) (setq tree (org-export-filter-apply-functions (plist-get info :filter-parse-tree) tree info)) (setq info (org-export--collect-tree-properties tree info)) (if (plist-get info :with-cite-processors) (progn (org-cite-process-citations info) (org-cite-process-bibliography info))) info)
org-export--annotate-info(#s(org-export-backend :name texinfo :parent nil :transcoders ((bold . org-texinfo-bold) (center-block . org-texinfo-center-block) (clock . org-texinfo-clock) (code . org-texinfo-code) (drawer . org-texinfo-drawer) (dynamic-block . org-texinfo-dynamic-block) (entity . org-texinfo-entity) (example-block . org-texinfo-example-block) (export-block . org-texinfo-export-block) (export-snippet . org-texinfo-export-snippet) (fixed-width . org-texinfo-fixed-width) (footnote-definition . org-texinfo-footnote-definition) (footnote-reference . org-texinfo-footnote-reference) (headline . org-texinfo-headline) (inline-src-block . org-texinfo-inline-src-block) (inlinetask . org-texinfo-inlinetask) (italic . org-texinfo-italic) (item . org-texinfo-item) (keyword . org-texinfo-keyword) (latex-environment . org-texinfo-latex-environment) (latex-fragment . org-texinfo-latex-fragment) (line-break . org-texinfo-line-break) (link . org-texinfo-link) (node-property . org-texinfo-node-property) (paragraph . org-texinfo-paragraph) (plain-list . org-texinfo-plain-list) (plain-text . org-texinfo-plain-text) (planning . org-texinfo-planning) (property-drawer . org-texinfo-property-drawer) (quote-block . org-texinfo-quote-block) (radio-target . org-texinfo-radio-target) (section . org-texinfo-section) (special-block . org-texinfo-special-block) (src-block . org-texinfo-src-block) (statistics-cookie . org-texinfo-statistics-cookie) (strike-through . org-texinfo-strike-through) (subscript . org-texinfo-subscript) (superscript . org-texinfo-superscript) (table . org-texinfo-table) (table-cell . org-texinfo-table-cell) (table-row . org-texinfo-table-row) (target . org-texinfo-target) (template . org-texinfo-template) (timestamp . org-texinfo-timestamp) (underline . org-texinfo-underline) (verbatim . org-texinfo-verbatim) (verse-block . org-texinfo-verse-block)) :options ((:texinfo-filename "TEXINFO_FILENAME" nil nil t) (:texinfo-class "TEXINFO_CLASS" nil org-texinfo-default-class t) (:texinfo-header "TEXINFO_HEADER" nil nil newline) (:texinfo-post-header "TEXINFO_POST_HEADER" nil nil newline) (:subtitle "SUBTITLE" nil nil parse) (:subauthor "SUBAUTHOR" nil nil newline) (:texinfo-dircat "TEXINFO_DIR_CATEGORY" nil nil t) (:texinfo-dirtitle "TEXINFO_DIR_TITLE" nil nil t) (:texinfo-dirname "TEXINFO_DIR_NAME" nil nil t) (:texinfo-dirdesc "TEXINFO_DIR_DESC" nil nil t) (:texinfo-printed-title "TEXINFO_PRINTED_TITLE" nil nil t) (:texinfo-classes nil nil org-texinfo-classes) (:texinfo-format-headline-function nil nil org-texinfo-format-headline-function) (:texinfo-node-description-column nil nil org-texinfo-node-description-column) (:texinfo-active-timestamp-format nil nil org-texinfo-active-timestamp-format) (:texinfo-inactive-timestamp-format nil nil org-texinfo-inactive-timestamp-format) (:texinfo-diary-timestamp-format nil nil org-texinfo-diary-timestamp-format) (:texinfo-link-with-unknown-path-format nil nil org-texinfo-link-with-unknown-path-format) (:texinfo-tables-verbatim nil nil org-texinfo-tables-verbatim) (:texinfo-table-scientific-notation nil nil org-texinfo-table-scientific-notation) (:texinfo-table-default-markup nil nil org-texinfo-table-default-markup) (:texinfo-text-markup-alist nil nil org-texinfo-text-markup-alist) (:texinfo-format-drawer-function nil nil org-texinfo-format-drawer-function) (:texinfo-format-inlinetask-function nil nil org-texinfo-format-inlinetask-function) (:texinfo-compact-itemx nil "compact-itemx" org-texinfo-compact-itemx) (:with-latex nil "tex" org-texinfo-with-latex)) :filters ((:filter-headline . org-texinfo--filter-section-blank-lines) (:filter-parse-tree org-texinfo--normalize-headlines org-texinfo--separate-definitions) (:filter-section . org-texinfo--filter-section-blank-lines) (:filter-final-output . org-texinfo--untabify)) :blocks nil :menu (105 "Export to Texinfo" ((116 "As TEXI file" org-texinfo-export-to-texinfo) (105 "As INFO file" org-texinfo-export-to-info) (111 "As INFO file and open" (lambda (a s v b) (if a (org-texinfo-export-to-info t s v b) (org-open-file (org-texinfo-export-to-info nil s v b)))))))) (:export-options nil :back-end #s(org-export-backend :name texinfo :parent nil :transcoders ((bold . org-texinfo-bold) (center-block . org-texinfo-center-block) (clock . org-texinfo-clock) (code . org-texinfo-code) (drawer . org-texinfo-drawer) (dynamic-block . org-texinfo-dynamic-block) (entity . org-texinfo-entity) (example-block . org-texinfo-example-block) (export-block . org-texinfo-export-block) (export-snippet . org-texinfo-export-snippet) (fixed-width . org-texinfo-fixed-width) (footnote-definition . org-texinfo-footnote-definition) (footnote-reference . org-texinfo-footnote-reference) (headline . org-texinfo-headline) (inline-src-block . org-texinfo-inline-src-block) (inlinetask . org-texinfo-inlinetask) (italic . org-texinfo-italic) (item . org-texinfo-item) (keyword . org-texinfo-keyword) (latex-environment . org-texinfo-latex-environment) (latex-fragment . org-texinfo-latex-fragment) (line-break . org-texinfo-line-break) (link . org-texinfo-link) (node-property . org-texinfo-node-property) (paragraph . org-texinfo-paragraph) (plain-list . org-texinfo-plain-list) (plain-text . org-texinfo-plain-text) (planning . org-texinfo-planning) (property-drawer . org-texinfo-property-drawer) (quote-block . org-texinfo-quote-block) (radio-target . org-texinfo-radio-target) (section . org-texinfo-section) (special-block . org-texinfo-special-block) (src-block . org-texinfo-src-block) (statistics-cookie . org-texinfo-statistics-cookie) (strike-through . org-texinfo-strike-through) (subscript . org-texinfo-subscript) (superscript . org-texinfo-superscript) (table . org-texinfo-table) (table-cell . org-texinfo-table-cell) (table-row . org-texinfo-table-row) (target . org-texinfo-target) (template . org-texinfo-template) (timestamp . org-texinfo-timestamp) (underline . org-texinfo-underline) (verbatim . org-texinfo-verbatim) (verse-block . org-texinfo-verse-block)) :options ((:texinfo-filename "TEXINFO_FILENAME" nil nil t) (:texinfo-class "TEXINFO_CLASS" nil org-texinfo-default-class t) (:texinfo-header "TEXINFO_HEADER" nil nil newline) (:texinfo-post-header "TEXINFO_POST_HEADER" nil nil newline) (:subtitle "SUBTITLE" nil nil parse) (:subauthor "SUBAUTHOR" nil nil newline) (:texinfo-dircat "TEXINFO_DIR_CATEGORY" nil nil t) (:texinfo-dirtitle "TEXINFO_DIR_TITLE" nil nil t) (:texinfo-dirname "TEXINFO_DIR_NAME" nil nil t) (:texinfo-dirdesc "TEXINFO_DIR_DESC" nil nil t) (:texinfo-printed-title "TEXINFO_PRINTED_TITLE" nil nil t) (:texinfo-classes nil nil org-texinfo-classes) (:texinfo-format-headline-function nil nil org-texinfo-format-headline-function) (:texinfo-node-description-column nil nil org-texinfo-node-description-column) (:texinfo-active-timestamp-format nil nil org-texinfo-active-timestamp-format) (:texinfo-inactive-timestamp-format nil nil org-texinfo-inactive-timestamp-format) (:texinfo-diary-timestamp-format nil nil org-texinfo-diary-timestamp-format) (:texinfo-link-with-unknown-path-format nil nil org-texinfo-link-with-unknown-path-format) (:texinfo-tables-verbatim nil nil org-texinfo-tables-verbatim) (:texinfo-table-scientific-notation nil nil org-texinfo-table-scientific-notation) (:texinfo-table-default-markup nil nil org-texinfo-table-default-markup) (:texinfo-text-markup-alist nil nil org-texinfo-text-markup-alist) (:texinfo-format-drawer-function nil nil org-texinfo-format-drawer-function) (:texinfo-format-inlinetask-function nil nil org-texinfo-format-inlinetask-function) (:texinfo-compact-itemx nil "compact-itemx" org-texinfo-compact-itemx) (:with-latex nil "tex" org-texinfo-with-latex)) :filters ((:filter-headline . org-texinfo--filter-section-blank-lines) (:filter-parse-tree org-texinfo--normalize-headlines org-texinfo--separate-definitions) (:filter-section . org-texinfo--filter-section-blank-lines) (:filter-final-output . org-texinfo--untabify)) :blocks nil :menu (105 "Export to Texinfo" ((116 "As TEXI file" org-texinfo-export-to-texinfo) (105 "As INFO file" org-texinfo-export-to-info) (111 "As INFO file and open" (lambda (a s v b) (if a (org-texinfo-export-to-info t s v b) (org-open-file (org-texinfo-export-to-info nil s v b)))))))) :translate-alist ((bold . org-texinfo-bold) (center-block . org-texinfo-center-block) (clock . org-texinfo-clock) (code . org-texinfo-code) (drawer . org-texinfo-drawer) (dynamic-block . org-texinfo-dynamic-block) (entity . org-texinfo-entity) (example-block . org-texinfo-example-block) (export-block . org-texinfo-export-block) (export-snippet . org-texinfo-export-snippet) (fixed-width . org-texinfo-fixed-width) (footnote-definition . org-texinfo-footnote-definition) (footnote-reference . org-texinfo-footnote-reference) (headline . org-texinfo-headline) (inline-src-block . org-texinfo-inline-src-block) (inlinetask . org-texinfo-inlinetask) (italic . org-texinfo-italic) (item . org-texinfo-item) (keyword . org-texinfo-keyword) (latex-environment . org-texinfo-latex-environment) (latex-fragment . org-texinfo-latex-fragment) (line-break . org-texinfo-line-break) (link . org-texinfo-link) (node-property . org-texinfo-node-property) (paragraph . org-texinfo-paragraph) (plain-list . org-texinfo-plain-list) (plain-text . org-texinfo-plain-text) (planning . org-texinfo-planning) (property-drawer . org-texinfo-property-drawer) (quote-block . org-texinfo-quote-block) (radio-target . org-texinfo-radio-target) (section . org-texinfo-section) (special-block . org-texinfo-special-block) (src-block . org-texinfo-src-block) (statistics-cookie . org-texinfo-statistics-cookie) (strike-through . org-texinfo-strike-through) (subscript . org-texinfo-subscript) (superscript . org-texinfo-superscript) (table . org-texinfo-table) (table-cell . org-texinfo-table-cell) (table-row . org-texinfo-table-row) (target . org-texinfo-target) (template . org-texinfo-template) (timestamp . org-texinfo-timestamp) (underline . org-texinfo-underline) (verbatim . org-texinfo-verbatim) (verse-block . org-texinfo-verse-block)) :exported-data #<hash-table eq 0/4001 0xae9df9 ...> :input-buffer " *temp*" :input-file nil) nil nil (:output-file "org.texi"))
(setq info (org-export--annotate-info backend info subtreep visible-only ext-plist))
(progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info))))
(prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))
(save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil)))
(unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy)))))
(let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy))))))
(let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy)))))))
(let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy))))))))
(save-restriction (cond ((org-region-active-p) (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char (point-min)) (org-end-of-meta-data) (if (bolp) (progn (forward-char (- (or nil 1))))) (narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy)))))))))
(save-excursion (save-restriction (cond ((org-region-active-p) (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char (point-min)) (org-end-of-meta-data) (if (bolp) (progn (forward-char (- (or nil 1))))) (narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy))))))))))
(progn (save-excursion (save-restriction (cond ((org-region-active-p) (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char (point-min)) (org-end-of-meta-data) (if (bolp) (progn (forward-char (- (or nil 1))))) (narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy)))))))))))
(unwind-protect (progn (save-excursion (save-restriction (cond ((org-region-active-p) (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char (point-min)) (org-end-of-meta-data) (if (bolp) (progn (forward-char (- (or nil 1))))) (narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy))))))))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick)))
(let ((org-fold-core--ignore-modifications t)) (unwind-protect (progn (save-excursion (save-restriction (cond ((org-region-active-p) (narrow-to-region (region-beginning) (region-end))) (subtreep (org-narrow-to-subtree) (goto-char (point-min)) (org-end-of-meta-data) (if (bolp) (progn (forward-char (- (or nil 1))))) (narrow-to-region (point) (point-max)))) (let* ((org-export-current-backend (let* ((cl-x backend)) (progn (or (let* ((cl-x cl-x)) (progn (and (memq (type-of cl-x) cl-struct-org-export-backend-tags) t))) (signal 'wrong-type-argument (list 'org-export-backend cl-x))) (aref cl-x 1)))) (info (org-combine-plists (org-export--get-export-attributes backend subtreep visible-only body-only) (org-export--get-buffer-attributes)))) (let ((--bind-variables (org-export--list-bound-variables))) (let ((--buf-copy (org-element-copy-buffer :to-buffer nil :drop-visibility nil :drop-narrowing nil :drop-contents nil :drop-locals nil))) (unwind-protect (save-current-buffer (set-buffer --buf-copy) (goto-char (point-min)) (prog1 (progn (org-export--set-variables --bind-variables) (font-lock-mode -1) (setq info (org-export--annotate-info backend info subtreep visible-only ext-plist)) (let* ((body (org-element-normalize-string (or (org-export-data (plist-get info :parse-tree) info) ""))) (inner-template (cdr (assq 'inner-template (plist-get info :translate-alist)))) (full-body (org-export-filter-apply-functions (plist-get info :filter-body) (if (not (functionp inner-template)) body (funcall inner-template body info)) info)) (template (cdr (assq 'template (plist-get info :translate-alist)))) (output (if (or (not (functionp template)) body-only) full-body (funcall template full-body info)))) (if (plist-get info :with-cite-processors) (progn (setq output (org-cite-finalize-export output info)))) (org-no-properties (org-export-filter-apply-functions (plist-get info :filter-final-output) output info)))) (setq buffer-file-name nil))) (and (buffer-live-p --buf-copy) (progn (save-current-buffer (set-buffer --buf-copy) (restore-buffer-modified-p nil)) (if nil nil (kill-buffer --buf-copy))))))))))) (setq org-fold-core--last-buffer-chars-modified-tick (buffer-chars-modified-tick))))
org-export-as(texinfo nil nil nil (:output-file "org.texi"))
(let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (if (bolp) nil (insert "\n")) (let ((coding-system-for-write encoding)) (write-region nil nil file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file))
(if async (org-export-async-start #'(lambda (file) (org-export-add-to-stack (expand-file-name file) backend)) (list 'let (list (list 'output (list 'org-export-as (list 'quote backend) subtreep visible-only body-only (list 'quote ext-plist)))) (list 'with-temp-buffer '(insert output) '(unless (bolp) (insert "\n")) (list 'let (list (list 'coding-system-for-write (list 'quote encoding))) (list 'write-region nil nil file))) (list 'or (list 'ignore-errors (list 'funcall (list 'quote post-process) file)) file))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (if (bolp) nil (insert "\n")) (let ((coding-system-for-write encoding)) (write-region nil nil file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file)))
(let ((ext-plist (org-combine-plists (list ':output-file file) ext-plist)) (encoding (or org-export-coding-system buffer-file-coding-system))) (if async (org-export-async-start #'(lambda (file) (org-export-add-to-stack (expand-file-name file) backend)) (list 'let (list (list 'output (list 'org-export-as (list 'quote backend) subtreep visible-only body-only (list 'quote ext-plist)))) (list 'with-temp-buffer '(insert output) '(unless (bolp) (insert "\n")) (list 'let (list (list 'coding-system-for-write (list 'quote encoding))) (list 'write-region nil nil file))) (list 'or (list 'ignore-errors (list 'funcall (list 'quote post-process) file)) file))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (if (bolp) nil (insert "\n")) (let ((coding-system-for-write encoding)) (write-region nil nil file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file))))
(if (not (file-writable-p file)) (error "Output file not writable") (let ((ext-plist (org-combine-plists (list ':output-file file) ext-plist)) (encoding (or org-export-coding-system buffer-file-coding-system))) (if async (org-export-async-start #'(lambda (file) (org-export-add-to-stack (expand-file-name file) backend)) (list 'let (list (list 'output (list 'org-export-as (list 'quote backend) subtreep visible-only body-only (list 'quote ext-plist)))) (list 'with-temp-buffer '(insert output) '(unless (bolp) (insert "\n")) (list 'let (list (list 'coding-system-for-write (list 'quote encoding))) (list 'write-region nil nil file))) (list 'or (list 'ignore-errors (list 'funcall (list 'quote post-process) file)) file))) (let ((output (org-export-as backend subtreep visible-only body-only ext-plist))) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert output) (if (bolp) nil (insert "\n")) (let ((coding-system-for-write encoding)) (write-region nil nil file))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))) (if (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output)) (progn (org-kill-new output))) (or (and (functionp post-process) (funcall post-process file)) file)))))
org-export-to-file(texinfo "org.texi")
(progn (insert-file-contents infile) (org-export-to-file 'texinfo outfile))
(unwind-protect (progn (insert-file-contents infile) (org-export-to-file 'texinfo outfile)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert-file-contents infile) (org-export-to-file 'texinfo outfile)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
(let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert-file-contents infile) (org-export-to-file 'texinfo outfile)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
(let ((infile (car-safe (prog1 command-line-args-left (setq command-line-args-left (cdr command-line-args-left))))) (outfile (car-safe (prog1 command-line-args-left (setq command-line-args-left (cdr command-line-args-left))))) (org-export-coding-system org-texinfo-coding-system) (make-backup-files nil)) (if (file-readable-p infile) nil (message "File `%s' not readable" infile) (kill-emacs 1)) (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (insert-file-contents infile) (org-export-to-file 'texinfo outfile)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))
org-texinfo-export-to-texinfo-batch()
command-line-1(("--eval" "(setq load-prefer-newer t)" "-l" "ox-texinfo" "--eval" "(setq gc-cons-threshold 50000000)" "--eval" "(setq org-confirm-babel-evaluate nil)" "-f" "org-texinfo-export-to-texinfo-batch" "org.org" "org.texi"))
command-line()
normal-top-level()
Arithmetic error
make: *** [Makefile:257: org.texi] Error 255
[-- Attachment #3: Type: text/plain, Size: 123 bytes --]
Needless to say, an export process should not be anywise relying on the
value of buffer-text-pixel-size during bootstrap.
next prev parent reply other threads:[~2024-06-10 3:45 UTC|newest]
Thread overview: 45+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <171796793548.23337.12512115872160390161@vcs2.savannah.gnu.org>
[not found] ` <20240609211858.A2C31C1F9FB@vcs2.savannah.gnu.org>
2024-06-10 0:40 ` master 5a125fb5a97 1/2: Update to Org 9.7.3 Po Lu
2024-06-10 1:14 ` Kyle Meyer
2024-06-10 3:45 ` Po Lu [this message]
2024-06-10 3:58 ` Po Lu
2024-06-12 13:08 ` Ihor Radchenko
2024-06-12 13:13 ` Eli Zaretskii
2024-06-12 13:23 ` Ihor Radchenko
2024-06-12 13:30 ` Eli Zaretskii
2024-06-14 13:18 ` Ihor Radchenko
2024-06-10 11:13 ` Eli Zaretskii
2024-06-11 10:05 ` Ihor Radchenko
2024-06-11 12:23 ` Eli Zaretskii
2024-06-11 13:10 ` Robert Pluim
2024-06-14 9:49 ` Ihor Radchenko
2024-06-14 11:39 ` Eli Zaretskii
2024-06-14 12:02 ` Robert Pluim
2024-06-11 13:16 ` Stefan Monnier
2024-06-12 13:49 ` Ihor Radchenko
2024-06-12 14:41 ` Stefan Monnier
2024-06-13 13:00 ` Ihor Radchenko
2024-06-13 13:43 ` Eli Zaretskii
2024-06-13 14:34 ` Stefan Monnier
2024-06-14 12:39 ` Ihor Radchenko
2024-06-13 13:32 ` Ihor Radchenko
2024-06-13 13:54 ` Eli Zaretskii
2024-06-15 11:20 ` Ihor Radchenko
2024-06-15 12:46 ` Eli Zaretskii
2024-06-15 12:55 ` Syncing Org bugfix releases with emacs-30 branch (was: master 5a125fb5a97 1/2: Update to Org 9.7.3) Ihor Radchenko
2024-06-15 13:02 ` Eli Zaretskii
2024-06-16 11:09 ` Ihor Radchenko
2024-06-15 16:58 ` master 5a125fb5a97 1/2: Update to Org 9.7.3 Kyle Meyer
2024-06-11 11:03 ` Stefan Kangas
2024-06-12 3:45 ` Kyle Meyer
2024-06-12 8:52 ` Eli Zaretskii
2024-06-12 12:58 ` Ihor Radchenko
2024-06-12 13:02 ` Eli Zaretskii
2024-06-12 13:21 ` Ihor Radchenko
2024-06-12 13:29 ` Eli Zaretskii
2024-06-12 14:14 ` Stefan Kangas
2024-06-13 16:12 ` Ihor Radchenko
2024-06-13 16:48 ` Eli Zaretskii
2024-06-12 14:46 ` Stefan Monnier
2024-06-12 16:50 ` Eli Zaretskii
2024-06-13 15:44 ` Ihor Radchenko
2024-06-13 15:55 ` Eli Zaretskii
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=8734plcvg9.fsf@yahoo.com \
--to=luangruo@yahoo.com \
--cc=emacs-devel@gnu.org \
--cc=kyle@kyleam.com \
--cc=yantar92@posteo.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.