ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-export: Do not ignore automatically elements with empty output 

* contrib/lisp/org-export.el (org-export-data): org-export: Do not
  ignore automatically elements with empty output.
This commit is contained in:
Nicolas Goaziou 2012-02-25 11:58:43 +01:00
parent 2adf4b059b
commit 3b3936b9a9
1 changed files with 1 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
contrib/lisp/org-export.el
View File

@ -1545,9 +1545,7 @@ Return transcoded string."
(t (funcall transcoder blob contents info))))) (t (funcall transcoder blob contents info)))))
;; 4. Return results. ;; 4. Return results.
(cond (cond
;; Discard nil results. Also ignore BLOB from further ((not results) nil)
;; traversals in parse tree.
((not results) (org-export-ignore-element blob info) nil)
;; No filter for a full document. ;; No filter for a full document.
((eq type 'org-data) results) ((eq type 'org-data) results)
;; Otherwise, update INFO, append the same white space ;; Otherwise, update INFO, append the same white space
@ -1563,10 +1561,6 @@ Return transcoded string."
(make-string post-blank ?\n)) (make-string post-blank ?\n))
(concat results (make-string post-blank ? )))) (concat results (make-string post-blank ? ))))
backend info))) backend info)))
;; If BLOB was transcoded into an empty string, ignore it
;; from subsequent traversals.
(unless (org-string-nw-p results)
(org-export-ignore-element blob info))
;; Eventually return string. ;; Eventually return string.
results))))))) results)))))))
(org-element-contents data) "")) (org-element-contents data) ""))