org-e-ascii: Fix link description in empty section

* contrib/lisp/org-e-ascii.el (org-e-ascii-headline): Fix link
  description in empty section.
This commit is contained in:
Nicolas Goaziou 2012-07-18 19:24:11 +02:00
parent 17b865ddd0
commit ea7b5a327f
1 changed files with 5 additions and 3 deletions

View File

@ -1065,9 +1065,11 @@ holding contextual information."
;; Even if HEADLINE has no section, there might be some
;; links in its title that we shouldn't forget to describe.
(links
(unless (eq (caar (org-element-contents headline)) 'section)
(org-e-ascii--describe-links
(org-e-ascii--unique-links headline info) width info))))
(unless (or (eq (caar (org-element-contents headline)) 'section))
(let ((title (org-element-property :title headline)))
(when (consp title)
(org-e-ascii--describe-links
(org-e-ascii--unique-links title info) width info))))))
;; Deep subtree: export it as a list item.
(if low-level-rank
(concat