From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jambunathan K Subject: [BUG] Crash with LaTeX exporter Date: Wed, 06 Apr 2011 10:30:02 +0530 Message-ID: <811v1ght4d.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Return-path: Received: from [140.186.70.92] (port=48941 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q7KrV-0003Ky-Ek for emacs-orgmode@gnu.org; Wed, 06 Apr 2011 01:01:18 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Q7KrG-0007AK-75 for emacs-orgmode@gnu.org; Wed, 06 Apr 2011 01:01:01 -0400 Received: from mail-iy0-f169.google.com ([209.85.210.169]:65037) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Q7KrF-0007A1-CM for emacs-orgmode@gnu.org; Wed, 06 Apr 2011 01:00:46 -0400 Received: by iyf13 with SMTP id 13so1437799iyf.0 for ; Tue, 05 Apr 2011 22:00:44 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Exporting the below table to LaTeX throws an error. Let me know if you need any additional info. --8<---------------cut here---------------start------------->8--- *** Table.el Table with no Spanning +---------------+---------------+ |Term |Percentage | +---------------+---------------+ |Quarter |25% | |One-Fourth | | +---------------+---------------+ |Half |50% | |One-by-Two | | +---------------+---------------+ |Three-Quarters |75% | |Three-Fourths | | +---------------+---------------+ |Full |100% | |Whole | | +---------------+---------------+ --8<---------------cut here---------------end--------------->8--- Debugger entered--Lisp error: (error "Invalid search bound (wrong side of p= oint)") re-search-forward("\\s *\\'" 60 t) table--buffer-substring-and-trim(61 60) #[(from to) "\306\307 B!\307\n B!\"\310\311!r\fq\210\312\216=0Bc\210eb\2= 10\313\314\315\316#\203P\317\224\2036\212\317\224b\210\320c\210)\202=00\321= \224\203D\322\323\316\211#\210\202=00\322\324\325\326!\324Q!\210\202=00ed{+= rq\210=1E\204o`Sf\327=3D\203j\330\202k\331\332\261\210=1F\317V\203\213\333\= 334=1F=1E\203\203\335\202\204\330=0B$c\210\202\216=0Bc\210)\315=1E\317=1F != 8\211\")\207" [from y to line temp-buffer dest-buffer table--buffer-substri= ng-and-trim table--goto-coordinate generate-new-buffer " *temp*" ((byte-cod= e "\301!\203\n\302!\210\301\207" [temp-buffer buffer-name kill-buffer] 2)= ) re-search-forward "\\([#$~_^%{}]\\)\\|\\(\\\\\\)\\|\\([<>|]\\)" nil t 1 "= \\" 2 replace-match "$\\backslash$" "$" match-string 3 32 "" " " "& " forma= t "\\multicolumn{%d}{%sl|}{%s}" "|" first-p span i col-list start] 5](21 20) table--generate-source-scan-lines(# latex (45 = . 60) (466 . 520) (5 21) (2 4 7 10 13)) table-generate-source(latex "*org-export-table*" "caption") (let (tbl caption shortn label line floatp attr align rmlines) (setq line= (buffer-substring (point-at-bol) (point-at-eol)) label (org-get-text-prope= rty-any 0 (quote org-label) line) caption (org-get-text-property-any 0 (quo= te org-caption) line) shortn (org-get-text-property-any 0 (quote org-captio= n-shortn) line) attr (org-get-text-property-any 0 (quote org-attributes) li= ne) align (and attr (stringp attr) (string-match "\\" attr)) floatp (or label caption)) (and (get-buffer "*or= g-export-table*") (kill-buffer (get-buffer "*org-export-table*"))) (table-g= enerate-source (quote latex) "*org-export-table*" "caption") (setq tbl (wit= h-current-buffer "*org-export-table*" (buffer-string))) (while (string-matc= h "^%.*\n" tbl) (setq tbl (replace-match "" t t tbl))) (when rmlines (let (= (n 0) lines) (setq lines (mapcar (lambda (x) (if (string-match "^\\\\hline$= " x) (progn ... ...) x)) (org-split-string tbl "\n"))) (setq tbl (mapconcat= (quote identity) (delq nil lines) "\n")))) (when (and align (string-match = "\\\\begin{tabular}{.*}" tbl)) (setq tbl (replace-match (concat "\\begin{ta= bular}{" align "}") t t tbl))) (and (get-buffer "*org-export-table*") (kill= -buffer (get-buffer "*org-export-table*"))) (beginning-of-line 0) (while (l= ooking-at "[ ]*\\(|\\|\\+-\\)") (delete-region (point) (1+ (point-at-eol))= )) (when org-export-latex-tables-centered (setq tbl (concat "\\begin{center= }\n" tbl "\\end{center}"))) (when floatp (setq tbl (concat "\\begin{table}\= n" (format "\\caption%s{%s}%s\n" (if shortn (format "[%s]" shortn) "") (if = label (format "\\label{%s}" label) "") (or caption "")) tbl "\n\\end{table}= \n"))) (insert (org-export-latex-protect-string tbl))) org-export-latex-convert-table\.el-table() (if (get-text-property (point) (quote org-protected)) nil (require (quote= table)) (org-export-latex-convert-table\.el-table)) (unless (get-text-property (point) (quote org-protected)) (require (quote= table)) (org-export-latex-convert-table\.el-table)) (org-if-unprotected (require (quote table)) (org-export-latex-convert-tab= le\.el-table)) (while (re-search-forward "^[ ]*\\(\\+-[-+]*\\+\\)[ ]*\n[ ]*|" nil t) = (org-if-unprotected (require (quote table)) (org-export-latex-convert-table= \.el-table))) org-export-latex-tables(t) (if (memq (quote tables) exclude-list) nil (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (progn (org-install-letbind) (insert content) (unless (memq (quote timest= amps) exclude-list) (org-export-latex-time-stamps)) (unless (memq (quote qu= otation-marks) exclude-list) (org-export-latex-quotation-marks)) (unless (m= emq (quote emphasis) exclude-list) (when (plist-get org-export-latex-option= s-plist :emphasize) (org-export-latex-fontify))) (unless (memq (quote sub-s= uperscript) exclude-list) (org-export-latex-special-chars (plist-get org-ex= port-latex-options-plist :sub-superscript))) (unless (memq (quote links) ex= clude-list) (org-export-latex-links)) (unless (memq (quote keywords) exclud= e-list) (org-export-latex-keywords)) (unless (memq (quote lists) exclude-li= st) (org-export-latex-lists)) (unless (memq (quote tables) exclude-list) (o= rg-export-latex-tables (plist-get org-export-latex-options-plist :tables)))= (unless (memq (quote fixed-width) exclude-list) (org-export-latex-fixed-wi= dth (plist-get org-export-latex-options-plist :fixed-width))) (buffer-subst= ring (point-min) (point-max))) (unwind-protect (progn (org-install-letbind) (insert content) (unless (me= mq (quote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless= (memq (quote quotation-marks) exclude-list) (org-export-latex-quotation-ma= rks)) (unless (memq (quote emphasis) exclude-list) (when (plist-get org-exp= ort-latex-options-plist :emphasize) (org-export-latex-fontify))) (unless (m= emq (quote sub-superscript) exclude-list) (org-export-latex-special-chars (= plist-get org-export-latex-options-plist :sub-superscript))) (unless (memq = (quote links) exclude-list) (org-export-latex-links)) (unless (memq (quote = keywords) exclude-list) (org-export-latex-keywords)) (unless (memq (quote l= ists) exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) = exclude-list) (org-export-latex-tables (plist-get org-export-latex-options-= plist :tables))) (unless (memq (quote fixed-width) exclude-list) (org-expor= t-latex-fixed-width (plist-get org-export-latex-options-plist :fixed-width)= )) (buffer-substring (point-min) (point-max))) (and (buffer-name temp-buffe= r) (kill-buffer temp-buffer))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (org= -install-letbind) (insert content) (unless (memq (quote timestamps) exclude= -list) (org-export-latex-time-stamps)) (unless (memq (quote quotation-marks= ) exclude-list) (org-export-latex-quotation-marks)) (unless (memq (quote em= phasis) exclude-list) (when (plist-get org-export-latex-options-plist :emph= asize) (org-export-latex-fontify))) (unless (memq (quote sub-superscript) e= xclude-list) (org-export-latex-special-chars (plist-get org-export-latex-op= tions-plist :sub-superscript))) (unless (memq (quote links) exclude-list) (= org-export-latex-links)) (unless (memq (quote keywords) exclude-list) (org-= export-latex-keywords)) (unless (memq (quote lists) exclude-list) (org-expo= rt-latex-lists)) (unless (memq (quote tables) exclude-list) (org-export-lat= ex-tables (plist-get org-export-latex-options-plist :tables))) (unless (mem= q (quote fixed-width) exclude-list) (org-export-latex-fixed-width (plist-ge= t org-export-latex-options-plist :fixed-width))) (buffer-substring (point-m= in) (point-max))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))= )) (with-current-buffer temp-buffer (unwind-protect (progn (org-install-letb= ind) (insert content) (unless (memq (quote timestamps) exclude-list) (org-e= xport-latex-time-stamps)) (unless (memq (quote quotation-marks) exclude-lis= t) (org-export-latex-quotation-marks)) (unless (memq (quote emphasis) exclu= de-list) (when (plist-get org-export-latex-options-plist :emphasize) (org-e= xport-latex-fontify))) (unless (memq (quote sub-superscript) exclude-list) = (org-export-latex-special-chars (plist-get org-export-latex-options-plist := sub-superscript))) (unless (memq (quote links) exclude-list) (org-export-la= tex-links)) (unless (memq (quote keywords) exclude-list) (org-export-latex-= keywords)) (unless (memq (quote lists) exclude-list) (org-export-latex-list= s)) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (pl= ist-get org-export-latex-options-plist :tables))) (unless (memq (quote fixe= d-width) exclude-list) (org-export-latex-fixed-width (plist-get org-export-= latex-options-plist :fixed-width))) (buffer-substring (point-min) (point-ma= x))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-buffer= temp-buffer (unwind-protect (progn (org-install-letbind) (insert content) = (unless (memq (quote timestamps) exclude-list) (org-export-latex-time-stamp= s)) (unless (memq (quote quotation-marks) exclude-list) (org-export-latex-q= uotation-marks)) (unless (memq (quote emphasis) exclude-list) (when (plist-= get org-export-latex-options-plist :emphasize) (org-export-latex-fontify)))= (unless (memq (quote sub-superscript) exclude-list) (org-export-latex-spec= ial-chars (plist-get org-export-latex-options-plist :sub-superscript))) (un= less (memq (quote links) exclude-list) (org-export-latex-links)) (unless (m= emq (quote keywords) exclude-list) (org-export-latex-keywords)) (unless (me= mq (quote lists) exclude-list) (org-export-latex-lists)) (unless (memq (quo= te tables) exclude-list) (org-export-latex-tables (plist-get org-export-lat= ex-options-plist :tables))) (unless (memq (quote fixed-width) exclude-list)= (org-export-latex-fixed-width (plist-get org-export-latex-options-plist :f= ixed-width))) (buffer-substring (point-min) (point-max))) (and (buffer-name= temp-buffer) (kill-buffer temp-buffer))))) (with-temp-buffer (org-install-letbind) (insert content) (unless (memq (q= uote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless (mem= q (quote quotation-marks) exclude-list) (org-export-latex-quotation-marks))= (unless (memq (quote emphasis) exclude-list) (when (plist-get org-export-l= atex-options-plist :emphasize) (org-export-latex-fontify))) (unless (memq (= quote sub-superscript) exclude-list) (org-export-latex-special-chars (plist= -get org-export-latex-options-plist :sub-superscript))) (unless (memq (quot= e links) exclude-list) (org-export-latex-links)) (unless (memq (quote keywo= rds) exclude-list) (org-export-latex-keywords)) (unless (memq (quote lists)= exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) exclu= de-list) (org-export-latex-tables (plist-get org-export-latex-options-plist= :tables))) (unless (memq (quote fixed-width) exclude-list) (org-export-lat= ex-fixed-width (plist-get org-export-latex-options-plist :fixed-width))) (b= uffer-substring (point-min) (point-max))) org-export-latex-content(#("\n +---------------+---------------+\n = |Term |Percentage |\n +---------------+---------------+\n = |Quarter |25% |\n |One-Fourth | |= \n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+----------= -----+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100%= |\n |Whole | |\n +---------------+-= --------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-categor= y "test") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-c= ategory "test") 22 38 (fontified nil org-category "test") 38 39 (fontified = nil org-category "test") 39 43 (fontified nil org-category "test" org-capti= on nil org-caption-shortn nil org-attributes nil org-label nil) 43 76 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98= (fontified nil org-category "test") 98 114 (fontified nil org-category "te= st") 114 115 (fontified nil org-category "test") 115 119 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 119 152 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 152 157 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 157 190 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fon= tified nil org-category "test") 195 212 (fontified nil org-category "test")= 212 228 (fontified nil org-category "test") 228 229 (fontified nil org-cat= egory "test") 229 233 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 233 266 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 266 271 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 271 304 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 304 309 (fontified nil org-category "test") 309= 326 (fontified nil org-category "test") 326 342 (fontified nil org-categor= y "test") 342 343 (fontified nil org-category "test") 343 347 (fontified ni= l org-category "test" org-caption nil org-caption-shortn nil org-attributes= nil org-label nil) 347 380 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 380 385 (fonti= fied nil org-category "test" org-caption nil org-caption-shortn nil org-att= ributes nil org-label nil) 385 418 (fontified nil org-category "test" org-c= aption nil org-caption-shortn nil org-attributes nil org-label nil) 418 423= (fontified nil org-category "test") 423 440 (fontified nil org-category "t= est") 440 456 (fontified nil org-category "test") 456 457 (fontified nil or= g-category "test") 457 461 (fontified nil org-category "test" org-caption n= il org-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontif= ied nil org-category "test" org-caption nil org-caption-shortn nil org-attr= ibutes nil org-label nil) 494 495 (fontified nil org-category "test" org-ca= ption nil org-caption-shortn nil org-attributes nil org-label nil) 495 499 = (fontified nil org-category "test" org-caption nil org-caption-shortn nil o= rg-attributes nil org-label nil) 499 532 (fontified nil org-category "test"= org-caption nil org-caption-shortn nil org-attributes nil org-label nil) 5= 32 537 (fontified nil org-category "test") 537 554 (fontified nil org-categ= ory "test") 554 570 (fontified nil org-category "test") 570 571 (fontified = nil org-category "test") 571 576 (fontified nil org-category "test") 576 57= 7 (fontified nil org-category "test") 577 578 (fontified nil org-category "= test") 578 580 (fontified nil org-category "test") 580 581 (fontified nil o= rg-category "test") 581 582 (fontified nil org-category "test") 582 583 (fo= ntified nil org-category "test") 583 584 (fontified nil org-category "test"= ) 584 585 (fontified nil org-category "test") 585 586 (fontified nil org-ca= tegory "test"))) (insert (org-export-latex-content content)) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 71) (level . 3) (occur . 1) (heading = . #(" Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-categor= y "test" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontif= ied nil))) (content . #("\n +---------------+---------------+\n |Term= |Percentage |\n +---------------+---------------+\n |Q= uarter |25% |\n |One-Fourth | |\n = +---------------+---------------+\n |Half |50% |\n= |One-by-Two | |\n +---------------+---------------= +\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+------= ---------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "te= st") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-catego= ry "test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil o= rg-category "test") 39 43 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fon= tified nil org-category "test") 98 114 (fontified nil org-category "test") = 114 115 (fontified nil org-category "test") 115 119 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 119 152 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 157 190 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fontifie= d nil org-category "test") 195 212 (fontified nil org-category "test") 212 = 228 (fontified nil org-category "test") 228 229 (fontified nil org-category= "test") 229 233 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 233 266 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 266 271 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 271 304 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 304 309 (fontified nil org-category "test") 309 326 = (fontified nil org-category "test") 326 342 (fontified nil org-category "te= st") 342 343 (fontified nil org-category "test") 343 347 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 347 380 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 380 385 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 385 418 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fon= tified nil org-category "test") 423 440 (fontified nil org-category "test")= 440 456 (fontified nil org-category "test") 456 457 (fontified nil org-cat= egory "test") 457 461 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 494 495 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 495 499 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 499 532 (fontified nil org-category "test" org-= caption nil org-caption-shortn nil org-attributes nil org-label nil) 532 53= 7 (fontified nil org-category "test") 537 554 (fontified nil org-category "= test") 554 570 (fontified nil org-category "test") 570 571 (fontified nil o= rg-category "test") 571 576 (fontified nil org-category "test") 576 577 (fo= ntified nil org-category "test") 577 578 (fontified nil org-category "test"= ) 578 580 (fontified nil org-category "test") 580 581 (fontified nil org-ca= tegory "test") 581 582 (fontified nil org-category "test") 582 583 (fontifi= ed nil org-category "test") 583 584 (fontified nil org-category "test") 584= 585 (fontified nil org-category "test") 585 586 (fontified nil org-categor= y "test"))) (subcontent)) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 71) (level . 3) = (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (target "s= ec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1" org-c= ategory "test" fontified nil))) (content . #("\n +---------------+------= ---------+\n |Term |Percentage |\n +---------------+---= ------------+\n |Quarter |25% |\n |One-Fourth |= |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +----------= -----+---------------+\n |Three-Quarters |75% |\n |Three-F= ourths | |\n +---------------+---------------+\n |Full= |100% |\n |Whole | |\n +-= --------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified= nil org-category "test") 1 5 (fontified nil org-category "test") 5 22 (fon= tified nil org-category "test") 22 38 (fontified nil org-category "test") 3= 8 39 (fontified nil org-category "test") 39 43 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 43 76 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-catego= ry "test") 81 98 (fontified nil org-category "test") 98 114 (fontified nil = org-category "test") 114 115 (fontified nil org-category "test") 115 119 (f= ontified nil org-category "test" org-caption nil org-caption-shortn nil org= -attributes nil org-label nil) 119 152 (fontified nil org-category "test" o= rg-caption nil org-caption-shortn nil org-attributes nil org-label nil) 152= 157 (fontified nil org-category "test" org-caption nil org-caption-shortn = nil org-attributes nil org-label nil) 157 190 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 190 195 (fontified nil org-category "test") 195 212 (fontified nil org-= category "test") 212 228 (fontified nil org-category "test") 228 229 (fonti= fied nil org-category "test") 229 233 (fontified nil org-category "test" or= g-caption nil org-caption-shortn nil org-attributes nil org-label nil) 233 = 266 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 266 271 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 271 304 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 304 309 (fontified nil org-cate= gory "test") 309 326 (fontified nil org-category "test") 326 342 (fontified= nil org-category "test") 342 343 (fontified nil org-category "test") 343 3= 47 (fontified nil org-category "test" org-caption nil org-caption-shortn ni= l org-attributes nil org-label nil) 347 380 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 380 385 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 385 418 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 418 423 (fontified nil org-category "test") 423 440 (fontified nil= org-category "test") 440 456 (fontified nil org-category "test") 456 457 (= fontified nil org-category "test") 457 461 (fontified nil org-category "tes= t" org-caption nil org-caption-shortn nil org-attributes nil org-label nil)= 461 494 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 494 495 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 495 499 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 499 532 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 532 537 (fontified nil org-category "test") 537 554 (fontifi= ed nil org-category "test") 554 570 (fontified nil org-category "test") 570= 571 (fontified nil org-category "test") 571 576 (fontified nil org-categor= y "test") 576 577 (fontified nil org-category "test") 577 578 (fontified ni= l org-category "test") 578 580 (fontified nil org-category "test") 580 581 = (fontified nil org-category "test") 581 582 (fontified nil org-category "te= st") 582 583 (fontified nil org-category "test") 583 584 (fontified nil org= -category "test") 584 585 (fontified nil org-category "test") 585 586 (font= ified nil org-category "test"))) (subcontent))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 71) (level= . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (tar= get "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1"= org-category "test" fontified nil))) (content . #("\n +---------------+= ---------------+\n |Term |Percentage |\n +-------------= --+---------------+\n |Quarter |25% |\n |One-Fourth= | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +----= -----------+---------------+\n |Three-Quarters |75% |\n |T= hree-Fourths | |\n +---------------+---------------+\n = |Full |100% |\n |Whole | |\n= +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fon= tified nil org-category "test") 1 5 (fontified nil org-category "test") 5 2= 2 (fontified nil org-category "test") 22 38 (fontified nil org-category "te= st") 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 43 76 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-= category "test") 81 98 (fontified nil org-category "test") 98 114 (fontifie= d nil org-category "test") 114 115 (fontified nil org-category "test") 115 = 119 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 119 152 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 152 157 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 157 190 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 190 195 (fontified nil org-category "test") 195 212 (fontified ni= l org-category "test") 212 228 (fontified nil org-category "test") 228 229 = (fontified nil org-category "test") 229 233 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 233 266 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 266 271 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 271 304 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 304 309 (fontified nil or= g-category "test") 309 326 (fontified nil org-category "test") 326 342 (fon= tified nil org-category "test") 342 343 (fontified nil org-category "test")= 343 347 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 347 380 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 380 385 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 385 418 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 418 423 (fontified nil org-category "test") 423 440 (fontifi= ed nil org-category "test") 440 456 (fontified nil org-category "test") 456= 457 (fontified nil org-category "test") 457 461 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 461 494 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 494 495 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 495 499 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 499 532 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 532 537 (fontified nil org-category "test") 537 554 (f= ontified nil org-category "test") 554 570 (fontified nil org-category "test= ") 570 571 (fontified nil org-category "test") 571 576 (fontified nil org-c= ategory "test") 576 577 (fontified nil org-category "test") 577 578 (fontif= ied nil org-category "test") 578 580 (fontified nil org-category "test") 58= 0 581 (fontified nil org-category "test") 581 582 (fontified nil org-catego= ry "test") 582 583 (fontified nil org-category "test") 583 584 (fontified n= il org-category "test") 584 585 (fontified nil org-category "test") 585 586= (fontified nil org-category "test"))) (subcontent)))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 71) (level . 3) (occur . 1) (heading . #(" = Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-category "tes= t" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontified ni= l))) (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quarter= |25% |\n |One-Fourth | |\n +----= -----------+---------------+\n |Half |50% |\n |O= ne-by-Two | |\n +---------------+---------------+\n = |Three-Quarters |75% |\n |Three-Fourths | |\n= +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+------------= ---+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1= 5 (fontified nil org-category "test") 5 22 (fontified nil org-category "te= st") 22 38 (fontified nil org-category "test") 38 39 (fontified nil org-cat= egory "test") 39 43 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fontified= nil org-category "test") 98 114 (fontified nil org-category "test") 114 11= 5 (fontified nil org-category "test") 115 119 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 119 152 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 152 157 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 157 190 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 190 195 (fontified nil = org-category "test") 195 212 (fontified nil org-category "test") 212 228 (f= ontified nil org-category "test") 228 229 (fontified nil org-category "test= ") 229 233 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 233 266 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 266 271 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 271 304 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 304 309 (fontified nil org-category "test") 309 326 (fonti= fied nil org-category "test") 326 342 (fontified nil org-category "test") 3= 42 343 (fontified nil org-category "test") 343 347 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 347 380 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 380 385 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 385 418 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fontified= nil org-category "test") 423 440 (fontified nil org-category "test") 440 4= 56 (fontified nil org-category "test") 456 457 (fontified nil org-category = "test") 457 461 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 461 494 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 494 495 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 495 499 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 499 532 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 532 537 (fon= tified nil org-category "test") 537 554 (fontified nil org-category "test")= 554 570 (fontified nil org-category "test") 570 571 (fontified nil org-cat= egory "test") 571 576 (fontified nil org-category "test") 576 577 (fontifie= d nil org-category "test") 577 578 (fontified nil org-category "test") 578 = 580 (fontified nil org-category "test") 580 581 (fontified nil org-category= "test") 581 582 (fontified nil org-category "test") 582 583 (fontified nil= org-category "test") 583 584 (fontified nil org-category "test") 584 585 (= fontified nil org-category "test") 585 586 (fontified nil org-category "tes= t"))) (subcontent)))) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (whi= le (org-looking-back "\n\n") (backward-delete-char 1)) (org-export-latex-su= b subcontent))) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 55) (level . 2) (occur . 1) (heading = . #(" Tables " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7= (target "sec-1_1" org-category "test" fontified nil))) (content . #("\n\n\= n\n\n" 0 1 (fontified nil org-category "test") 1 3 (fontified nil org-categ= ory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-= category "test"))) (subcontent (((pos . 71) (level . 3) (occur . 1) (headin= g . #(" Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-categ= ory "test" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" font= ified nil))) (content . #("\n +---------------+---------------+\n |Te= rm |Percentage |\n +---------------+---------------+\n = |Quarter |25% |\n |One-Fourth | |\n = +---------------+---------------+\n |Half |50% |= \n |One-by-Two | |\n +---------------+-------------= --+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+----= -----------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-cate= gory "test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil= org-category "test") 39 43 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontifi= ed nil org-category "test" org-caption nil org-caption-shortn nil org-attri= butes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (f= ontified nil org-category "test") 98 114 (fontified nil org-category "test"= ) 114 115 (fontified nil org-category "test") 115 119 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 119 152 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 157 190 (fontified nil org-category "test" org-caption n= il org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fontif= ied nil org-category "test") 195 212 (fontified nil org-category "test") 21= 2 228 (fontified nil org-category "test") 228 229 (fontified nil org-catego= ry "test") 229 233 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 233 266 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 266 271 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 271 304 (fontifi= ed nil org-category "test" org-caption nil org-caption-shortn nil org-attri= butes nil org-label nil) 304 309 (fontified nil org-category "test") 309 32= 6 (fontified nil org-category "test") 326 342 (fontified nil org-category "= test") 342 343 (fontified nil org-category "test") 343 347 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 347 380 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 380 385 (fontifie= d nil org-category "test" org-caption nil org-caption-shortn nil org-attrib= utes nil org-label nil) 385 418 (fontified nil org-category "test" org-capt= ion nil org-caption-shortn nil org-attributes nil org-label nil) 418 423 (f= ontified nil org-category "test") 423 440 (fontified nil org-category "test= ") 440 456 (fontified nil org-category "test") 456 457 (fontified nil org-c= ategory "test") 457 461 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 494 495 (fontified nil org-category "test" org-capti= on nil org-caption-shortn nil org-attributes nil org-label nil) 495 499 (fo= ntified nil org-category "test" org-caption nil org-caption-shortn nil org-= attributes nil org-label nil) 499 532 (fontified nil org-category "test" or= g-caption nil org-caption-shortn nil org-attributes nil org-label nil) 532 = 537 (fontified nil org-category "test") 537 554 (fontified nil org-category= "test") 554 570 (fontified nil org-category "test") 570 571 (fontified nil= org-category "test") 571 576 (fontified nil org-category "test") 576 577 (= fontified nil org-category "test") 577 578 (fontified nil org-category "tes= t") 578 580 (fontified nil org-category "test") 580 581 (fontified nil org-= category "test") 581 582 (fontified nil org-category "test") 582 583 (fonti= fied nil org-category "test") 583 584 (fontified nil org-category "test") 5= 84 585 (fontified nil org-category "test") 585 586 (fontified nil org-categ= ory "test"))) (subcontent))))) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 55) (level . 2) = (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-category "tes= t" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontified nil))= ) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1 3 (fo= ntified nil org-category "test") 3 4 (fontified nil org-category "test") 4 = 5 (fontified nil org-category "test"))) (subcontent (((pos . 71) (level . 3= ) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (target = "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1" org= -category "test" fontified nil))) (content . #("\n +---------------+----= -----------+\n |Term |Percentage |\n +---------------+-= --------------+\n |Quarter |25% |\n |One-Fourth = | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +--------= -------+---------------+\n |Three-Quarters |75% |\n |Three= -Fourths | |\n +---------------+---------------+\n |Fu= ll |100% |\n |Whole | |\n = +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontifi= ed nil org-category "test") 1 5 (fontified nil org-category "test") 5 22 (f= ontified nil org-category "test") 22 38 (fontified nil org-category "test")= 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 43 76 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-cate= gory "test") 81 98 (fontified nil org-category "test") 98 114 (fontified ni= l org-category "test") 114 115 (fontified nil org-category "test") 115 119 = (fontified nil org-category "test" org-caption nil org-caption-shortn nil o= rg-attributes nil org-label nil) 119 152 (fontified nil org-category "test"= org-caption nil org-caption-shortn nil org-attributes nil org-label nil) 1= 52 157 (fontified nil org-category "test" org-caption nil org-caption-short= n nil org-attributes nil org-label nil) 157 190 (fontified nil org-category= "test" org-caption nil org-caption-shortn nil org-attributes nil org-label= nil) 190 195 (fontified nil org-category "test") 195 212 (fontified nil or= g-category "test") 212 228 (fontified nil org-category "test") 228 229 (fon= tified nil org-category "test") 229 233 (fontified nil org-category "test" = org-caption nil org-caption-shortn nil org-attributes nil org-label nil) 23= 3 266 (fontified nil org-category "test" org-caption nil org-caption-shortn= nil org-attributes nil org-label nil) 266 271 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 271 304 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 304 309 (fontified nil org-ca= tegory "test") 309 326 (fontified nil org-category "test") 326 342 (fontifi= ed nil org-category "test") 342 343 (fontified nil org-category "test") 343= 347 (fontified nil org-category "test" org-caption nil org-caption-shortn = nil org-attributes nil org-label nil) 347 380 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 380 385 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 385 418 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 418 423 (fontified nil org-category "test") 423 440 (fontified n= il org-category "test") 440 456 (fontified nil org-category "test") 456 457= (fontified nil org-category "test") 457 461 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 461 494 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 494 495 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 495 499 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 499 532 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 532 537 (fontified nil org-category "test") 537 554 (fonti= fied nil org-category "test") 554 570 (fontified nil org-category "test") 5= 70 571 (fontified nil org-category "test") 571 576 (fontified nil org-categ= ory "test") 576 577 (fontified nil org-category "test") 577 578 (fontified = nil org-category "test") 578 580 (fontified nil org-category "test") 580 58= 1 (fontified nil org-category "test") 581 582 (fontified nil org-category "= test") 582 583 (fontified nil org-category "test") 583 584 (fontified nil o= rg-category "test") 584 585 (fontified nil org-category "test") 585 586 (fo= ntified nil org-category "test"))) (subcontent)))))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 55) (level= . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-categor= y "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontified= nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1= 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "tes= t") 4 5 (fontified nil org-category "test"))) (subcontent (((pos . 71) (lev= el . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (t= arget "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_= 1" org-category "test" fontified nil))) (content . #("\n +--------------= -+---------------+\n |Term |Percentage |\n +-----------= ----+---------------+\n |Quarter |25% |\n |One-Four= th | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +--= -------------+---------------+\n |Three-Quarters |75% |\n = |Three-Fourths | |\n +---------------+---------------+\n = |Full |100% |\n |Whole | |= \n +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 5 (fontified nil org-category "test") 5= 22 (fontified nil org-category "test") 22 38 (fontified nil org-category "= test") 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 43 76 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 76 81 (fontified nil or= g-category "test") 81 98 (fontified nil org-category "test") 98 114 (fontif= ied nil org-category "test") 114 115 (fontified nil org-category "test") 11= 5 119 (fontified nil org-category "test" org-caption nil org-caption-shortn= nil org-attributes nil org-label nil) 119 152 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 152 157 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 157 190 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 190 195 (fontified nil org-category "test") 195 212 (fontified = nil org-category "test") 212 228 (fontified nil org-category "test") 228 22= 9 (fontified nil org-category "test") 229 233 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 233 266 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 266 271 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 271 304 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 304 309 (fontified nil = org-category "test") 309 326 (fontified nil org-category "test") 326 342 (f= ontified nil org-category "test") 342 343 (fontified nil org-category "test= ") 343 347 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 347 380 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 380 385 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 385 418 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 418 423 (fontified nil org-category "test") 423 440 (fonti= fied nil org-category "test") 440 456 (fontified nil org-category "test") 4= 56 457 (fontified nil org-category "test") 457 461 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 461 494 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 494 495 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 495 499 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 499 532 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 532 537 (fontified nil org-category "test") 537 554 = (fontified nil org-category "test") 554 570 (fontified nil org-category "te= st") 570 571 (fontified nil org-category "test") 571 576 (fontified nil org= -category "test") 576 577 (fontified nil org-category "test") 577 578 (font= ified nil org-category "test") 578 580 (fontified nil org-category "test") = 580 581 (fontified nil org-category "test") 581 582 (fontified nil org-cate= gory "test") 582 583 (fontified nil org-category "test") 583 584 (fontified= nil org-category "test") 584 585 (fontified nil org-category "test") 585 5= 86 (fontified nil org-category "test"))) (subcontent))))))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 55) (level . 2) (occur . 1) (heading . #(" = Tables " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7 (targ= et "sec-1_1" org-category "test" fontified nil))) (content . #("\n\n\n\n\n"= 0 1 (fontified nil org-category "test") 1 3 (fontified nil org-category "t= est") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-catego= ry "test"))) (subcontent (((pos . 71) (level . 3) (occur . 1) (heading . #(= " Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-category "t= est" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontified = nil))) (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quart= er |25% |\n |One-Fourth | |\n +--= -------------+---------------+\n |Half |50% |\n = |One-by-Two | |\n +---------------+---------------+\n = |Three-Quarters |75% |\n |Three-Fourths | |= \n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+----------= -----+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "test")= 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-category "= test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil org-c= ategory "test") 39 43 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fontifi= ed nil org-category "test") 98 114 (fontified nil org-category "test") 114 = 115 (fontified nil org-category "test") 115 119 (fontified nil org-category= "test" org-caption nil org-caption-shortn nil org-attributes nil org-label= nil) 119 152 (fontified nil org-category "test" org-caption nil org-captio= n-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 157 190 (fontified nil org-category "test" org-caption nil org= -caption-shortn nil org-attributes nil org-label nil) 190 195 (fontified ni= l org-category "test") 195 212 (fontified nil org-category "test") 212 228 = (fontified nil org-category "test") 228 229 (fontified nil org-category "te= st") 229 233 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 233 266 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 266 271 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 271 304 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 304 309 (fontified nil org-category "test") 309 326 (fon= tified nil org-category "test") 326 342 (fontified nil org-category "test")= 342 343 (fontified nil org-category "test") 343 347 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 347 380 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 380 385 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 385 418 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fontifi= ed nil org-category "test") 423 440 (fontified nil org-category "test") 440= 456 (fontified nil org-category "test") 456 457 (fontified nil org-categor= y "test") 457 461 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 461 494 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 494 495 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 495 499 (fontifie= d nil org-category "test" org-caption nil org-caption-shortn nil org-attrib= utes nil org-label nil) 499 532 (fontified nil org-category "test" org-capt= ion nil org-caption-shortn nil org-attributes nil org-label nil) 532 537 (f= ontified nil org-category "test") 537 554 (fontified nil org-category "test= ") 554 570 (fontified nil org-category "test") 570 571 (fontified nil org-c= ategory "test") 571 576 (fontified nil org-category "test") 576 577 (fontif= ied nil org-category "test") 577 578 (fontified nil org-category "test") 57= 8 580 (fontified nil org-category "test") 580 581 (fontified nil org-catego= ry "test") 581 582 (fontified nil org-category "test") 582 583 (fontified n= il org-category "test") 583 584 (fontified nil org-category "test") 584 585= (fontified nil org-category "test") 585 586 (fontified nil org-category "t= est"))) (subcontent))))))) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (whi= le (org-looking-back "\n\n") (backward-delete-char 1)) (org-export-latex-su= b subcontent))) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 4) (level . 1) (occur . 1) (heading .= #(" Sample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "= test" fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil= ))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-cate= gory "test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org= -category "test") 3 4 (fontified nil org-category "test") 4 5 (fontified ni= l org-category "test") 5 6 (fontified nil org-category "test") 6 7 (fontifi= ed nil org-category "test") 7 8 (fontified nil org-category "test") 8 9 (fo= ntified nil org-category "test") 9 10 (fontified nil org-category "test") 1= 0 12 (fontified nil org-category "test") 12 13 (fontified nil org-category = "test") 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55= ) (level . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org= -category "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" f= ontified nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 3 (fontified nil org-category "test") 3 4 (fontified nil org-categ= ory "test") 4 5 (fontified nil org-category "test"))) (subcontent (((pos . = 71) (level . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning = " 1 2 ... 2 32 ...)) (content . #("\n +---------------+---------------+\= n |Term |Percentage |\n +---------------+--------------= -+\n |Quarter |25% |\n |One-Fourth | = |\n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+-----= ----------+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full = |100% |\n |Whole | |\n +------------= ---+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 ... 1 5 ... 5 22 ... = 22 38 ... 38 39 ... 39 43 ... 43 76 ... 76 81 ... 81 98 ... 98 114 ... 114 = 115 ... 115 119 ... 119 152 ... 152 157 ... 157 190 ... 190 195 ... 195 212= ... 212 228 ... 228 229 ... 229 233 ... 233 266 ... 266 271 ... 271 304 ..= . 304 309 ... 309 326 ... 326 342 ... 342 343 ... 343 347 ... 347 380 ... 3= 80 385 ... 385 418 ... 418 423 ... 423 440 ... 440 456 ... 456 457 ... 457 = 461 ... 461 494 ... 494 495 ... 495 499 ... 499 532 ... 532 537 ... 537 554= ... 554 570 ... 570 571 ... 571 576 ... 576 577 ... 577 578 ... 578 580 ..= . 580 581 ... 581 582 ... 582 583 ... 583 584 ... 584 585 ... 585 586 ...))= (subcontent)))))))) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 4) (level . 1) (= occur . 1) (heading . #(" Sample Content (Proof Of Concept) " 1 2 (target "= sec-1" org-category "test" fontified nil) 2 34 (target "sec-1" org-category= "test" fontified nil))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 2 (fontified nil org-category "test") 2= 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "tes= t") 4 5 (fontified nil org-category "test") 5 6 (fontified nil org-category= "test") 6 7 (fontified nil org-category "test") 7 8 (fontified nil org-cat= egory "test") 8 9 (fontified nil org-category "test") 9 10 (fontified nil o= rg-category "test") 10 12 (fontified nil org-category "test") 12 13 (fontif= ied nil org-category "test") 13 14 (fontified nil org-category "test"))) (s= ubcontent (((pos . 55) (level . 2) (occur . 1) (heading . #(" Tables " 1 2 = (target "sec-1_1" org-category "test" fontified nil) 2 7 (target "sec-1_1" = org-category "test" fontified nil))) (content . #("\n\n\n\n\n" 0 1 (fontifi= ed nil org-category "test") 1 3 (fontified nil org-category "test") 3 4 (fo= ntified nil org-category "test") 4 5 (fontified nil org-category "test"))) = (subcontent (((pos . 71) (level . 3) (occur . 1) (heading . #(" Table.el Ta= ble with no Spanning " 1 2 ... 2 32 ...)) (content . #("\n +------------= ---+---------------+\n |Term |Percentage |\n +---------= ------+---------------+\n |Quarter |25% |\n |One-Fo= urth | |\n +---------------+---------------+\n |Hal= f |50% |\n |One-by-Two | |\n += ---------------+---------------+\n |Three-Quarters |75% |\n = |Three-Fourths | |\n +---------------+---------------+\= n |Full |100% |\n |Whole | = |\n +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 = ... 1 5 ... 5 22 ... 22 38 ... 38 39 ... 39 43 ... 43 76 ... 76 81 ... 81 9= 8 ... 98 114 ... 114 115 ... 115 119 ... 119 152 ... 152 157 ... 157 190 ..= . 190 195 ... 195 212 ... 212 228 ... 228 229 ... 229 233 ... 233 266 ... 2= 66 271 ... 271 304 ... 304 309 ... 309 326 ... 326 342 ... 342 343 ... 343 = 347 ... 347 380 ... 380 385 ... 385 418 ... 418 423 ... 423 440 ... 440 456= ... 456 457 ... 457 461 ... 461 494 ... 494 495 ... 495 499 ... 499 532 ..= . 532 537 ... 537 554 ... 554 570 ... 570 571 ... 571 576 ... 576 577 ... 5= 77 578 ... 578 580 ... 580 581 ... 581 582 ... 582 583 ... 583 584 ... 584 = 585 ... 585 586 ...)) (subcontent))))))))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 4) (level = . 1) (occur . 1) (heading . #(" Sample Content (Proof Of Concept) " 1 2 (ta= rget "sec-1" org-category "test" fontified nil) 2 34 (target "sec-1" org-ca= tegory "test" fontified nil))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" = 0 1 (fontified nil org-category "test") 1 2 (fontified nil org-category "te= st") 2 3 (fontified nil org-category "test") 3 4 (fontified nil org-categor= y "test") 4 5 (fontified nil org-category "test") 5 6 (fontified nil org-ca= tegory "test") 6 7 (fontified nil org-category "test") 7 8 (fontified nil o= rg-category "test") 8 9 (fontified nil org-category "test") 9 10 (fontified= nil org-category "test") 10 12 (fontified nil org-category "test") 12 13 (= fontified nil org-category "test") 13 14 (fontified nil org-category "test"= ))) (subcontent (((pos . 55) (level . 2) (occur . 1) (heading . #(" Tables = " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7 (target "sec= -1_1" org-category "test" fontified nil))) (content . #("\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 3 (fontified nil org-category "test") 3= 4 (fontified nil org-category "test") 4 5 (fontified nil org-category "tes= t"))) (subcontent ((... ... ... ... ... ...))))))))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 4) (level . 1) (occur . 1) (heading . #(" S= ample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "test" = fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil))) (c= ontent . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org-categ= ory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-= category "test") 5 6 (fontified nil org-category "test") 6 7 (fontified nil= org-category "test") 7 8 (fontified nil org-category "test") 8 9 (fontifie= d nil org-category "test") 9 10 (fontified nil org-category "test") 10 12 (= fontified nil org-category "test") 12 13 (fontified nil org-category "test"= ) 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55) (lev= el . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-categ= ory "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontifi= ed nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test")= 1 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "t= est") 4 5 (fontified nil org-category "test"))) (subcontent ((... ... ... .= .. ... ...))))))))) (if (eq (car content) (quote subcontent)) (mapc (quote org-export-latex-s= ub) (cdr content)) (org-export-latex-sub (car content))) org-export-latex-global(((((pos . 4) (level . 1) (occur . 1) (heading . #= (" Sample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "te= st" fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil))= ) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-catego= ry "test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org-c= ategory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil = org-category "test") 5 6 (fontified nil org-category "test") 6 7 (fontified= nil org-category "test") 7 8 (fontified nil org-category "test") 8 9 (font= ified nil org-category "test") 9 10 (fontified nil org-category "test") 10 = 12 (fontified nil org-category "test") 12 13 (fontified nil org-category "t= est") 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55) = (level . 2) (occur . 1) (heading . #(" Tables " 1 2 ... 2 7 ...)) (content = . #("\n\n\n\n\n" 0 1 ... 1 3 ... 3 4 ... 4 5 ...)) (subcontent (...))))))))) (let* ((wcf (current-window-configuration)) (opt-plist (org-export-proces= s-option-filters org-export-latex-options-plist)) (region-p (org-region-act= ive-p)) (rbeg (and region-p (region-beginning))) (rend (and region-p (regio= n-end))) (subtree-p (if (plist-get opt-plist :ignore-subtree-p) nil (when r= egion-p (save-excursion (goto-char rbeg) (and (org-at-heading-p) (>=3D ... = rend)))))) (opt-plist (setq org-export-opt-plist (if subtree-p (org-export-= add-subtree-options opt-plist rbeg) opt-plist))) (org-export-latex-options-= plist (setq org-export-opt-plist opt-plist)) (org-current-export-dir (or pu= b-dir (org-export-directory :html opt-plist))) (org-current-export-file buf= fer-file-name) (title (or (and subtree-p (org-export-get-title-from-subtree= )) (plist-get opt-plist :title) (and (not (plist-get opt-plist :skip-before= -1st-heading)) (org-export-grab-title-from-buffer)) (and buffer-file-name (= file-name-sans-extension (file-name-nondirectory buffer-file-name))) "No Ti= tle")) (filename (and (not to-buffer) (concat (file-name-as-directory (or p= ub-dir (org-export-directory :LaTeX ext-plist))) (file-name-sans-extension = (or (and subtree-p ...) (file-name-nondirectory ...))) ".tex"))) (filename = (and filename (if (equal (file-truename filename) (file-truename (or buffer= -file-name "dummy.org"))) (concat filename ".tex") filename))) (buffer (if = to-buffer (cond ((eq to-buffer (quote string)) (get-buffer-create "*Org LaT= eX Export*")) (t (get-buffer-create to-buffer))) (find-file-noselect filena= me))) (odd org-odd-levels-only) (header (org-export-latex-make-header title= opt-plist)) (skip (cond (subtree-p nil) (region-p nil) (t (plist-get opt-p= list :skip-before-1st-heading)))) (text (plist-get opt-plist :text)) (org-e= xport-preprocess-hook (cons (\` (lambda nil (org-set-local (quote org-compl= ex-heading-regexp) (\, org-export-latex-complex-heading-re)))) org-export-p= reprocess-hook)) (first-lines (if skip "" (org-export-latex-first-lines opt= -plist (if subtree-p (save-excursion (goto-char rbeg) (point-at-bol 2)) rbe= g) (if region-p rend)))) (coding-system (and (boundp (quote buffer-file-cod= ing-system)) buffer-file-coding-system)) (coding-system-for-write (or org-e= xport-latex-coding-system coding-system)) (save-buffer-coding-system (or or= g-export-latex-coding-system coding-system)) (region (buffer-substring (if = region-p (region-beginning) (point-min)) (if region-p (region-end) (point-m= ax)))) (text (and text (string-match "\\S-" text) (org-export-preprocess-st= ring text :emph-multiline t :for-backend (quote latex) :comments nil :tags = (plist-get opt-plist :tags) :priority (plist-get opt-plist :priority) :foot= notes (plist-get opt-plist :footnotes) :drawers (plist-get opt-plist :drawe= rs) :timestamps (plist-get opt-plist :timestamps) :todo-keywords (plist-get= opt-plist :todo-keywords) :tasks (plist-get opt-plist :tasks) :add-text ni= l :skip-before-1st-heading skip :select-tags nil :exclude-tags nil :LaTeX-f= ragments nil))) (string-for-export (org-export-preprocess-string region :em= ph-multiline t :for-backend (quote latex) :comments nil :tags (plist-get op= t-plist :tags) :priority (plist-get opt-plist :priority) :footnotes (plist-= get opt-plist :footnotes) :drawers (plist-get opt-plist :drawers) :timestam= ps (plist-get opt-plist :timestamps) :todo-keywords (plist-get opt-plist :t= odo-keywords) :tasks (plist-get opt-plist :tasks) :add-text (if (eq to-buff= er (quote string)) nil text) :skip-before-1st-heading skip :select-tags (pl= ist-get opt-plist :select-tags) :exclude-tags (plist-get opt-plist :exclude= -tags) :LaTeX-fragments nil))) (set-buffer buffer) (erase-buffer) (org-inst= all-letbind) (and (fboundp (quote set-buffer-file-coding-system)) (set-buff= er-file-coding-system coding-system-for-write)) (unless (or (eq to-buffer (= quote string)) body-only) (insert header)) (when (and text (not (eq to-buff= er (quote string)))) (insert (org-export-latex-content text (quote (lists t= ables fixed-width keywords))) "\n\n")) (unless (or skip (string-match "^\\*= " first-lines)) (insert first-lines)) (org-export-latex-global (with-temp-b= uffer (insert string-for-export) (goto-char (point-min)) (when (re-search-f= orward "^\\(\\*+\\) " nil t) (let* ((asters (length ...)) (level (if odd ..= . ...))) (setq org-export-latex-add-level (if odd (1- ...) (1- asters))) (o= rg-export-latex-parse-global level odd))))) (unless body-only (insert "\n\\= end{document}")) (goto-char (point-min)) (while (re-search-forward "^[ ]*\= \\\item\\([ ]+\\)\\[" nil t) (delete-region (match-beginning 1) (match-end= 1))) (goto-char (point-min)) (when (re-search-forward "\\[TABLE-OF-CONTENT= S\\]" nil t) (goto-char (point-min)) (while (re-search-forward "\\\\tableof= contents\\>[ ]*\n?" nil t) (replace-match "")) (goto-char (point-min)) (an= d (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t) (replace-match "\\tab= leofcontents" t t))) (goto-char (point-min)) (while (re-search-forward "^[ = ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\label.*\\)*\n\\\\begin" nil t) = (delete-region (match-beginning 1) (match-end 1))) (goto-char (point-min)) = (while (re-search-forward "^[ ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\l= abel.*\\)*" nil t) (if (looking-at "[\n ]+") (replace-match "\n"))) (run-h= ooks (quote org-export-latex-final-hook)) (if to-buffer (unless (eq major-m= ode (quote latex-mode)) (latex-mode)) (save-buffer)) (org-export-latex-fix-= inputenc) (run-hooks (quote org-export-latex-after-save-hook)) (goto-char (= point-min)) (or (org-export-push-to-kill-ring "LaTeX") (message "Exporting = to LaTeX...done")) (prog1 (if (eq to-buffer (quote string)) (prog1 (buffer-= substring (point-min) (point-max)) (kill-buffer (current-buffer))) (current= -buffer)) (set-window-configuration wcf))) org-export-as-latex(nil) call-interactively(org-export-as-latex) (if (and bg (nth 2 ass) (not (buffer-base-buffer)) (not (org-region-activ= e-p))) (let ((p (start-process (concat "Exporting " (file-name-nondirectory= (buffer-file-name))) "*Org Processes*" (expand-file-name invocation-name i= nvocation-directory) "-batch" "-l" user-init-file "--eval" "(require 'org-e= xp)" "--eval" "(setq org-wait .2)" (buffer-file-name) "-f" (symbol-name (nt= h 1 ass))))) (set-process-sentinel p (quote org-export-process-sentinel)) (= message "Background process \"%s\": started" p)) (if subtree-p (progn (org-= mark-subtree) (activate-mark))) (call-interactively (nth 1 ass)) (when (and= bpos (get-buffer-window cbuf)) (let ((cw (selected-window))) (select-windo= w (get-buffer-window cbuf)) (goto-char cpos) (deactivate-mark) (select-wind= ow cw)))) (let* ((bg (org-xor (equal arg (quote (16))) org-export-run-in-background= )) (subtree-p (or (org-region-active-p) (eq org-export-initial-scope (quote= subtree)))) (help "[t] insert the export option template\n[v] limit ex= port to visible part of outline tree\n[1] switch buffer/subtree export\n[= SPC] publish enclosing subtree (with LaTeX_CLASS or EXPORT_FILE_NAME prop)\= n\n[a/n/u] export as ASCII/Latin-1/UTF-8 [A/N/U] to temporary buffe= r\n\n[h] export as HTML [H] to temporary buffer [R] export region\n[= b] export as HTML and open in browser\n\n[l] export as LaTeX [L] to tem= porary buffer\n[p] export as LaTeX and process to PDF [d] ... an= d open PDF file\n\n[D] export as DocBook [V] export as DocBook, process t= o PDF, and open\n\n[j] export as TaskJuggler [J] ..= . and open\n\n[m] export as Freemind mind map\n[x] export as XOXO\n[g] expo= rt using Wes Hardaker's generic exporter\n\n[i] export current file as iCal= endar file\n[I] export all agenda files as iCalendar files [c] ...as one = combined file\n\n[F] publish current file [P] publish current proj= ect\n[X] publish a project... [E] publish every projects") (cmds (= quote ((116 org-insert-export-options-template nil) (118 org-export-visible= nil) (97 org-export-as-ascii t) (65 org-export-as-ascii-to-buffer t) (110 = org-export-as-latin1 t) (78 org-export-as-latin1-to-buffer t) (117 org-expo= rt-as-utf8 t) (85 org-export-as-utf8-to-buffer t) (104 org-export-as-html t= ) (98 org-export-as-html-and-open t) (72 org-export-as-html-to-buffer nil) = (82 org-export-region-as-html nil) (120 org-export-as-xoxo t) (103 org-expo= rt-generic t) (68 org-export-as-docbook t) (86 org-export-as-docbook-pdf-an= d-open t) (106 org-export-as-taskjuggler t) (74 org-export-as-taskjuggler-a= nd-open t) (109 org-export-as-freemind t) (108 org-export-as-latex t) (112 = org-export-as-pdf t) (100 org-export-as-pdf-and-open t) (76 org-export-as-l= atex-to-buffer nil) (105 org-export-icalendar-this-file t) (73 org-export-i= calendar-all-agenda-files t) (99 org-export-icalendar-combine-agenda-files = t) (70 org-publish-current-file t) (80 org-publish-current-project t) (88 o= rg-publish t) (69 org-publish-all t)))) r1 r2 ass (cpos (point)) (cbuf (cur= rent-buffer)) bpos) (save-excursion (save-window-excursion (if subtree-p (m= essage "Export subtree: ") (message "Export buffer: ")) (delete-other-windo= ws) (with-output-to-temp-buffer "*Org Export/Publishing Help*" (princ help)= ) (org-fit-window-to-buffer (get-buffer-window "*Org Export/Publishing Help= *")) (while (eq (setq r1 (read-char-exclusive)) 49) (cond (subtree-p (setq = subtree-p nil) (message "Export buffer: ")) ((not subtree-p) (setq subtree-= p t) (message "Export subtree: ")))) (when (eq r1 32) (let ((case-fold-sear= ch t)) (if (re-search-backward "^[ ]+\\(:latex_class:\\|:export_title:\\)[= ]+\\S-" nil t) (progn (org-back-to-heading t) (setq subtree-p t) (setq bp= os ...) (message "Select command (for subtree): ") (setq r1 ...)) (error "N= o enclosing node with LaTeX_CLASS or EXPORT_FILE_NAME")))))) (redisplay) (a= nd bpos (goto-char bpos)) (setq r2 (if (< r1 27) (+ r1 96) r1)) (unless (se= tq ass (assq r2 cmds)) (error "No command associated with key %c" r1)) (if = (and bg (nth 2 ass) (not (buffer-base-buffer)) (not (org-region-active-p)))= (let ((p (start-process (concat "Exporting " (file-name-nondirectory ...))= "*Org Processes*" (expand-file-name invocation-name invocation-directory) = "-batch" "-l" user-init-file "--eval" "(require 'org-exp)" "--eval" "(setq = org-wait .2)" (buffer-file-name) "-f" (symbol-name (nth 1 ass))))) (set-pro= cess-sentinel p (quote org-export-process-sentinel)) (message "Background p= rocess \"%s\": started" p)) (if subtree-p (progn (org-mark-subtree) (activa= te-mark))) (call-interactively (nth 1 ass)) (when (and bpos (get-buffer-win= dow cbuf)) (let ((cw (selected-window))) (select-window (get-buffer-window = cbuf)) (goto-char cpos) (deactivate-mark) (select-window cw))))) org-export(nil) call-interactively(org-export nil nil) recursive-edit() byte-code("\306 @\307=3D\203!\310\311\312\"\210\313\311!\211A@)\242\314= =3D\203!\310\315\312\"\210\316=0B!\210\317 \210\320 !\210\f\203d\321ed\"V\2= 03Web\210\322\245y\210`=1Bdb\210\322\245Zy\210=1B`|\210)\323c\210eb\210\324= \325\326 \"\210\327\306!\210\324\330!\210\331\312=1C=1D\324\330!\210\212\33= 2 \210+\331\207" [unread-command-char debugger-args x debugger-buffer nonin= teractive debugger-batch-max-lines -1 debug backtrace-debug 4 t backtrace-f= rame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer count-lines= 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit midd= lestart buffer-read-only standard-output] 4) debug(error (error "Invalid search bound (wrong side of point)")) re-search-forward("\\s *\\'" 60 t) table--buffer-substring-and-trim(61 60) #[(from to) "\306\307 B!\307\n B!\"\310\311!r\fq\210\312\216=0Bc\210eb\2= 10\313\314\315\316#\203P\317\224\2036\212\317\224b\210\320c\210)\202=00\321= \224\203D\322\323\316\211#\210\202=00\322\324\325\326!\324Q!\210\202=00ed{+= rq\210=1E\204o`Sf\327=3D\203j\330\202k\331\332\261\210=1F\317V\203\213\333\= 334=1F=1E\203\203\335\202\204\330=0B$c\210\202\216=0Bc\210)\315=1E\317=1F != 8\211\")\207" [from y to line temp-buffer dest-buffer table--buffer-substri= ng-and-trim table--goto-coordinate generate-new-buffer " *temp*" ((byte-cod= e "\301!\203\n\302!\210\301\207" [temp-buffer buffer-name kill-buffer] 2)= ) re-search-forward "\\([#$~_^%{}]\\)\\|\\(\\\\\\)\\|\\([<>|]\\)" nil t 1 "= \\" 2 replace-match "$\\backslash$" "$" match-string 3 32 "" " " "& " forma= t "\\multicolumn{%d}{%sl|}{%s}" "|" first-p span i col-list start] 5](21 20) table--generate-source-scan-lines(# latex (45 . 60) (466 .= 520) (5 21) (2 4 7 10 13)) table-generate-source(latex "*org-export-table*" "caption") (let (tbl caption shortn label line floatp attr align rmlines) (setq line= (buffer-substring (point-at-bol) (point-at-eol)) label (org-get-text-prope= rty-any 0 (quote org-label) line) caption (org-get-text-property-any 0 (quo= te org-caption) line) shortn (org-get-text-property-any 0 (quote org-captio= n-shortn) line) attr (org-get-text-property-any 0 (quote org-attributes) li= ne) align (and attr (stringp attr) (string-match "\\" attr)) floatp (or label caption)) (and (get-buffer "*or= g-export-table*") (kill-buffer (get-buffer "*org-export-table*"))) (table-g= enerate-source (quote latex) "*org-export-table*" "caption") (setq tbl (wit= h-current-buffer "*org-export-table*" (buffer-string))) (while (string-matc= h "^%.*\n" tbl) (setq tbl (replace-match "" t t tbl))) (when rmlines (let (= (n 0) lines) (setq lines (mapcar (lambda (x) (if (string-match "^\\\\hline$= " x) (progn ... ...) x)) (org-split-string tbl "\n"))) (setq tbl (mapconcat= (quote identity) (delq nil lines) "\n")))) (when (and align (string-match = "\\\\begin{tabular}{.*}" tbl)) (setq tbl (replace-match (concat "\\begin{ta= bular}{" align "}") t t tbl))) (and (get-buffer "*org-export-table*") (kill= -buffer (get-buffer "*org-export-table*"))) (beginning-of-line 0) (while (l= ooking-at "[ ]*\\(|\\|\\+-\\)") (delete-region (point) (1+ (point-at-eol))= )) (when org-export-latex-tables-centered (setq tbl (concat "\\begin{center= }\n" tbl "\\end{center}"))) (when floatp (setq tbl (concat "\\begin{table}\= n" (format "\\caption%s{%s}%s\n" (if shortn (format "[%s]" shortn) "") (if = label (format "\\label{%s}" label) "") (or caption "")) tbl "\n\\end{table}= \n"))) (insert (org-export-latex-protect-string tbl))) org-export-latex-convert-table\.el-table() (if (get-text-property (point) (quote org-protected)) nil (require (quote= table)) (org-export-latex-convert-table\.el-table)) (unless (get-text-property (point) (quote org-protected)) (require (quote= table)) (org-export-latex-convert-table\.el-table)) (org-if-unprotected (require (quote table)) (org-export-latex-convert-tab= le\.el-table)) (while (re-search-forward "^[ ]*\\(\\+-[-+]*\\+\\)[ ]*\n[ ]*|" nil t) = (org-if-unprotected (require (quote table)) (org-export-latex-convert-table= \.el-table))) org-export-latex-tables(t) (if (memq (quote tables) exclude-list) nil (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (progn (org-install-letbind) (insert content) (unless (memq (quote timest= amps) exclude-list) (org-export-latex-time-stamps)) (unless (memq (quote qu= otation-marks) exclude-list) (org-export-latex-quotation-marks)) (unless (m= emq (quote emphasis) exclude-list) (when (plist-get org-export-latex-option= s-plist :emphasize) (org-export-latex-fontify))) (unless (memq (quote sub-s= uperscript) exclude-list) (org-export-latex-special-chars (plist-get org-ex= port-latex-options-plist :sub-superscript))) (unless (memq (quote links) ex= clude-list) (org-export-latex-links)) (unless (memq (quote keywords) exclud= e-list) (org-export-latex-keywords)) (unless (memq (quote lists) exclude-li= st) (org-export-latex-lists)) (unless (memq (quote tables) exclude-list) (o= rg-export-latex-tables (plist-get org-export-latex-options-plist :tables)))= (unless (memq (quote fixed-width) exclude-list) (org-export-latex-fixed-wi= dth (plist-get org-export-latex-options-plist :fixed-width))) (buffer-subst= ring (point-min) (point-max))) (unwind-protect (progn (org-install-letbind) (insert content) (unless (me= mq (quote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless= (memq (quote quotation-marks) exclude-list) (org-export-latex-quotation-ma= rks)) (unless (memq (quote emphasis) exclude-list) (when (plist-get org-exp= ort-latex-options-plist :emphasize) (org-export-latex-fontify))) (unless (m= emq (quote sub-superscript) exclude-list) (org-export-latex-special-chars (= plist-get org-export-latex-options-plist :sub-superscript))) (unless (memq = (quote links) exclude-list) (org-export-latex-links)) (unless (memq (quote = keywords) exclude-list) (org-export-latex-keywords)) (unless (memq (quote l= ists) exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) = exclude-list) (org-export-latex-tables (plist-get org-export-latex-options-= plist :tables))) (unless (memq (quote fixed-width) exclude-list) (org-expor= t-latex-fixed-width (plist-get org-export-latex-options-plist :fixed-width)= )) (buffer-substring (point-min) (point-max))) (and (buffer-name temp-buffe= r) (kill-buffer temp-buffer))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (org= -install-letbind) (insert content) (unless (memq (quote timestamps) exclude= -list) (org-export-latex-time-stamps)) (unless (memq (quote quotation-marks= ) exclude-list) (org-export-latex-quotation-marks)) (unless (memq (quote em= phasis) exclude-list) (when (plist-get org-export-latex-options-plist :emph= asize) (org-export-latex-fontify))) (unless (memq (quote sub-superscript) e= xclude-list) (org-export-latex-special-chars (plist-get org-export-latex-op= tions-plist :sub-superscript))) (unless (memq (quote links) exclude-list) (= org-export-latex-links)) (unless (memq (quote keywords) exclude-list) (org-= export-latex-keywords)) (unless (memq (quote lists) exclude-list) (org-expo= rt-latex-lists)) (unless (memq (quote tables) exclude-list) (org-export-lat= ex-tables (plist-get org-export-latex-options-plist :tables))) (unless (mem= q (quote fixed-width) exclude-list) (org-export-latex-fixed-width (plist-ge= t org-export-latex-options-plist :fixed-width))) (buffer-substring (point-m= in) (point-max))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))= )) (with-current-buffer temp-buffer (unwind-protect (progn (org-install-letb= ind) (insert content) (unless (memq (quote timestamps) exclude-list) (org-e= xport-latex-time-stamps)) (unless (memq (quote quotation-marks) exclude-lis= t) (org-export-latex-quotation-marks)) (unless (memq (quote emphasis) exclu= de-list) (when (plist-get org-export-latex-options-plist :emphasize) (org-e= xport-latex-fontify))) (unless (memq (quote sub-superscript) exclude-list) = (org-export-latex-special-chars (plist-get org-export-latex-options-plist := sub-superscript))) (unless (memq (quote links) exclude-list) (org-export-la= tex-links)) (unless (memq (quote keywords) exclude-list) (org-export-latex-= keywords)) (unless (memq (quote lists) exclude-list) (org-export-latex-list= s)) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (pl= ist-get org-export-latex-options-plist :tables))) (unless (memq (quote fixe= d-width) exclude-list) (org-export-latex-fixed-width (plist-get org-export-= latex-options-plist :fixed-width))) (buffer-substring (point-min) (point-ma= x))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-buffer= temp-buffer (unwind-protect (progn (org-install-letbind) (insert content) = (unless (memq (quote timestamps) exclude-list) (org-export-latex-time-stamp= s)) (unless (memq (quote quotation-marks) exclude-list) (org-export-latex-q= uotation-marks)) (unless (memq (quote emphasis) exclude-list) (when (plist-= get org-export-latex-options-plist :emphasize) (org-export-latex-fontify)))= (unless (memq (quote sub-superscript) exclude-list) (org-export-latex-spec= ial-chars (plist-get org-export-latex-options-plist :sub-superscript))) (un= less (memq (quote links) exclude-list) (org-export-latex-links)) (unless (m= emq (quote keywords) exclude-list) (org-export-latex-keywords)) (unless (me= mq (quote lists) exclude-list) (org-export-latex-lists)) (unless (memq (quo= te tables) exclude-list) (org-export-latex-tables (plist-get org-export-lat= ex-options-plist :tables))) (unless (memq (quote fixed-width) exclude-list)= (org-export-latex-fixed-width (plist-get org-export-latex-options-plist :f= ixed-width))) (buffer-substring (point-min) (point-max))) (and (buffer-name= temp-buffer) (kill-buffer temp-buffer))))) (with-temp-buffer (org-install-letbind) (insert content) (unless (memq (q= uote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless (mem= q (quote quotation-marks) exclude-list) (org-export-latex-quotation-marks))= (unless (memq (quote emphasis) exclude-list) (when (plist-get org-export-l= atex-options-plist :emphasize) (org-export-latex-fontify))) (unless (memq (= quote sub-superscript) exclude-list) (org-export-latex-special-chars (plist= -get org-export-latex-options-plist :sub-superscript))) (unless (memq (quot= e links) exclude-list) (org-export-latex-links)) (unless (memq (quote keywo= rds) exclude-list) (org-export-latex-keywords)) (unless (memq (quote lists)= exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) exclu= de-list) (org-export-latex-tables (plist-get org-export-latex-options-plist= :tables))) (unless (memq (quote fixed-width) exclude-list) (org-export-lat= ex-fixed-width (plist-get org-export-latex-options-plist :fixed-width))) (b= uffer-substring (point-min) (point-max))) org-export-latex-content(#("\n +---------------+---------------+\n = |Term |Percentage |\n +---------------+---------------+\n = |Quarter |25% |\n |One-Fourth | |= \n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+----------= -----+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100%= |\n |Whole | |\n +---------------+-= --------------+\n" 0 1 (fontified nil org-category "test") 1 5 (fontified n= il org-category "test") 5 22 (fontified nil org-category "test") 22 38 (fon= tified nil org-category "test") 38 39 (fontified nil org-category "test") 3= 9 43 (fontified nil org-category "test" org-caption nil org-caption-shortn = nil org-attributes nil org-label nil) 43 76 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 76 81 (fontified nil org-category "test") 81 98 (fontified nil org-catego= ry "test") 98 114 (fontified nil org-category "test") 114 115 (fontified ni= l org-category "test") 115 119 (fontified nil org-category "test" org-capti= on nil org-caption-shortn nil org-attributes nil org-label nil) 119 152 (fo= ntified nil org-category "test" org-caption nil org-caption-shortn nil org-= attributes nil org-label nil) 152 157 (fontified nil org-category "test" or= g-caption nil org-caption-shortn nil org-attributes nil org-label nil) 157 = 190 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 190 195 (fontified nil org-category "t= est") 195 212 (fontified nil org-category "test") 212 228 (fontified nil or= g-category "test") 228 229 (fontified nil org-category "test") 229 233 (fon= tified nil org-category "test" org-caption nil org-caption-shortn nil org-a= ttributes nil org-label nil) 233 266 (fontified nil org-category "test" org= -caption nil org-caption-shortn nil org-attributes nil org-label nil) 266 2= 71 (fontified nil org-category "test" org-caption nil org-caption-shortn ni= l org-attributes nil org-label nil) 271 304 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 304 309 (fontified nil org-category "test") 309 326 (fontified nil org-ca= tegory "test") 326 342 (fontified nil org-category "test") 342 343 (fontifi= ed nil org-category "test") 343 347 (fontified nil org-category "test" org-= caption nil org-caption-shortn nil org-attributes nil org-label nil) 347 38= 0 (fontified nil org-category "test" org-caption nil org-caption-shortn nil= org-attributes nil org-label nil) 380 385 (fontified nil org-category "tes= t" org-caption nil org-caption-shortn nil org-attributes nil org-label nil)= 385 418 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 418 423 (fontified nil org-catego= ry "test") 423 440 (fontified nil org-category "test") 440 456 (fontified n= il org-category "test") 456 457 (fontified nil org-category "test") 457 461= (fontified nil org-category "test" org-caption nil org-caption-shortn nil = org-attributes nil org-label nil) 461 494 (fontified nil org-category "test= " org-caption nil org-caption-shortn nil org-attributes nil org-label nil) = 494 495 (fontified nil org-category "test" org-caption nil org-caption-shor= tn nil org-attributes nil org-label nil) 495 499 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 499 532 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 532 537 (fontified nil org-= category "test") 537 554 (fontified nil org-category "test") 554 570 (fonti= fied nil org-category "test") 570 571 (fontified nil org-category "test"))) (insert (org-export-latex-content content)) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 1) (level . 3) (occur . 1) (heading .= #(" Table.el Table with no Spanning " 1 2 (target "sec-1" org-category "te= st" fontified nil) 2 32 (target "sec-1" org-category "test" fontified nil))= ) (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quarter = |25% |\n |One-Fourth | |\n +-------= --------+---------------+\n |Half |50% |\n |One-= by-Two | |\n +---------------+---------------+\n |T= hree-Quarters |75% |\n |Three-Fourths | |\n = +---------------+---------------+\n |Full |100% |\n= |Whole | |\n +---------------+---------------= +\n" 0 1 (fontified nil org-category "test") 1 5 (fontified nil org-categor= y "test") 5 22 (fontified nil org-category "test") 22 38 (fontified nil org= -category "test") 38 39 (fontified nil org-category "test") 39 43 (fontifie= d nil org-category "test" org-caption nil org-caption-shortn nil org-attrib= utes nil org-label nil) 43 76 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 76 81 (fonti= fied nil org-category "test") 81 98 (fontified nil org-category "test") 98 = 114 (fontified nil org-category "test") 114 115 (fontified nil org-category= "test") 115 119 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 119 152 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 152 157 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 157 190 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 190 195 (fontified nil org-category "test") 195 212 = (fontified nil org-category "test") 212 228 (fontified nil org-category "te= st") 228 229 (fontified nil org-category "test") 229 233 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 233 266 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 266 271 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 271 304 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 304 309 (fon= tified nil org-category "test") 309 326 (fontified nil org-category "test")= 326 342 (fontified nil org-category "test") 342 343 (fontified nil org-cat= egory "test") 343 347 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 347 380 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 380 385 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 385 418 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 418 423 (fontified nil org-category "test") 423= 440 (fontified nil org-category "test") 440 456 (fontified nil org-categor= y "test") 456 457 (fontified nil org-category "test") 457 461 (fontified ni= l org-category "test" org-caption nil org-caption-shortn nil org-attributes= nil org-label nil) 461 494 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 494 495 (fonti= fied nil org-category "test" org-caption nil org-caption-shortn nil org-att= ributes nil org-label nil) 495 499 (fontified nil org-category "test" org-c= aption nil org-caption-shortn nil org-attributes nil org-label nil) 499 532= (fontified nil org-category "test" org-caption nil org-caption-shortn nil = org-attributes nil org-label nil) 532 537 (fontified nil org-category "test= ") 537 554 (fontified nil org-category "test") 554 570 (fontified nil org-c= ategory "test") 570 571 (fontified nil org-category "test"))) (subcontent))= nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 1) (level . 3) (= occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (target "se= c-1" org-category "test" fontified nil) 2 32 (target "sec-1" org-category "= test" fontified nil))) (content . #("\n +---------------+---------------= +\n |Term |Percentage |\n +---------------+------------= ---+\n |Quarter |25% |\n |One-Fourth | = |\n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+---= ------------+\n |Three-Quarters |75% |\n |Three-Fourths |= |\n +---------------+---------------+\n |Full = |100% |\n |Whole | |\n +----------= -----+---------------+\n" 0 1 (fontified nil org-category "test") 1 5 (font= ified nil org-category "test") 5 22 (fontified nil org-category "test") 22 = 38 (fontified nil org-category "test") 38 39 (fontified nil org-category "t= est") 39 43 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 43 76 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 76 81 (fontified nil org-category "test") 81 98 (fontified nil org= -category "test") 98 114 (fontified nil org-category "test") 114 115 (fonti= fied nil org-category "test") 115 119 (fontified nil org-category "test" or= g-caption nil org-caption-shortn nil org-attributes nil org-label nil) 119 = 152 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 152 157 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 157 190 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 190 195 (fontified nil org-cate= gory "test") 195 212 (fontified nil org-category "test") 212 228 (fontified= nil org-category "test") 228 229 (fontified nil org-category "test") 229 2= 33 (fontified nil org-category "test" org-caption nil org-caption-shortn ni= l org-attributes nil org-label nil) 233 266 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 266 271 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 271 304 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 304 309 (fontified nil org-category "test") 309 326 (fontified nil= org-category "test") 326 342 (fontified nil org-category "test") 342 343 (= fontified nil org-category "test") 343 347 (fontified nil org-category "tes= t" org-caption nil org-caption-shortn nil org-attributes nil org-label nil)= 347 380 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 380 385 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 385 418 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 418 423 (fontified nil org= -category "test") 423 440 (fontified nil org-category "test") 440 456 (font= ified nil org-category "test") 456 457 (fontified nil org-category "test") = 457 461 (fontified nil org-category "test" org-caption nil org-caption-shor= tn nil org-attributes nil org-label nil) 461 494 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 494 495 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 495 499 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 499 532 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 532 537 (fontified n= il org-category "test") 537 554 (fontified nil org-category "test") 554 570= (fontified nil org-category "test") 570 571 (fontified nil org-category "t= est"))) (subcontent))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 1) (level = . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (targ= et "sec-1" org-category "test" fontified nil) 2 32 (target "sec-1" org-cate= gory "test" fontified nil))) (content . #("\n +---------------+---------= ------+\n |Term |Percentage |\n +---------------+------= ---------+\n |Quarter |25% |\n |One-Fourth | = |\n +---------------+---------------+\n |Half |= 50% |\n |One-by-Two | |\n +-------------= --+---------------+\n |Three-Quarters |75% |\n |Three-Four= ths | |\n +---------------+---------------+\n |Full = |100% |\n |Whole | |\n +----= -----------+---------------+\n" 0 1 (fontified nil org-category "test") 1 5= (fontified nil org-category "test") 5 22 (fontified nil org-category "test= ") 22 38 (fontified nil org-category "test") 38 39 (fontified nil org-categ= ory "test") 39 43 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 43 76 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fontified n= il org-category "test") 98 114 (fontified nil org-category "test") 114 115 = (fontified nil org-category "test") 115 119 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 119 152 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 152 157 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 157 190 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 190 195 (fontified nil or= g-category "test") 195 212 (fontified nil org-category "test") 212 228 (fon= tified nil org-category "test") 228 229 (fontified nil org-category "test")= 229 233 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 233 266 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 266 271 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 271 304 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 304 309 (fontified nil org-category "test") 309 326 (fontifi= ed nil org-category "test") 326 342 (fontified nil org-category "test") 342= 343 (fontified nil org-category "test") 343 347 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 347 380 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 380 385 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 385 418 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 418 423 (fontified n= il org-category "test") 423 440 (fontified nil org-category "test") 440 456= (fontified nil org-category "test") 456 457 (fontified nil org-category "t= est") 457 461 (fontified nil org-category "test" org-caption nil org-captio= n-shortn nil org-attributes nil org-label nil) 461 494 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 494 495 (fontified nil org-category "test" org-caption nil org= -caption-shortn nil org-attributes nil org-label nil) 495 499 (fontified ni= l org-category "test" org-caption nil org-caption-shortn nil org-attributes= nil org-label nil) 499 532 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 532 537 (fonti= fied nil org-category "test") 537 554 (fontified nil org-category "test") 5= 54 570 (fontified nil org-category "test") 570 571 (fontified nil org-categ= ory "test"))) (subcontent)))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 1) (level . 3) (occur . 1) (heading . #(" T= able.el Table with no Spanning " 1 2 (target "sec-1" org-category "test" fo= ntified nil) 2 32 (target "sec-1" org-category "test" fontified nil))) (con= tent . #("\n +---------------+---------------+\n |Term |Per= centage |\n +---------------+---------------+\n |Quarter |= 25% |\n |One-Fourth | |\n +-------------= --+---------------+\n |Half |50% |\n |One-by-Two= | |\n +---------------+---------------+\n |Three-Q= uarters |75% |\n |Three-Fourths | |\n +----= -----------+---------------+\n |Full |100% |\n |W= hole | |\n +---------------+---------------+\n" 0= 1 (fontified nil org-category "test") 1 5 (fontified nil org-category "tes= t") 5 22 (fontified nil org-category "test") 22 38 (fontified nil org-categ= ory "test") 38 39 (fontified nil org-category "test") 39 43 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 43 76 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 76 81 (fontified n= il org-category "test") 81 98 (fontified nil org-category "test") 98 114 (f= ontified nil org-category "test") 114 115 (fontified nil org-category "test= ") 115 119 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 119 152 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 152 157 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 157 190 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 190 195 (fontified nil org-category "test") 195 212 (fonti= fied nil org-category "test") 212 228 (fontified nil org-category "test") 2= 28 229 (fontified nil org-category "test") 229 233 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 233 266 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 266 271 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 271 304 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 304 309 (fontified= nil org-category "test") 309 326 (fontified nil org-category "test") 326 3= 42 (fontified nil org-category "test") 342 343 (fontified nil org-category = "test") 343 347 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 347 380 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 380 385 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 385 418 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 418 423 (fontified nil org-category "test") 423 440 (= fontified nil org-category "test") 440 456 (fontified nil org-category "tes= t") 456 457 (fontified nil org-category "test") 457 461 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 461 494 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 494 495 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 495 499 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 499 532 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 532 537 (fontified nil org-category "test") 537= 554 (fontified nil org-category "test") 554 570 (fontified nil org-categor= y "test") 570 571 (fontified nil org-category "test"))) (subcontent)))) (if (eq (car content) (quote subcontent)) (mapc (quote org-export-latex-s= ub) (cdr content)) (org-export-latex-sub (car content))) org-export-latex-global(((((pos . 1) (level . 3) (occur . 1) (heading . #= (" Table.el Table with no Spanning " 1 2 (target "sec-1" org-category "test= " fontified nil) 2 32 (target "sec-1" org-category "test" fontified nil))) = (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quarter = |25% |\n |One-Fourth | |\n +---------= ------+---------------+\n |Half |50% |\n |One-by= -Two | |\n +---------------+---------------+\n |Thr= ee-Quarters |75% |\n |Three-Fourths | |\n += ---------------+---------------+\n |Full |100% |\n = |Whole | |\n +---------------+---------------+\= n" 0 1 (fontified nil org-category "test") 1 5 (fontified nil org-category = "test") 5 22 (fontified nil org-category "test") 22 38 (fontified nil org-c= ategory "test") 38 39 (fontified nil org-category "test") 39 43 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 43 76 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 76 81 (fontifi= ed nil org-category "test") 81 98 (fontified nil org-category "test") 98 11= 4 (fontified nil org-category "test") 114 115 (fontified nil org-category "= test") 115 119 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 119 152 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 152 157 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 157 190 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 190 195 (fontified nil org-category "test") 195 212 (f= ontified nil org-category "test") 212 228 (fontified nil org-category "test= ") 228 229 (fontified nil org-category "test") 229 233 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 233 266 (fontified nil org-category "test" org-caption nil org= -caption-shortn nil org-attributes nil org-label nil) 266 271 (fontified ni= l org-category "test" org-caption nil org-caption-shortn nil org-attributes= nil org-label nil) 271 304 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 304 309 (fonti= fied nil org-category "test") 309 326 (fontified nil org-category "test") 3= 26 342 (fontified nil org-category "test") 342 343 (fontified nil org-categ= ory "test") 343 347 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 347 380 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 380 385 (fontified nil org-category "test" org-caption n= il org-caption-shortn nil org-attributes nil org-label nil) 385 418 (fontif= ied nil org-category "test" org-caption nil org-caption-shortn nil org-attr= ibutes nil org-label nil) 418 423 (fontified nil org-category "test") 423 4= 40 (fontified nil org-category "test") 440 456 (fontified nil org-category = "test") 456 457 (fontified nil org-category "test") 457 461 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 461 494 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 494 495 (fontifi= ed nil org-category "test" org-caption nil org-caption-shortn nil org-attri= butes nil org-label nil) 495 499 (fontified nil org-category "test" org-cap= tion nil org-caption-shortn nil org-attributes nil org-label nil) 499 532 (= fontified nil org-category "test" org-caption nil org-caption-shortn nil or= g-attributes nil org-label nil) 532 537 (fontified nil org-category "test")= 537 554 (fontified nil org-category "test") 554 570 (fontified nil org-cat= egory "test") 570 571 (fontified nil org-category "test"))) (subcontent))))) (let* ((wcf (current-window-configuration)) (opt-plist (org-export-proces= s-option-filters org-export-latex-options-plist)) (region-p (org-region-act= ive-p)) (rbeg (and region-p (region-beginning))) (rend (and region-p (regio= n-end))) (subtree-p (if (plist-get opt-plist :ignore-subtree-p) nil (when r= egion-p (save-excursion (goto-char rbeg) (and (org-at-heading-p) (>=3D ... = rend)))))) (opt-plist (setq org-export-opt-plist (if subtree-p (org-export-= add-subtree-options opt-plist rbeg) opt-plist))) (org-export-latex-options-= plist (setq org-export-opt-plist opt-plist)) (org-current-export-dir (or pu= b-dir (org-export-directory :html opt-plist))) (org-current-export-file buf= fer-file-name) (title (or (and subtree-p (org-export-get-title-from-subtree= )) (plist-get opt-plist :title) (and (not (plist-get opt-plist :skip-before= -1st-heading)) (org-export-grab-title-from-buffer)) (and buffer-file-name (= file-name-sans-extension (file-name-nondirectory buffer-file-name))) "No Ti= tle")) (filename (and (not to-buffer) (concat (file-name-as-directory (or p= ub-dir (org-export-directory :LaTeX ext-plist))) (file-name-sans-extension = (or (and subtree-p ...) (file-name-nondirectory ...))) ".tex"))) (filename = (and filename (if (equal (file-truename filename) (file-truename (or buffer= -file-name "dummy.org"))) (concat filename ".tex") filename))) (buffer (if = to-buffer (cond ((eq to-buffer (quote string)) (get-buffer-create "*Org LaT= eX Export*")) (t (get-buffer-create to-buffer))) (find-file-noselect filena= me))) (odd org-odd-levels-only) (header (org-export-latex-make-header title= opt-plist)) (skip (cond (subtree-p nil) (region-p nil) (t (plist-get opt-p= list :skip-before-1st-heading)))) (text (plist-get opt-plist :text)) (org-e= xport-preprocess-hook (cons (\` (lambda nil (org-set-local (quote org-compl= ex-heading-regexp) (\, org-export-latex-complex-heading-re)))) org-export-p= reprocess-hook)) (first-lines (if skip "" (org-export-latex-first-lines opt= -plist (if subtree-p (save-excursion (goto-char rbeg) (point-at-bol 2)) rbe= g) (if region-p rend)))) (coding-system (and (boundp (quote buffer-file-cod= ing-system)) buffer-file-coding-system)) (coding-system-for-write (or org-e= xport-latex-coding-system coding-system)) (save-buffer-coding-system (or or= g-export-latex-coding-system coding-system)) (region (buffer-substring (if = region-p (region-beginning) (point-min)) (if region-p (region-end) (point-m= ax)))) (text (and text (string-match "\\S-" text) (org-export-preprocess-st= ring text :emph-multiline t :for-backend (quote latex) :comments nil :tags = (plist-get opt-plist :tags) :priority (plist-get opt-plist :priority) :foot= notes (plist-get opt-plist :footnotes) :drawers (plist-get opt-plist :drawe= rs) :timestamps (plist-get opt-plist :timestamps) :todo-keywords (plist-get= opt-plist :todo-keywords) :tasks (plist-get opt-plist :tasks) :add-text ni= l :skip-before-1st-heading skip :select-tags nil :exclude-tags nil :LaTeX-f= ragments nil))) (string-for-export (org-export-preprocess-string region :em= ph-multiline t :for-backend (quote latex) :comments nil :tags (plist-get op= t-plist :tags) :priority (plist-get opt-plist :priority) :footnotes (plist-= get opt-plist :footnotes) :drawers (plist-get opt-plist :drawers) :timestam= ps (plist-get opt-plist :timestamps) :todo-keywords (plist-get opt-plist :t= odo-keywords) :tasks (plist-get opt-plist :tasks) :add-text (if (eq to-buff= er (quote string)) nil text) :skip-before-1st-heading skip :select-tags (pl= ist-get opt-plist :select-tags) :exclude-tags (plist-get opt-plist :exclude= -tags) :LaTeX-fragments nil))) (set-buffer buffer) (erase-buffer) (org-inst= all-letbind) (and (fboundp (quote set-buffer-file-coding-system)) (set-buff= er-file-coding-system coding-system-for-write)) (unless (or (eq to-buffer (= quote string)) body-only) (insert header)) (when (and text (not (eq to-buff= er (quote string)))) (insert (org-export-latex-content text (quote (lists t= ables fixed-width keywords))) "\n\n")) (unless (or skip (string-match "^\\*= " first-lines)) (insert first-lines)) (org-export-latex-global (with-temp-b= uffer (insert string-for-export) (goto-char (point-min)) (when (re-search-f= orward "^\\(\\*+\\) " nil t) (let* ((asters (length ...)) (level (if odd ..= . ...))) (setq org-export-latex-add-level (if odd (1- ...) (1- asters))) (o= rg-export-latex-parse-global level odd))))) (unless body-only (insert "\n\\= end{document}")) (goto-char (point-min)) (while (re-search-forward "^[ ]*\= \\\item\\([ ]+\\)\\[" nil t) (delete-region (match-beginning 1) (match-end= 1))) (goto-char (point-min)) (when (re-search-forward "\\[TABLE-OF-CONTENT= S\\]" nil t) (goto-char (point-min)) (while (re-search-forward "\\\\tableof= contents\\>[ ]*\n?" nil t) (replace-match "")) (goto-char (point-min)) (an= d (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t) (replace-match "\\tab= leofcontents" t t))) (goto-char (point-min)) (while (re-search-forward "^[ = ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\label.*\\)*\n\\\\begin" nil t) = (delete-region (match-beginning 1) (match-end 1))) (goto-char (point-min)) = (while (re-search-forward "^[ ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\l= abel.*\\)*" nil t) (if (looking-at "[\n ]+") (replace-match "\n"))) (run-h= ooks (quote org-export-latex-final-hook)) (if to-buffer (unless (eq major-m= ode (quote latex-mode)) (latex-mode)) (save-buffer)) (org-export-latex-fix-= inputenc) (run-hooks (quote org-export-latex-after-save-hook)) (goto-char (= point-min)) (or (org-export-push-to-kill-ring "LaTeX") (message "Exporting = to LaTeX...done")) (prog1 (if (eq to-buffer (quote string)) (prog1 (buffer-= substring (point-min) (point-max)) (kill-buffer (current-buffer))) (current= -buffer)) (set-window-configuration wcf))) org-export-as-latex(nil nil (:ignore-subtree-p t) "*Org LaTeX Export*" ni= l) (setq rtn (org-export-as-latex nil nil ext-plist buffer body-only)) (let ((transient-mark-mode t) (zmacs-regions t) ext-plist rtn) (setq ext-= plist (plist-put ext-plist :ignore-subtree-p t)) (goto-char end) (set-mark = (point)) (goto-char beg) (setq rtn (org-export-as-latex nil nil ext-plist b= uffer body-only)) (if (fboundp (quote deactivate-mark)) (deactivate-mark)) = (if (and (interactive-p) (bufferp rtn)) (switch-to-buffer-other-window rtn)= rtn)) org-export-region-as-latex(13448 14054 nil) call-interactively(org-export-region-as-latex t nil) execute-extended-command(nil) call-interactively(execute-extended-command nil nil) recursive-edit() byte-code("\306 @\307=3D\203!\310\311\312\"\210\313\311!\211A@)\242\314= =3D\203!\310\315\312\"\210\316=0B!\210\317 \210\320 !\210\f\203d\321ed\"V\2= 03Web\210\322\245y\210`=1Bdb\210\322\245Zy\210=1B`|\210)\323c\210eb\210\324= \325\326 \"\210\327\306!\210\324\330!\210\331\312=1C=1D\324\330!\210\212\33= 2 \210+\331\207" [unread-command-char debugger-args x debugger-buffer nonin= teractive debugger-batch-max-lines -1 debug backtrace-debug 4 t backtrace-f= rame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer count-lines= 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit midd= lestart buffer-read-only standard-output] 4) debug(error (error "Invalid search bound (wrong side of point)")) re-search-forward("\\s *\\'" 60 t) table--buffer-substring-and-trim(61 60) #[(from to) "\306\307 B!\307\n B!\"\310\311!r\fq\210\312\216=0Bc\210eb\2= 10\313\314\315\316#\203P\317\224\2036\212\317\224b\210\320c\210)\202=00\321= \224\203D\322\323\316\211#\210\202=00\322\324\325\326!\324Q!\210\202=00ed{+= rq\210=1E\204o`Sf\327=3D\203j\330\202k\331\332\261\210=1F\317V\203\213\333\= 334=1F=1E\203\203\335\202\204\330=0B$c\210\202\216=0Bc\210)\315=1E\317=1F != 8\211\")\207" [from y to line temp-buffer dest-buffer table--buffer-substri= ng-and-trim table--goto-coordinate generate-new-buffer " *temp*" ((byte-cod= e "\301!\203\n\302!\210\301\207" [temp-buffer buffer-name kill-buffer] 2)= ) re-search-forward "\\([#$~_^%{}]\\)\\|\\(\\\\\\)\\|\\([<>|]\\)" nil t 1 "= \\" 2 replace-match "$\\backslash$" "$" match-string 3 32 "" " " "& " forma= t "\\multicolumn{%d}{%sl|}{%s}" "|" first-p span i col-list start] 5](21 20) table--generate-source-scan-lines(# latex (45 . 60) (466 .= 520) (5 21) (2 4 7 10 13)) table-generate-source(latex "*org-export-table*" "caption") (let (tbl caption shortn label line floatp attr align rmlines) (setq line= (buffer-substring (point-at-bol) (point-at-eol)) label (org-get-text-prope= rty-any 0 (quote org-label) line) caption (org-get-text-property-any 0 (quo= te org-caption) line) shortn (org-get-text-property-any 0 (quote org-captio= n-shortn) line) attr (org-get-text-property-any 0 (quote org-attributes) li= ne) align (and attr (stringp attr) (string-match "\\" attr)) floatp (or label caption)) (and (get-buffer "*or= g-export-table*") (kill-buffer (get-buffer "*org-export-table*"))) (table-g= enerate-source (quote latex) "*org-export-table*" "caption") (setq tbl (wit= h-current-buffer "*org-export-table*" (buffer-string))) (while (string-matc= h "^%.*\n" tbl) (setq tbl (replace-match "" t t tbl))) (when rmlines (let (= (n 0) lines) (setq lines (mapcar (lambda (x) (if (string-match "^\\\\hline$= " x) (progn ... ...) x)) (org-split-string tbl "\n"))) (setq tbl (mapconcat= (quote identity) (delq nil lines) "\n")))) (when (and align (string-match = "\\\\begin{tabular}{.*}" tbl)) (setq tbl (replace-match (concat "\\begin{ta= bular}{" align "}") t t tbl))) (and (get-buffer "*org-export-table*") (kill= -buffer (get-buffer "*org-export-table*"))) (beginning-of-line 0) (while (l= ooking-at "[ ]*\\(|\\|\\+-\\)") (delete-region (point) (1+ (point-at-eol))= )) (when org-export-latex-tables-centered (setq tbl (concat "\\begin{center= }\n" tbl "\\end{center}"))) (when floatp (setq tbl (concat "\\begin{table}\= n" (format "\\caption%s{%s}%s\n" (if shortn (format "[%s]" shortn) "") (if = label (format "\\label{%s}" label) "") (or caption "")) tbl "\n\\end{table}= \n"))) (insert (org-export-latex-protect-string tbl))) org-export-latex-convert-table\.el-table() (if (get-text-property (point) (quote org-protected)) nil (require (quote= table)) (org-export-latex-convert-table\.el-table)) (unless (get-text-property (point) (quote org-protected)) (require (quote= table)) (org-export-latex-convert-table\.el-table)) (org-if-unprotected (require (quote table)) (org-export-latex-convert-tab= le\.el-table)) (while (re-search-forward "^[ ]*\\(\\+-[-+]*\\+\\)[ ]*\n[ ]*|" nil t) = (org-if-unprotected (require (quote table)) (org-export-latex-convert-table= \.el-table))) org-export-latex-tables(t) (if (memq (quote tables) exclude-list) nil (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (plis= t-get org-export-latex-options-plist :tables))) (progn (org-install-letbind) (insert content) (unless (memq (quote timest= amps) exclude-list) (org-export-latex-time-stamps)) (unless (memq (quote qu= otation-marks) exclude-list) (org-export-latex-quotation-marks)) (unless (m= emq (quote emphasis) exclude-list) (when (plist-get org-export-latex-option= s-plist :emphasize) (org-export-latex-fontify))) (unless (memq (quote sub-s= uperscript) exclude-list) (org-export-latex-special-chars (plist-get org-ex= port-latex-options-plist :sub-superscript))) (unless (memq (quote links) ex= clude-list) (org-export-latex-links)) (unless (memq (quote keywords) exclud= e-list) (org-export-latex-keywords)) (unless (memq (quote lists) exclude-li= st) (org-export-latex-lists)) (unless (memq (quote tables) exclude-list) (o= rg-export-latex-tables (plist-get org-export-latex-options-plist :tables)))= (unless (memq (quote fixed-width) exclude-list) (org-export-latex-fixed-wi= dth (plist-get org-export-latex-options-plist :fixed-width))) (buffer-subst= ring (point-min) (point-max))) (unwind-protect (progn (org-install-letbind) (insert content) (unless (me= mq (quote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless= (memq (quote quotation-marks) exclude-list) (org-export-latex-quotation-ma= rks)) (unless (memq (quote emphasis) exclude-list) (when (plist-get org-exp= ort-latex-options-plist :emphasize) (org-export-latex-fontify))) (unless (m= emq (quote sub-superscript) exclude-list) (org-export-latex-special-chars (= plist-get org-export-latex-options-plist :sub-superscript))) (unless (memq = (quote links) exclude-list) (org-export-latex-links)) (unless (memq (quote = keywords) exclude-list) (org-export-latex-keywords)) (unless (memq (quote l= ists) exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) = exclude-list) (org-export-latex-tables (plist-get org-export-latex-options-= plist :tables))) (unless (memq (quote fixed-width) exclude-list) (org-expor= t-latex-fixed-width (plist-get org-export-latex-options-plist :fixed-width)= )) (buffer-substring (point-min) (point-max))) (and (buffer-name temp-buffe= r) (kill-buffer temp-buffer))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (org= -install-letbind) (insert content) (unless (memq (quote timestamps) exclude= -list) (org-export-latex-time-stamps)) (unless (memq (quote quotation-marks= ) exclude-list) (org-export-latex-quotation-marks)) (unless (memq (quote em= phasis) exclude-list) (when (plist-get org-export-latex-options-plist :emph= asize) (org-export-latex-fontify))) (unless (memq (quote sub-superscript) e= xclude-list) (org-export-latex-special-chars (plist-get org-export-latex-op= tions-plist :sub-superscript))) (unless (memq (quote links) exclude-list) (= org-export-latex-links)) (unless (memq (quote keywords) exclude-list) (org-= export-latex-keywords)) (unless (memq (quote lists) exclude-list) (org-expo= rt-latex-lists)) (unless (memq (quote tables) exclude-list) (org-export-lat= ex-tables (plist-get org-export-latex-options-plist :tables))) (unless (mem= q (quote fixed-width) exclude-list) (org-export-latex-fixed-width (plist-ge= t org-export-latex-options-plist :fixed-width))) (buffer-substring (point-m= in) (point-max))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))= )) (with-current-buffer temp-buffer (unwind-protect (progn (org-install-letb= ind) (insert content) (unless (memq (quote timestamps) exclude-list) (org-e= xport-latex-time-stamps)) (unless (memq (quote quotation-marks) exclude-lis= t) (org-export-latex-quotation-marks)) (unless (memq (quote emphasis) exclu= de-list) (when (plist-get org-export-latex-options-plist :emphasize) (org-e= xport-latex-fontify))) (unless (memq (quote sub-superscript) exclude-list) = (org-export-latex-special-chars (plist-get org-export-latex-options-plist := sub-superscript))) (unless (memq (quote links) exclude-list) (org-export-la= tex-links)) (unless (memq (quote keywords) exclude-list) (org-export-latex-= keywords)) (unless (memq (quote lists) exclude-list) (org-export-latex-list= s)) (unless (memq (quote tables) exclude-list) (org-export-latex-tables (pl= ist-get org-export-latex-options-plist :tables))) (unless (memq (quote fixe= d-width) exclude-list) (org-export-latex-fixed-width (plist-get org-export-= latex-options-plist :fixed-width))) (buffer-substring (point-min) (point-ma= x))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))) (let ((temp-buffer (generate-new-buffer " *temp*"))) (with-current-buffer= temp-buffer (unwind-protect (progn (org-install-letbind) (insert content) = (unless (memq (quote timestamps) exclude-list) (org-export-latex-time-stamp= s)) (unless (memq (quote quotation-marks) exclude-list) (org-export-latex-q= uotation-marks)) (unless (memq (quote emphasis) exclude-list) (when (plist-= get org-export-latex-options-plist :emphasize) (org-export-latex-fontify)))= (unless (memq (quote sub-superscript) exclude-list) (org-export-latex-spec= ial-chars (plist-get org-export-latex-options-plist :sub-superscript))) (un= less (memq (quote links) exclude-list) (org-export-latex-links)) (unless (m= emq (quote keywords) exclude-list) (org-export-latex-keywords)) (unless (me= mq (quote lists) exclude-list) (org-export-latex-lists)) (unless (memq (quo= te tables) exclude-list) (org-export-latex-tables (plist-get org-export-lat= ex-options-plist :tables))) (unless (memq (quote fixed-width) exclude-list)= (org-export-latex-fixed-width (plist-get org-export-latex-options-plist :f= ixed-width))) (buffer-substring (point-min) (point-max))) (and (buffer-name= temp-buffer) (kill-buffer temp-buffer))))) (with-temp-buffer (org-install-letbind) (insert content) (unless (memq (q= uote timestamps) exclude-list) (org-export-latex-time-stamps)) (unless (mem= q (quote quotation-marks) exclude-list) (org-export-latex-quotation-marks))= (unless (memq (quote emphasis) exclude-list) (when (plist-get org-export-l= atex-options-plist :emphasize) (org-export-latex-fontify))) (unless (memq (= quote sub-superscript) exclude-list) (org-export-latex-special-chars (plist= -get org-export-latex-options-plist :sub-superscript))) (unless (memq (quot= e links) exclude-list) (org-export-latex-links)) (unless (memq (quote keywo= rds) exclude-list) (org-export-latex-keywords)) (unless (memq (quote lists)= exclude-list) (org-export-latex-lists)) (unless (memq (quote tables) exclu= de-list) (org-export-latex-tables (plist-get org-export-latex-options-plist= :tables))) (unless (memq (quote fixed-width) exclude-list) (org-export-lat= ex-fixed-width (plist-get org-export-latex-options-plist :fixed-width))) (b= uffer-substring (point-min) (point-max))) org-export-latex-content(#("\n +---------------+---------------+\n = |Term |Percentage |\n +---------------+---------------+\n = |Quarter |25% |\n |One-Fourth | |= \n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+----------= -----+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100%= |\n |Whole | |\n +---------------+-= --------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-categor= y "test") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-c= ategory "test") 22 38 (fontified nil org-category "test") 38 39 (fontified = nil org-category "test") 39 43 (fontified nil org-category "test" org-capti= on nil org-caption-shortn nil org-attributes nil org-label nil) 43 76 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98= (fontified nil org-category "test") 98 114 (fontified nil org-category "te= st") 114 115 (fontified nil org-category "test") 115 119 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 119 152 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 152 157 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 157 190 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fon= tified nil org-category "test") 195 212 (fontified nil org-category "test")= 212 228 (fontified nil org-category "test") 228 229 (fontified nil org-cat= egory "test") 229 233 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 233 266 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 266 271 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 271 304 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 304 309 (fontified nil org-category "test") 309= 326 (fontified nil org-category "test") 326 342 (fontified nil org-categor= y "test") 342 343 (fontified nil org-category "test") 343 347 (fontified ni= l org-category "test" org-caption nil org-caption-shortn nil org-attributes= nil org-label nil) 347 380 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 380 385 (fonti= fied nil org-category "test" org-caption nil org-caption-shortn nil org-att= ributes nil org-label nil) 385 418 (fontified nil org-category "test" org-c= aption nil org-caption-shortn nil org-attributes nil org-label nil) 418 423= (fontified nil org-category "test") 423 440 (fontified nil org-category "t= est") 440 456 (fontified nil org-category "test") 456 457 (fontified nil or= g-category "test") 457 461 (fontified nil org-category "test" org-caption n= il org-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontif= ied nil org-category "test" org-caption nil org-caption-shortn nil org-attr= ibutes nil org-label nil) 494 495 (fontified nil org-category "test" org-ca= ption nil org-caption-shortn nil org-attributes nil org-label nil) 495 532 = (fontified nil org-category "test" org-caption nil org-caption-shortn nil o= rg-attributes nil org-label nil) 532 571 (fontified nil org-category "test"= ) 571 576 (fontified nil org-category "test") 576 577 (fontified nil org-ca= tegory "test") 577 578 (fontified nil org-category "test") 578 580 (fontifi= ed nil org-category "test") 580 581 (fontified nil org-category "test") 581= 582 (fontified nil org-category "test") 582 583 (fontified nil org-categor= y "test") 583 584 (fontified nil org-category "test") 584 585 (fontified ni= l org-category "test") 585 586 (fontified nil org-category "test"))) (insert (org-export-latex-content content)) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 71) (level . 3) (occur . 1) (heading = . #(" Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-categor= y "test" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontif= ied nil))) (content . #("\n +---------------+---------------+\n |Term= |Percentage |\n +---------------+---------------+\n |Q= uarter |25% |\n |One-Fourth | |\n = +---------------+---------------+\n |Half |50% |\n= |One-by-Two | |\n +---------------+---------------= +\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+------= ---------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "te= st") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-catego= ry "test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil o= rg-category "test") 39 43 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fon= tified nil org-category "test") 98 114 (fontified nil org-category "test") = 114 115 (fontified nil org-category "test") 115 119 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 119 152 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 157 190 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fontifie= d nil org-category "test") 195 212 (fontified nil org-category "test") 212 = 228 (fontified nil org-category "test") 228 229 (fontified nil org-category= "test") 229 233 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 233 266 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 266 271 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 271 304 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 304 309 (fontified nil org-category "test") 309 326 = (fontified nil org-category "test") 326 342 (fontified nil org-category "te= st") 342 343 (fontified nil org-category "test") 343 347 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 347 380 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 380 385 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 385 418 (fontified nil org-category "test" org-captio= n nil org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fon= tified nil org-category "test") 423 440 (fontified nil org-category "test")= 440 456 (fontified nil org-category "test") 456 457 (fontified nil org-cat= egory "test") 457 461 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontified n= il org-category "test" org-caption nil org-caption-shortn nil org-attribute= s nil org-label nil) 494 495 (fontified nil org-category "test" org-caption= nil org-caption-shortn nil org-attributes nil org-label nil) 495 532 (font= ified nil org-category "test" org-caption nil org-caption-shortn nil org-at= tributes nil org-label nil) 532 571 (fontified nil org-category "test") 571= 576 (fontified nil org-category "test") 576 577 (fontified nil org-categor= y "test") 577 578 (fontified nil org-category "test") 578 580 (fontified ni= l org-category "test") 580 581 (fontified nil org-category "test") 581 582 = (fontified nil org-category "test") 582 583 (fontified nil org-category "te= st") 583 584 (fontified nil org-category "test") 584 585 (fontified nil org= -category "test") 585 586 (fontified nil org-category "test"))) (subcontent= )) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 71) (level . 3) = (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (target "s= ec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1" org-c= ategory "test" fontified nil))) (content . #("\n +---------------+------= ---------+\n |Term |Percentage |\n +---------------+---= ------------+\n |Quarter |25% |\n |One-Fourth |= |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +----------= -----+---------------+\n |Three-Quarters |75% |\n |Three-F= ourths | |\n +---------------+---------------+\n |Full= |100% |\n |Whole | |\n +-= --------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified= nil org-category "test") 1 5 (fontified nil org-category "test") 5 22 (fon= tified nil org-category "test") 22 38 (fontified nil org-category "test") 3= 8 39 (fontified nil org-category "test") 39 43 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 43 76 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-catego= ry "test") 81 98 (fontified nil org-category "test") 98 114 (fontified nil = org-category "test") 114 115 (fontified nil org-category "test") 115 119 (f= ontified nil org-category "test" org-caption nil org-caption-shortn nil org= -attributes nil org-label nil) 119 152 (fontified nil org-category "test" o= rg-caption nil org-caption-shortn nil org-attributes nil org-label nil) 152= 157 (fontified nil org-category "test" org-caption nil org-caption-shortn = nil org-attributes nil org-label nil) 157 190 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 190 195 (fontified nil org-category "test") 195 212 (fontified nil org-= category "test") 212 228 (fontified nil org-category "test") 228 229 (fonti= fied nil org-category "test") 229 233 (fontified nil org-category "test" or= g-caption nil org-caption-shortn nil org-attributes nil org-label nil) 233 = 266 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 266 271 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 271 304 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 304 309 (fontified nil org-cate= gory "test") 309 326 (fontified nil org-category "test") 326 342 (fontified= nil org-category "test") 342 343 (fontified nil org-category "test") 343 3= 47 (fontified nil org-category "test" org-caption nil org-caption-shortn ni= l org-attributes nil org-label nil) 347 380 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 380 385 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 385 418 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 418 423 (fontified nil org-category "test") 423 440 (fontified nil= org-category "test") 440 456 (fontified nil org-category "test") 456 457 (= fontified nil org-category "test") 457 461 (fontified nil org-category "tes= t" org-caption nil org-caption-shortn nil org-attributes nil org-label nil)= 461 494 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 494 495 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 495 532 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 532 571 (fontified nil org= -category "test") 571 576 (fontified nil org-category "test") 576 577 (font= ified nil org-category "test") 577 578 (fontified nil org-category "test") = 578 580 (fontified nil org-category "test") 580 581 (fontified nil org-cate= gory "test") 581 582 (fontified nil org-category "test") 582 583 (fontified= nil org-category "test") 583 584 (fontified nil org-category "test") 584 5= 85 (fontified nil org-category "test") 585 586 (fontified nil org-category = "test"))) (subcontent))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 71) (level= . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (tar= get "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1"= org-category "test" fontified nil))) (content . #("\n +---------------+= ---------------+\n |Term |Percentage |\n +-------------= --+---------------+\n |Quarter |25% |\n |One-Fourth= | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +----= -----------+---------------+\n |Three-Quarters |75% |\n |T= hree-Fourths | |\n +---------------+---------------+\n = |Full |100% |\n |Whole | |\n= +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fon= tified nil org-category "test") 1 5 (fontified nil org-category "test") 5 2= 2 (fontified nil org-category "test") 22 38 (fontified nil org-category "te= st") 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 43 76 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-= category "test") 81 98 (fontified nil org-category "test") 98 114 (fontifie= d nil org-category "test") 114 115 (fontified nil org-category "test") 115 = 119 (fontified nil org-category "test" org-caption nil org-caption-shortn n= il org-attributes nil org-label nil) 119 152 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 152 157 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 157 190 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 190 195 (fontified nil org-category "test") 195 212 (fontified ni= l org-category "test") 212 228 (fontified nil org-category "test") 228 229 = (fontified nil org-category "test") 229 233 (fontified nil org-category "te= st" org-caption nil org-caption-shortn nil org-attributes nil org-label nil= ) 233 266 (fontified nil org-category "test" org-caption nil org-caption-sh= ortn nil org-attributes nil org-label nil) 266 271 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 271 304 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 304 309 (fontified nil or= g-category "test") 309 326 (fontified nil org-category "test") 326 342 (fon= tified nil org-category "test") 342 343 (fontified nil org-category "test")= 343 347 (fontified nil org-category "test" org-caption nil org-caption-sho= rtn nil org-attributes nil org-label nil) 347 380 (fontified nil org-catego= ry "test" org-caption nil org-caption-shortn nil org-attributes nil org-lab= el nil) 380 385 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 385 418 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 418 423 (fontified nil org-category "test") 423 440 (fontifi= ed nil org-category "test") 440 456 (fontified nil org-category "test") 456= 457 (fontified nil org-category "test") 457 461 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 461 494 (fontified nil org-category "test" org-caption nil org-capti= on-shortn nil org-attributes nil org-label nil) 494 495 (fontified nil org-= category "test" org-caption nil org-caption-shortn nil org-attributes nil o= rg-label nil) 495 532 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 532 571 (fontified n= il org-category "test") 571 576 (fontified nil org-category "test") 576 577= (fontified nil org-category "test") 577 578 (fontified nil org-category "t= est") 578 580 (fontified nil org-category "test") 580 581 (fontified nil or= g-category "test") 581 582 (fontified nil org-category "test") 582 583 (fon= tified nil org-category "test") 583 584 (fontified nil org-category "test")= 584 585 (fontified nil org-category "test") 585 586 (fontified nil org-cat= egory "test"))) (subcontent)))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 71) (level . 3) (occur . 1) (heading . #(" = Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-category "tes= t" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontified ni= l))) (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quarter= |25% |\n |One-Fourth | |\n +----= -----------+---------------+\n |Half |50% |\n |O= ne-by-Two | |\n +---------------+---------------+\n = |Three-Quarters |75% |\n |Three-Fourths | |\n= +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+------------= ---+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1= 5 (fontified nil org-category "test") 5 22 (fontified nil org-category "te= st") 22 38 (fontified nil org-category "test") 38 39 (fontified nil org-cat= egory "test") 39 43 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fontified= nil org-category "test") 98 114 (fontified nil org-category "test") 114 11= 5 (fontified nil org-category "test") 115 119 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 119 152 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 152 157 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 157 190 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 190 195 (fontified nil = org-category "test") 195 212 (fontified nil org-category "test") 212 228 (f= ontified nil org-category "test") 228 229 (fontified nil org-category "test= ") 229 233 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 233 266 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 266 271 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 271 304 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 304 309 (fontified nil org-category "test") 309 326 (fonti= fied nil org-category "test") 326 342 (fontified nil org-category "test") 3= 42 343 (fontified nil org-category "test") 343 347 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 347 380 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 380 385 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 385 418 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fontified= nil org-category "test") 423 440 (fontified nil org-category "test") 440 4= 56 (fontified nil org-category "test") 456 457 (fontified nil org-category = "test") 457 461 (fontified nil org-category "test" org-caption nil org-capt= ion-shortn nil org-attributes nil org-label nil) 461 494 (fontified nil org= -category "test" org-caption nil org-caption-shortn nil org-attributes nil = org-label nil) 494 495 (fontified nil org-category "test" org-caption nil o= rg-caption-shortn nil org-attributes nil org-label nil) 495 532 (fontified = nil org-category "test" org-caption nil org-caption-shortn nil org-attribut= es nil org-label nil) 532 571 (fontified nil org-category "test") 571 576 (= fontified nil org-category "test") 576 577 (fontified nil org-category "tes= t") 577 578 (fontified nil org-category "test") 578 580 (fontified nil org-= category "test") 580 581 (fontified nil org-category "test") 581 582 (fonti= fied nil org-category "test") 582 583 (fontified nil org-category "test") 5= 83 584 (fontified nil org-category "test") 584 585 (fontified nil org-categ= ory "test") 585 586 (fontified nil org-category "test"))) (subcontent)))) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (whi= le (org-looking-back "\n\n") (backward-delete-char 1)) (org-export-latex-su= b subcontent))) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 55) (level . 2) (occur . 1) (heading = . #(" Tables " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7= (target "sec-1_1" org-category "test" fontified nil))) (content . #("\n\n\= n\n\n" 0 1 (fontified nil org-category "test") 1 3 (fontified nil org-categ= ory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-= category "test"))) (subcontent (((pos . 71) (level . 3) (occur . 1) (headin= g . #(" Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-categ= ory "test" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" font= ified nil))) (content . #("\n +---------------+---------------+\n |Te= rm |Percentage |\n +---------------+---------------+\n = |Quarter |25% |\n |One-Fourth | |\n = +---------------+---------------+\n |Half |50% |= \n |One-by-Two | |\n +---------------+-------------= --+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+----= -----------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-cate= gory "test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil= org-category "test") 39 43 (fontified nil org-category "test" org-caption = nil org-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontifi= ed nil org-category "test" org-caption nil org-caption-shortn nil org-attri= butes nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (f= ontified nil org-category "test") 98 114 (fontified nil org-category "test"= ) 114 115 (fontified nil org-category "test") 115 119 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 119 152 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 157 190 (fontified nil org-category "test" org-caption n= il org-caption-shortn nil org-attributes nil org-label nil) 190 195 (fontif= ied nil org-category "test") 195 212 (fontified nil org-category "test") 21= 2 228 (fontified nil org-category "test") 228 229 (fontified nil org-catego= ry "test") 229 233 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 233 266 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 266 271 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 271 304 (fontifi= ed nil org-category "test" org-caption nil org-caption-shortn nil org-attri= butes nil org-label nil) 304 309 (fontified nil org-category "test") 309 32= 6 (fontified nil org-category "test") 326 342 (fontified nil org-category "= test") 342 343 (fontified nil org-category "test") 343 347 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 347 380 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 380 385 (fontifie= d nil org-category "test" org-caption nil org-caption-shortn nil org-attrib= utes nil org-label nil) 385 418 (fontified nil org-category "test" org-capt= ion nil org-caption-shortn nil org-attributes nil org-label nil) 418 423 (f= ontified nil org-category "test") 423 440 (fontified nil org-category "test= ") 440 456 (fontified nil org-category "test") 456 457 (fontified nil org-c= ategory "test") 457 461 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 461 494 (fontified= nil org-category "test" org-caption nil org-caption-shortn nil org-attribu= tes nil org-label nil) 494 495 (fontified nil org-category "test" org-capti= on nil org-caption-shortn nil org-attributes nil org-label nil) 495 532 (fo= ntified nil org-category "test" org-caption nil org-caption-shortn nil org-= attributes nil org-label nil) 532 571 (fontified nil org-category "test") 5= 71 576 (fontified nil org-category "test") 576 577 (fontified nil org-categ= ory "test") 577 578 (fontified nil org-category "test") 578 580 (fontified = nil org-category "test") 580 581 (fontified nil org-category "test") 581 58= 2 (fontified nil org-category "test") 582 583 (fontified nil org-category "= test") 583 584 (fontified nil org-category "test") 584 585 (fontified nil o= rg-category "test") 585 586 (fontified nil org-category "test"))) (subconte= nt))))) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 55) (level . 2) = (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-category "tes= t" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontified nil))= ) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1 3 (fo= ntified nil org-category "test") 3 4 (fontified nil org-category "test") 4 = 5 (fontified nil org-category "test"))) (subcontent (((pos . 71) (level . 3= ) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (target = "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_1" org= -category "test" fontified nil))) (content . #("\n +---------------+----= -----------+\n |Term |Percentage |\n +---------------+-= --------------+\n |Quarter |25% |\n |One-Fourth = | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +--------= -------+---------------+\n |Three-Quarters |75% |\n |Three= -Fourths | |\n +---------------+---------------+\n |Fu= ll |100% |\n |Whole | |\n = +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontifi= ed nil org-category "test") 1 5 (fontified nil org-category "test") 5 22 (f= ontified nil org-category "test") 22 38 (fontified nil org-category "test")= 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-categor= y "test" org-caption nil org-caption-shortn nil org-attributes nil org-labe= l nil) 43 76 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 76 81 (fontified nil org-cate= gory "test") 81 98 (fontified nil org-category "test") 98 114 (fontified ni= l org-category "test") 114 115 (fontified nil org-category "test") 115 119 = (fontified nil org-category "test" org-caption nil org-caption-shortn nil o= rg-attributes nil org-label nil) 119 152 (fontified nil org-category "test"= org-caption nil org-caption-shortn nil org-attributes nil org-label nil) 1= 52 157 (fontified nil org-category "test" org-caption nil org-caption-short= n nil org-attributes nil org-label nil) 157 190 (fontified nil org-category= "test" org-caption nil org-caption-shortn nil org-attributes nil org-label= nil) 190 195 (fontified nil org-category "test") 195 212 (fontified nil or= g-category "test") 212 228 (fontified nil org-category "test") 228 229 (fon= tified nil org-category "test") 229 233 (fontified nil org-category "test" = org-caption nil org-caption-shortn nil org-attributes nil org-label nil) 23= 3 266 (fontified nil org-category "test" org-caption nil org-caption-shortn= nil org-attributes nil org-label nil) 266 271 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 271 304 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 304 309 (fontified nil org-ca= tegory "test") 309 326 (fontified nil org-category "test") 326 342 (fontifi= ed nil org-category "test") 342 343 (fontified nil org-category "test") 343= 347 (fontified nil org-category "test" org-caption nil org-caption-shortn = nil org-attributes nil org-label nil) 347 380 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 380 385 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 385 418 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 418 423 (fontified nil org-category "test") 423 440 (fontified n= il org-category "test") 440 456 (fontified nil org-category "test") 456 457= (fontified nil org-category "test") 457 461 (fontified nil org-category "t= est" org-caption nil org-caption-shortn nil org-attributes nil org-label ni= l) 461 494 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 494 495 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 495 532 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 532 571 (fontified nil o= rg-category "test") 571 576 (fontified nil org-category "test") 576 577 (fo= ntified nil org-category "test") 577 578 (fontified nil org-category "test"= ) 578 580 (fontified nil org-category "test") 580 581 (fontified nil org-ca= tegory "test") 581 582 (fontified nil org-category "test") 582 583 (fontifi= ed nil org-category "test") 583 584 (fontified nil org-category "test") 584= 585 (fontified nil org-category "test") 585 586 (fontified nil org-categor= y "test"))) (subcontent)))))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 55) (level= . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-categor= y "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontified= nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test") 1= 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "tes= t") 4 5 (fontified nil org-category "test"))) (subcontent (((pos . 71) (lev= el . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning " 1 2 (t= arget "sec-1_1_1" org-category "test" fontified nil) 2 32 (target "sec-1_1_= 1" org-category "test" fontified nil))) (content . #("\n +--------------= -+---------------+\n |Term |Percentage |\n +-----------= ----+---------------+\n |Quarter |25% |\n |One-Four= th | |\n +---------------+---------------+\n |Half = |50% |\n |One-by-Two | |\n +--= -------------+---------------+\n |Three-Quarters |75% |\n = |Three-Fourths | |\n +---------------+---------------+\n = |Full |100% |\n |Whole | |= \n +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 5 (fontified nil org-category "test") 5= 22 (fontified nil org-category "test") 22 38 (fontified nil org-category "= test") 38 39 (fontified nil org-category "test") 39 43 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 43 76 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 76 81 (fontified nil or= g-category "test") 81 98 (fontified nil org-category "test") 98 114 (fontif= ied nil org-category "test") 114 115 (fontified nil org-category "test") 11= 5 119 (fontified nil org-category "test" org-caption nil org-caption-shortn= nil org-attributes nil org-label nil) 119 152 (fontified nil org-category = "test" org-caption nil org-caption-shortn nil org-attributes nil org-label = nil) 152 157 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 157 190 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 190 195 (fontified nil org-category "test") 195 212 (fontified = nil org-category "test") 212 228 (fontified nil org-category "test") 228 22= 9 (fontified nil org-category "test") 229 233 (fontified nil org-category "= test" org-caption nil org-caption-shortn nil org-attributes nil org-label n= il) 233 266 (fontified nil org-category "test" org-caption nil org-caption-= shortn nil org-attributes nil org-label nil) 266 271 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 271 304 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 304 309 (fontified nil = org-category "test") 309 326 (fontified nil org-category "test") 326 342 (f= ontified nil org-category "test") 342 343 (fontified nil org-category "test= ") 343 347 (fontified nil org-category "test" org-caption nil org-caption-s= hortn nil org-attributes nil org-label nil) 347 380 (fontified nil org-cate= gory "test" org-caption nil org-caption-shortn nil org-attributes nil org-l= abel nil) 380 385 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 385 418 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 418 423 (fontified nil org-category "test") 423 440 (fonti= fied nil org-category "test") 440 456 (fontified nil org-category "test") 4= 56 457 (fontified nil org-category "test") 457 461 (fontified nil org-categ= ory "test" org-caption nil org-caption-shortn nil org-attributes nil org-la= bel nil) 461 494 (fontified nil org-category "test" org-caption nil org-cap= tion-shortn nil org-attributes nil org-label nil) 494 495 (fontified nil or= g-category "test" org-caption nil org-caption-shortn nil org-attributes nil= org-label nil) 495 532 (fontified nil org-category "test" org-caption nil = org-caption-shortn nil org-attributes nil org-label nil) 532 571 (fontified= nil org-category "test") 571 576 (fontified nil org-category "test") 576 5= 77 (fontified nil org-category "test") 577 578 (fontified nil org-category = "test") 578 580 (fontified nil org-category "test") 580 581 (fontified nil = org-category "test") 581 582 (fontified nil org-category "test") 582 583 (f= ontified nil org-category "test") 583 584 (fontified nil org-category "test= ") 584 585 (fontified nil org-category "test") 585 586 (fontified nil org-c= ategory "test"))) (subcontent))))))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 55) (level . 2) (occur . 1) (heading . #(" = Tables " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7 (targ= et "sec-1_1" org-category "test" fontified nil))) (content . #("\n\n\n\n\n"= 0 1 (fontified nil org-category "test") 1 3 (fontified nil org-category "t= est") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-catego= ry "test"))) (subcontent (((pos . 71) (level . 3) (occur . 1) (heading . #(= " Table.el Table with no Spanning " 1 2 (target "sec-1_1_1" org-category "t= est" fontified nil) 2 32 (target "sec-1_1_1" org-category "test" fontified = nil))) (content . #("\n +---------------+---------------+\n |Term = |Percentage |\n +---------------+---------------+\n |Quart= er |25% |\n |One-Fourth | |\n +--= -------------+---------------+\n |Half |50% |\n = |One-by-Two | |\n +---------------+---------------+\n = |Three-Quarters |75% |\n |Three-Fourths | |= \n +---------------+---------------+\n |Full |100% = |\n |Whole | |\n +---------------+----------= -----+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "test")= 1 5 (fontified nil org-category "test") 5 22 (fontified nil org-category "= test") 22 38 (fontified nil org-category "test") 38 39 (fontified nil org-c= ategory "test") 39 43 (fontified nil org-category "test" org-caption nil or= g-caption-shortn nil org-attributes nil org-label nil) 43 76 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 76 81 (fontified nil org-category "test") 81 98 (fontifi= ed nil org-category "test") 98 114 (fontified nil org-category "test") 114 = 115 (fontified nil org-category "test") 115 119 (fontified nil org-category= "test" org-caption nil org-caption-shortn nil org-attributes nil org-label= nil) 119 152 (fontified nil org-category "test" org-caption nil org-captio= n-shortn nil org-attributes nil org-label nil) 152 157 (fontified nil org-c= ategory "test" org-caption nil org-caption-shortn nil org-attributes nil or= g-label nil) 157 190 (fontified nil org-category "test" org-caption nil org= -caption-shortn nil org-attributes nil org-label nil) 190 195 (fontified ni= l org-category "test") 195 212 (fontified nil org-category "test") 212 228 = (fontified nil org-category "test") 228 229 (fontified nil org-category "te= st") 229 233 (fontified nil org-category "test" org-caption nil org-caption= -shortn nil org-attributes nil org-label nil) 233 266 (fontified nil org-ca= tegory "test" org-caption nil org-caption-shortn nil org-attributes nil org= -label nil) 266 271 (fontified nil org-category "test" org-caption nil org-= caption-shortn nil org-attributes nil org-label nil) 271 304 (fontified nil= org-category "test" org-caption nil org-caption-shortn nil org-attributes = nil org-label nil) 304 309 (fontified nil org-category "test") 309 326 (fon= tified nil org-category "test") 326 342 (fontified nil org-category "test")= 342 343 (fontified nil org-category "test") 343 347 (fontified nil org-cat= egory "test" org-caption nil org-caption-shortn nil org-attributes nil org-= label nil) 347 380 (fontified nil org-category "test" org-caption nil org-c= aption-shortn nil org-attributes nil org-label nil) 380 385 (fontified nil = org-category "test" org-caption nil org-caption-shortn nil org-attributes n= il org-label nil) 385 418 (fontified nil org-category "test" org-caption ni= l org-caption-shortn nil org-attributes nil org-label nil) 418 423 (fontifi= ed nil org-category "test") 423 440 (fontified nil org-category "test") 440= 456 (fontified nil org-category "test") 456 457 (fontified nil org-categor= y "test") 457 461 (fontified nil org-category "test" org-caption nil org-ca= ption-shortn nil org-attributes nil org-label nil) 461 494 (fontified nil o= rg-category "test" org-caption nil org-caption-shortn nil org-attributes ni= l org-label nil) 494 495 (fontified nil org-category "test" org-caption nil= org-caption-shortn nil org-attributes nil org-label nil) 495 532 (fontifie= d nil org-category "test" org-caption nil org-caption-shortn nil org-attrib= utes nil org-label nil) 532 571 (fontified nil org-category "test") 571 576= (fontified nil org-category "test") 576 577 (fontified nil org-category "t= est") 577 578 (fontified nil org-category "test") 578 580 (fontified nil or= g-category "test") 580 581 (fontified nil org-category "test") 581 582 (fon= tified nil org-category "test") 582 583 (fontified nil org-category "test")= 583 584 (fontified nil org-category "test") 584 585 (fontified nil org-cat= egory "test") 585 586 (fontified nil org-category "test"))) (subcontent))))= ))) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (whi= le (org-looking-back "\n\n") (backward-delete-char 1)) (org-export-latex-su= b subcontent))) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D nu= m level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0 = 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec)= ))) (insert (format start (if main-heading main-heading heading) (or sub-he= ading ""))) (insert "\n") (when label (insert (mapconcat (lambda (l) (forma= t "\\label{%s}" l)) label-list "\n") "\n")) (insert (org-export-latex-conte= nt content)) (cond ((stringp subcontent) (insert subcontent)) ((listp subco= ntent) (while (org-looking-back "\n\n") (backward-delete-char 1)) (org-expo= rt-latex-sub subcontent))) (when (and end (string-match "[^ ]" end)) (let = ((hook (org-get-text-property-any 0 (quote org-insert-hook) end))) (and (fu= nctionp hook) (funcall hook))) (insert end "\n"))) (cond ((<=3D level depth) (let* ((sec (nth (1- level) sectioning)) (num (= if (integerp num) (>=3D num level) num)) start end) (if (consp (cdr sec)) (= setq start (nth (if num 0 2) sec) end (nth (if num 1 3) sec)) (setq start (= if num (car sec) (cdr sec)))) (insert (format start (if main-heading main-h= eading heading) (or sub-heading ""))) (insert "\n") (when label (insert (ma= pconcat (lambda (l) (format "\\label{%s}" l)) label-list "\n") "\n")) (inse= rt (org-export-latex-content content)) (cond ((stringp subcontent) (insert = subcontent)) ((listp subcontent) (while (org-looking-back "\n\n") (backward= -delete-char 1)) (org-export-latex-sub subcontent))) (when (and end (string= -match "[^ ]" end)) (let ((hook (org-get-text-property-any 0 ... end))) (a= nd (functionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) = (cond ((eq org-export-latex-low-levels (quote description)) (if (string-mat= ch "% ends low level$" (buffer-substring (point-at-bol 0) (point))) (delete= -region (point-at-bol 0) (point)) (insert "\\begin{description}\n")) (inser= t (format "\n\\item[%s]%s~\n" heading (if label (format "\\label{%s}" label= ) ""))) (insert (org-export-latex-content content)) (cond ((stringp subcont= ent) (insert subcontent)) ((listp subcontent) (org-export-latex-sub subcont= ent))) (insert "\\end{description} % ends low level\n")) ((memq org-export-= latex-low-levels (quote (itemize enumerate))) (if (string-match "% ends low= level$" (buffer-substring (point-at-bol 0) (point))) (delete-region (point= -at-bol 0) (point)) (insert (format "\\begin{%s}\n" (symbol-name org-export= -latex-low-levels)))) (insert (format "\n\\item %s\\\\\n%s%%" heading (if l= abel (format "\\label{%s}" label) ""))) (insert (org-export-latex-content c= ontent)) (cond ((stringp subcontent) (insert subcontent)) ((listp subconten= t) (org-export-latex-sub subcontent))) (insert (format "\\end{%s} %% ends l= ow level\n" (symbol-name org-export-latex-low-levels)))) ((listp org-export= -latex-low-levels) (if (string-match "% ends low level$" (buffer-substring = (point-at-bol 0) (point))) (delete-region (point-at-bol 0) (point)) (insert= (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-export= -latex-low-levels) heading (if label (format "\\label{%s}" label) ""))) (in= sert (org-export-latex-content content)) (cond ((stringp subcontent) (inser= t subcontent)) ((listp subcontent) (org-export-latex-sub subcontent))) (ins= ert (nth 1 org-export-latex-low-levels) " %% ends low level\n")) ((stringp = org-export-latex-low-levels) (insert (format org-export-latex-low-levels he= ading) "\n") (when label (insert (format "\\label{%s}\n" label))) (insert (= org-export-latex-content content)) (cond ((stringp subcontent) (insert subc= ontent)) ((listp subcontent) (org-export-latex-sub subcontent))))))) (let* ((heading (cdr (assoc (quote heading) subcontent))) (level (- (cdr = (assoc (quote level) subcontent)) org-export-latex-add-level)) (occur (numb= er-to-string (cdr (assoc (quote occur) subcontent)))) (content (cdr (assoc = (quote content) subcontent))) (subcontent (cadr (assoc (quote subcontent) s= ubcontent))) (label (org-get-text-property-any 0 (quote target) heading)) (= label-list (cons label (cdr (assoc label org-export-target-aliases)))) (sec= tioning org-export-latex-sectioning) (depth org-export-latex-sectioning-dep= th) main-heading sub-heading) (when (symbolp (car sectioning)) (setq sectio= ning (funcall (car sectioning) level heading)) (when sectioning (setq headi= ng (car sectioning) sectioning (cdr sectioning) label (org-get-text-propert= y-any 0 (quote target) heading) label-list (cons label (cdr (assoc label or= g-export-target-aliases))))) (if sectioning (setq sectioning (make-list 10 = sectioning))) (setq depth (if sectioning 10000 0))) (if (string-match "[ ]= *\\\\\\\\[ ]*" heading) (setq main-heading (substring heading 0 (match-beg= inning 0)) sub-heading (substring heading (match-end 0)))) (setq heading (o= rg-export-latex-fontify-headline heading) sub-heading (and sub-heading (org= -export-latex-fontify-headline sub-heading)) main-heading (and main-heading= (org-export-latex-fontify-headline main-heading))) (cond ((<=3D level dept= h) (let* ((sec (nth (1- level) sectioning)) (num (if (integerp num) (>=3D n= um level) num)) start end) (if (consp (cdr sec)) (setq start (nth (if num 0= 2) sec) end (nth (if num 1 3) sec)) (setq start (if num (car sec) (cdr sec= )))) (insert (format start (if main-heading main-heading heading) (or sub-h= eading ""))) (insert "\n") (when label (insert (mapconcat (lambda ... ...) = label-list "\n") "\n")) (insert (org-export-latex-content content)) (cond (= (stringp subcontent) (insert subcontent)) ((listp subcontent) (while (org-l= ooking-back "\n\n") (backward-delete-char 1)) (org-export-latex-sub subcont= ent))) (when (and end (string-match "[^ ]" end)) (let ((hook ...)) (and (f= unctionp hook) (funcall hook))) (insert end "\n")))) ((> level depth) (cond= ((eq org-export-latex-low-levels (quote description)) (if (string-match "%= ends low level$" (buffer-substring ... ...)) (delete-region (point-at-bol = 0) (point)) (insert "\\begin{description}\n")) (insert (format "\n\\item[%s= ]%s~\n" heading (if label ... ""))) (insert (org-export-latex-content conte= nt)) (cond ((stringp subcontent) (insert subcontent)) ((listp subcontent) (= org-export-latex-sub subcontent))) (insert "\\end{description} % ends low l= evel\n")) ((memq org-export-latex-low-levels (quote (itemize enumerate))) (= if (string-match "% ends low level$" (buffer-substring ... ...)) (delete-re= gion (point-at-bol 0) (point)) (insert (format "\\begin{%s}\n" ...))) (inse= rt (format "\n\\item %s\\\\\n%s%%" heading (if label ... ""))) (insert (org= -export-latex-content content)) (cond ((stringp subcontent) (insert subcont= ent)) ((listp subcontent) (org-export-latex-sub subcontent))) (insert (form= at "\\end{%s} %% ends low level\n" (symbol-name org-export-latex-low-levels= )))) ((listp org-export-latex-low-levels) (if (string-match "% ends low lev= el$" (buffer-substring ... ...)) (delete-region (point-at-bol 0) (point)) (= insert (car org-export-latex-low-levels) "\n")) (insert (format (nth 2 org-= export-latex-low-levels) heading (if label ... ""))) (insert (org-export-la= tex-content content)) (cond ((stringp subcontent) (insert subcontent)) ((li= stp subcontent) (org-export-latex-sub subcontent))) (insert (nth 1 org-expo= rt-latex-low-levels) " %% ends low level\n")) ((stringp org-export-latex-lo= w-levels) (insert (format org-export-latex-low-levels heading) "\n") (when = label (insert (format "\\label{%s}\n" label))) (insert (org-export-latex-co= ntent content)) (cond ((stringp subcontent) (insert subcontent)) ((listp su= bcontent) (org-export-latex-sub subcontent)))))))) org-export-latex-subcontent(((pos . 4) (level . 1) (occur . 1) (heading .= #(" Sample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "= test" fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil= ))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-cate= gory "test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org= -category "test") 3 4 (fontified nil org-category "test") 4 5 (fontified ni= l org-category "test") 5 6 (fontified nil org-category "test") 6 7 (fontifi= ed nil org-category "test") 7 8 (fontified nil org-category "test") 8 9 (fo= ntified nil org-category "test") 9 10 (fontified nil org-category "test") 1= 0 12 (fontified nil org-category "test") 12 13 (fontified nil org-category = "test") 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55= ) (level . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org= -category "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" f= ontified nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 3 (fontified nil org-category "test") 3 4 (fontified nil org-categ= ory "test") 4 5 (fontified nil org-category "test"))) (subcontent (((pos . = 71) (level . 3) (occur . 1) (heading . #(" Table.el Table with no Spanning = " 1 2 ... 2 32 ...)) (content . #("\n +---------------+---------------+\= n |Term |Percentage |\n +---------------+--------------= -+\n |Quarter |25% |\n |One-Fourth | = |\n +---------------+---------------+\n |Half |50% = |\n |One-by-Two | |\n +---------------+-----= ----------+\n |Three-Quarters |75% |\n |Three-Fourths | = |\n +---------------+---------------+\n |Full = |100% |\n |Whole | |\n +------------= ---+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 ... 1 5 ... 5 22 ... = 22 38 ... 38 39 ... 39 43 ... 43 76 ... 76 81 ... 81 98 ... 98 114 ... 114 = 115 ... 115 119 ... 119 152 ... 152 157 ... 157 190 ... 190 195 ... 195 212= ... 212 228 ... 228 229 ... 229 233 ... 233 266 ... 266 271 ... 271 304 ..= . 304 309 ... 309 326 ... 326 342 ... 342 343 ... 343 347 ... 347 380 ... 3= 80 385 ... 385 418 ... 418 423 ... 423 440 ... 440 456 ... 456 457 ... 457 = 461 ... 461 494 ... 494 495 ... 495 532 ... 532 571 ... 571 576 ... 576 577= ... 577 578 ... 578 580 ... 580 581 ... 581 582 ... 582 583 ... 583 584 ..= . 584 585 ... 585 586 ...)) (subcontent)))))))) nil) (lambda (x) (org-export-latex-subcontent x num))(((pos . 4) (level . 1) (= occur . 1) (heading . #(" Sample Content (Proof Of Concept) " 1 2 (target "= sec-1" org-category "test" fontified nil) 2 34 (target "sec-1" org-category= "test" fontified nil))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 2 (fontified nil org-category "test") 2= 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "tes= t") 4 5 (fontified nil org-category "test") 5 6 (fontified nil org-category= "test") 6 7 (fontified nil org-category "test") 7 8 (fontified nil org-cat= egory "test") 8 9 (fontified nil org-category "test") 9 10 (fontified nil o= rg-category "test") 10 12 (fontified nil org-category "test") 12 13 (fontif= ied nil org-category "test") 13 14 (fontified nil org-category "test"))) (s= ubcontent (((pos . 55) (level . 2) (occur . 1) (heading . #(" Tables " 1 2 = (target "sec-1_1" org-category "test" fontified nil) 2 7 (target "sec-1_1" = org-category "test" fontified nil))) (content . #("\n\n\n\n\n" 0 1 (fontifi= ed nil org-category "test") 1 3 (fontified nil org-category "test") 3 4 (fo= ntified nil org-category "test") 4 5 (fontified nil org-category "test"))) = (subcontent (((pos . 71) (level . 3) (occur . 1) (heading . #(" Table.el Ta= ble with no Spanning " 1 2 ... 2 32 ...)) (content . #("\n +------------= ---+---------------+\n |Term |Percentage |\n +---------= ------+---------------+\n |Quarter |25% |\n |One-Fo= urth | |\n +---------------+---------------+\n |Hal= f |50% |\n |One-by-Two | |\n += ---------------+---------------+\n |Three-Quarters |75% |\n = |Three-Fourths | |\n +---------------+---------------+\= n |Full |100% |\n |Whole | = |\n +---------------+---------------+\n \n\n\n\n\n\n\n\n\n\n\n" 0 1 = ... 1 5 ... 5 22 ... 22 38 ... 38 39 ... 39 43 ... 43 76 ... 76 81 ... 81 9= 8 ... 98 114 ... 114 115 ... 115 119 ... 119 152 ... 152 157 ... 157 190 ..= . 190 195 ... 195 212 ... 212 228 ... 228 229 ... 229 233 ... 233 266 ... 2= 66 271 ... 271 304 ... 304 309 ... 309 326 ... 326 342 ... 342 343 ... 343 = 347 ... 347 380 ... 380 385 ... 385 418 ... 418 423 ... 423 440 ... 440 456= ... 456 457 ... 457 461 ... 461 494 ... 494 495 ... 495 532 ... 532 571 ..= . 571 576 ... 576 577 ... 577 578 ... 578 580 ... 580 581 ... 581 582 ... 5= 82 583 ... 583 584 ... 584 585 ... 585 586 ...)) (subcontent))))))))) mapc((lambda (x) (org-export-latex-subcontent x num)) (((pos . 4) (level = . 1) (occur . 1) (heading . #(" Sample Content (Proof Of Concept) " 1 2 (ta= rget "sec-1" org-category "test" fontified nil) 2 34 (target "sec-1" org-ca= tegory "test" fontified nil))) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" = 0 1 (fontified nil org-category "test") 1 2 (fontified nil org-category "te= st") 2 3 (fontified nil org-category "test") 3 4 (fontified nil org-categor= y "test") 4 5 (fontified nil org-category "test") 5 6 (fontified nil org-ca= tegory "test") 6 7 (fontified nil org-category "test") 7 8 (fontified nil o= rg-category "test") 8 9 (fontified nil org-category "test") 9 10 (fontified= nil org-category "test") 10 12 (fontified nil org-category "test") 12 13 (= fontified nil org-category "test") 13 14 (fontified nil org-category "test"= ))) (subcontent (((pos . 55) (level . 2) (occur . 1) (heading . #(" Tables = " 1 2 (target "sec-1_1" org-category "test" fontified nil) 2 7 (target "sec= -1_1" org-category "test" fontified nil))) (content . #("\n\n\n\n\n" 0 1 (f= ontified nil org-category "test") 1 3 (fontified nil org-category "test") 3= 4 (fontified nil org-category "test") 4 5 (fontified nil org-category "tes= t"))) (subcontent ((... ... ... ... ... ...))))))))) (let ((num (plist-get org-export-latex-options-plist :section-numbers))) = (mapc (lambda (x) (org-export-latex-subcontent x num)) subcontent)) org-export-latex-sub((((pos . 4) (level . 1) (occur . 1) (heading . #(" S= ample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "test" = fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil))) (c= ontent . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-category "= test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org-categ= ory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil org-= category "test") 5 6 (fontified nil org-category "test") 6 7 (fontified nil= org-category "test") 7 8 (fontified nil org-category "test") 8 9 (fontifie= d nil org-category "test") 9 10 (fontified nil org-category "test") 10 12 (= fontified nil org-category "test") 12 13 (fontified nil org-category "test"= ) 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55) (lev= el . 2) (occur . 1) (heading . #(" Tables " 1 2 (target "sec-1_1" org-categ= ory "test" fontified nil) 2 7 (target "sec-1_1" org-category "test" fontifi= ed nil))) (content . #("\n\n\n\n\n" 0 1 (fontified nil org-category "test")= 1 3 (fontified nil org-category "test") 3 4 (fontified nil org-category "t= est") 4 5 (fontified nil org-category "test"))) (subcontent ((... ... ... .= .. ... ...))))))))) (if (eq (car content) (quote subcontent)) (mapc (quote org-export-latex-s= ub) (cdr content)) (org-export-latex-sub (car content))) org-export-latex-global(((((pos . 4) (level . 1) (occur . 1) (heading . #= (" Sample Content (Proof Of Concept) " 1 2 (target "sec-1" org-category "te= st" fontified nil) 2 34 (target "sec-1" org-category "test" fontified nil))= ) (content . #("\n\n\n\n\n\n\n\n\n\n\n\n\n\n" 0 1 (fontified nil org-catego= ry "test") 1 2 (fontified nil org-category "test") 2 3 (fontified nil org-c= ategory "test") 3 4 (fontified nil org-category "test") 4 5 (fontified nil = org-category "test") 5 6 (fontified nil org-category "test") 6 7 (fontified= nil org-category "test") 7 8 (fontified nil org-category "test") 8 9 (font= ified nil org-category "test") 9 10 (fontified nil org-category "test") 10 = 12 (fontified nil org-category "test") 12 13 (fontified nil org-category "t= est") 13 14 (fontified nil org-category "test"))) (subcontent (((pos . 55) = (level . 2) (occur . 1) (heading . #(" Tables " 1 2 ... 2 7 ...)) (content = . #("\n\n\n\n\n" 0 1 ... 1 3 ... 3 4 ... 4 5 ...)) (subcontent (...))))))))) (let* ((wcf (current-window-configuration)) (opt-plist (org-export-proces= s-option-filters org-export-latex-options-plist)) (region-p (org-region-act= ive-p)) (rbeg (and region-p (region-beginning))) (rend (and region-p (regio= n-end))) (subtree-p (if (plist-get opt-plist :ignore-subtree-p) nil (when r= egion-p (save-excursion (goto-char rbeg) (and (org-at-heading-p) (>=3D ... = rend)))))) (opt-plist (setq org-export-opt-plist (if subtree-p (org-export-= add-subtree-options opt-plist rbeg) opt-plist))) (org-export-latex-options-= plist (setq org-export-opt-plist opt-plist)) (org-current-export-dir (or pu= b-dir (org-export-directory :html opt-plist))) (org-current-export-file buf= fer-file-name) (title (or (and subtree-p (org-export-get-title-from-subtree= )) (plist-get opt-plist :title) (and (not (plist-get opt-plist :skip-before= -1st-heading)) (org-export-grab-title-from-buffer)) (and buffer-file-name (= file-name-sans-extension (file-name-nondirectory buffer-file-name))) "No Ti= tle")) (filename (and (not to-buffer) (concat (file-name-as-directory (or p= ub-dir (org-export-directory :LaTeX ext-plist))) (file-name-sans-extension = (or (and subtree-p ...) (file-name-nondirectory ...))) ".tex"))) (filename = (and filename (if (equal (file-truename filename) (file-truename (or buffer= -file-name "dummy.org"))) (concat filename ".tex") filename))) (buffer (if = to-buffer (cond ((eq to-buffer (quote string)) (get-buffer-create "*Org LaT= eX Export*")) (t (get-buffer-create to-buffer))) (find-file-noselect filena= me))) (odd org-odd-levels-only) (header (org-export-latex-make-header title= opt-plist)) (skip (cond (subtree-p nil) (region-p nil) (t (plist-get opt-p= list :skip-before-1st-heading)))) (text (plist-get opt-plist :text)) (org-e= xport-preprocess-hook (cons (\` (lambda nil (org-set-local (quote org-compl= ex-heading-regexp) (\, org-export-latex-complex-heading-re)))) org-export-p= reprocess-hook)) (first-lines (if skip "" (org-export-latex-first-lines opt= -plist (if subtree-p (save-excursion (goto-char rbeg) (point-at-bol 2)) rbe= g) (if region-p rend)))) (coding-system (and (boundp (quote buffer-file-cod= ing-system)) buffer-file-coding-system)) (coding-system-for-write (or org-e= xport-latex-coding-system coding-system)) (save-buffer-coding-system (or or= g-export-latex-coding-system coding-system)) (region (buffer-substring (if = region-p (region-beginning) (point-min)) (if region-p (region-end) (point-m= ax)))) (text (and text (string-match "\\S-" text) (org-export-preprocess-st= ring text :emph-multiline t :for-backend (quote latex) :comments nil :tags = (plist-get opt-plist :tags) :priority (plist-get opt-plist :priority) :foot= notes (plist-get opt-plist :footnotes) :drawers (plist-get opt-plist :drawe= rs) :timestamps (plist-get opt-plist :timestamps) :todo-keywords (plist-get= opt-plist :todo-keywords) :tasks (plist-get opt-plist :tasks) :add-text ni= l :skip-before-1st-heading skip :select-tags nil :exclude-tags nil :LaTeX-f= ragments nil))) (string-for-export (org-export-preprocess-string region :em= ph-multiline t :for-backend (quote latex) :comments nil :tags (plist-get op= t-plist :tags) :priority (plist-get opt-plist :priority) :footnotes (plist-= get opt-plist :footnotes) :drawers (plist-get opt-plist :drawers) :timestam= ps (plist-get opt-plist :timestamps) :todo-keywords (plist-get opt-plist :t= odo-keywords) :tasks (plist-get opt-plist :tasks) :add-text (if (eq to-buff= er (quote string)) nil text) :skip-before-1st-heading skip :select-tags (pl= ist-get opt-plist :select-tags) :exclude-tags (plist-get opt-plist :exclude= -tags) :LaTeX-fragments nil))) (set-buffer buffer) (erase-buffer) (org-inst= all-letbind) (and (fboundp (quote set-buffer-file-coding-system)) (set-buff= er-file-coding-system coding-system-for-write)) (unless (or (eq to-buffer (= quote string)) body-only) (insert header)) (when (and text (not (eq to-buff= er (quote string)))) (insert (org-export-latex-content text (quote (lists t= ables fixed-width keywords))) "\n\n")) (unless (or skip (string-match "^\\*= " first-lines)) (insert first-lines)) (org-export-latex-global (with-temp-b= uffer (insert string-for-export) (goto-char (point-min)) (when (re-search-f= orward "^\\(\\*+\\) " nil t) (let* ((asters (length ...)) (level (if odd ..= . ...))) (setq org-export-latex-add-level (if odd (1- ...) (1- asters))) (o= rg-export-latex-parse-global level odd))))) (unless body-only (insert "\n\\= end{document}")) (goto-char (point-min)) (while (re-search-forward "^[ ]*\= \\\item\\([ ]+\\)\\[" nil t) (delete-region (match-beginning 1) (match-end= 1))) (goto-char (point-min)) (when (re-search-forward "\\[TABLE-OF-CONTENT= S\\]" nil t) (goto-char (point-min)) (while (re-search-forward "\\\\tableof= contents\\>[ ]*\n?" nil t) (replace-match "")) (goto-char (point-min)) (an= d (re-search-forward "\\[TABLE-OF-CONTENTS\\]" nil t) (replace-match "\\tab= leofcontents" t t))) (goto-char (point-min)) (while (re-search-forward "^[ = ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\label.*\\)*\n\\\\begin" nil t) = (delete-region (match-beginning 1) (match-end 1))) (goto-char (point-min)) = (while (re-search-forward "^[ ]*\\\\item\\>.*\\(\\\\\\\\\\)[ ]*\\(\n\\\\l= abel.*\\)*" nil t) (if (looking-at "[\n ]+") (replace-match "\n"))) (run-h= ooks (quote org-export-latex-final-hook)) (if to-buffer (unless (eq major-m= ode (quote latex-mode)) (latex-mode)) (save-buffer)) (org-export-latex-fix-= inputenc) (run-hooks (quote org-export-latex-after-save-hook)) (goto-char (= point-min)) (or (org-export-push-to-kill-ring "LaTeX") (message "Exporting = to LaTeX...done")) (prog1 (if (eq to-buffer (quote string)) (prog1 (buffer-= substring (point-min) (point-max)) (kill-buffer (current-buffer))) (current= -buffer)) (set-window-configuration wcf))) org-export-as-latex(nil) call-interactively(org-export-as-latex) (if (and bg (nth 2 ass) (not (buffer-base-buffer)) (not (org-region-activ= e-p))) (let ((p (start-process (concat "Exporting " (file-name-nondirectory= (buffer-file-name))) "*Org Processes*" (expand-file-name invocation-name i= nvocation-directory) "-batch" "-l" user-init-file "--eval" "(require 'org-e= xp)" "--eval" "(setq org-wait .2)" (buffer-file-name) "-f" (symbol-name (nt= h 1 ass))))) (set-process-sentinel p (quote org-export-process-sentinel)) (= message "Background process \"%s\": started" p)) (if subtree-p (progn (org-= mark-subtree) (activate-mark))) (call-interactively (nth 1 ass)) (when (and= bpos (get-buffer-window cbuf)) (let ((cw (selected-window))) (select-windo= w (get-buffer-window cbuf)) (goto-char cpos) (deactivate-mark) (select-wind= ow cw)))) (let* ((bg (org-xor (equal arg (quote (16))) org-export-run-in-background= )) (subtree-p (or (org-region-active-p) (eq org-export-initial-scope (quote= subtree)))) (help "[t] insert the export option template\n[v] limit ex= port to visible part of outline tree\n[1] switch buffer/subtree export\n[= SPC] publish enclosing subtree (with LaTeX_CLASS or EXPORT_FILE_NAME prop)\= n\n[a/n/u] export as ASCII/Latin-1/UTF-8 [A/N/U] to temporary buffe= r\n\n[h] export as HTML [H] to temporary buffer [R] export region\n[= b] export as HTML and open in browser\n\n[l] export as LaTeX [L] to tem= porary buffer\n[p] export as LaTeX and process to PDF [d] ... an= d open PDF file\n\n[D] export as DocBook [V] export as DocBook, process t= o PDF, and open\n\n[j] export as TaskJuggler [J] ..= . and open\n\n[m] export as Freemind mind map\n[x] export as XOXO\n[g] expo= rt using Wes Hardaker's generic exporter\n\n[i] export current file as iCal= endar file\n[I] export all agenda files as iCalendar files [c] ...as one = combined file\n\n[F] publish current file [P] publish current proj= ect\n[X] publish a project... [E] publish every projects") (cmds (= quote ((116 org-insert-export-options-template nil) (118 org-export-visible= nil) (97 org-export-as-ascii t) (65 org-export-as-ascii-to-buffer t) (110 = org-export-as-latin1 t) (78 org-export-as-latin1-to-buffer t) (117 org-expo= rt-as-utf8 t) (85 org-export-as-utf8-to-buffer t) (104 org-export-as-html t= ) (98 org-export-as-html-and-open t) (72 org-export-as-html-to-buffer nil) = (82 org-export-region-as-html nil) (120 org-export-as-xoxo t) (103 org-expo= rt-generic t) (68 org-export-as-docbook t) (86 org-export-as-docbook-pdf-an= d-open t) (106 org-export-as-taskjuggler t) (74 org-export-as-taskjuggler-a= nd-open t) (109 org-export-as-freemind t) (108 org-export-as-latex t) (112 = org-export-as-pdf t) (100 org-export-as-pdf-and-open t) (76 org-export-as-l= atex-to-buffer nil) (105 org-export-icalendar-this-file t) (73 org-export-i= calendar-all-agenda-files t) (99 org-export-icalendar-combine-agenda-files = t) (70 org-publish-current-file t) (80 org-publish-current-project t) (88 o= rg-publish t) (69 org-publish-all t)))) r1 r2 ass (cpos (point)) (cbuf (cur= rent-buffer)) bpos) (save-excursion (save-window-excursion (if subtree-p (m= essage "Export subtree: ") (message "Export buffer: ")) (delete-other-windo= ws) (with-output-to-temp-buffer "*Org Export/Publishing Help*" (princ help)= ) (org-fit-window-to-buffer (get-buffer-window "*Org Export/Publishing Help= *")) (while (eq (setq r1 (read-char-exclusive)) 49) (cond (subtree-p (setq = subtree-p nil) (message "Export buffer: ")) ((not subtree-p) (setq subtree-= p t) (message "Export subtree: ")))) (when (eq r1 32) (let ((case-fold-sear= ch t)) (if (re-search-backward "^[ ]+\\(:latex_class:\\|:export_title:\\)[= ]+\\S-" nil t) (progn (org-back-to-heading t) (setq subtree-p t) (setq bp= os ...) (message "Select command (for subtree): ") (setq r1 ...)) (error "N= o enclosing node with LaTeX_CLASS or EXPORT_FILE_NAME")))))) (redisplay) (a= nd bpos (goto-char bpos)) (setq r2 (if (< r1 27) (+ r1 96) r1)) (unless (se= tq ass (assq r2 cmds)) (error "No command associated with key %c" r1)) (if = (and bg (nth 2 ass) (not (buffer-base-buffer)) (not (org-region-active-p)))= (let ((p (start-process (concat "Exporting " (file-name-nondirectory ...))= "*Org Processes*" (expand-file-name invocation-name invocation-directory) = "-batch" "-l" user-init-file "--eval" "(require 'org-exp)" "--eval" "(setq = org-wait .2)" (buffer-file-name) "-f" (symbol-name (nth 1 ass))))) (set-pro= cess-sentinel p (quote org-export-process-sentinel)) (message "Background p= rocess \"%s\": started" p)) (if subtree-p (progn (org-mark-subtree) (activa= te-mark))) (call-interactively (nth 1 ass)) (when (and bpos (get-buffer-win= dow cbuf)) (let ((cw (selected-window))) (select-window (get-buffer-window = cbuf)) (goto-char cpos) (deactivate-mark) (select-window cw))))) org-export(nil) call-interactively(org-export nil nil) --=20