ox-ascii: Fix export with broken links
* lisp/ox-ascii.el (org-ascii--describe-links): Skip broken links.
This commit is contained in:
parent
c779b7aa0e
commit
4631790fb9
|
@ -948,12 +948,17 @@ channel."
|
|||
(when description
|
||||
(let ((dest (if (equal type "fuzzy")
|
||||
(org-export-resolve-fuzzy-link link info)
|
||||
(org-export-resolve-id-link link info))))
|
||||
;; Ignore broken links. On broken link,
|
||||
;; `org-export-resolve-id-link' will throw an
|
||||
;; error and `ignore-error' will return nil.
|
||||
(ignore-error 'org-link-broken
|
||||
(org-export-resolve-id-link link info)))))
|
||||
(when dest
|
||||
(concat
|
||||
(org-ascii--fill-string
|
||||
(format "[%s] %s" anchor (org-ascii--describe-datum dest info))
|
||||
width info)
|
||||
"\n\n"))))
|
||||
"\n\n")))))
|
||||
;; Do not add a link that cannot be resolved and doesn't have
|
||||
;; any description: destination is already visible in the
|
||||
;; paragraph.
|
||||
|
|
Loading…
Reference in New Issue