Compare commits
3 Commits
c6c5474b7e
...
9e88e1c822
Author | SHA1 | Date |
---|---|---|
|
9e88e1c822 | |
|
d6353b283a | |
|
80b474db00 |
|
@ -954,14 +954,15 @@ channel."
|
||||||
;; Only links with a description need an entry. Other are
|
;; Only links with a description need an entry. Other are
|
||||||
;; already handled in `org-ascii-link'.
|
;; already handled in `org-ascii-link'.
|
||||||
(when description
|
(when description
|
||||||
(let ((dest (if (equal type "fuzzy")
|
(let ((dest
|
||||||
(org-export-resolve-fuzzy-link link info)
|
;; Ignore broken links. On broken link,
|
||||||
;; Ignore broken links. On broken link,
|
;; `org-export-resolve-id-link' will throw an
|
||||||
;; `org-export-resolve-id-link' will throw an
|
;; error and we will return nil.
|
||||||
;; error and we will return nil.
|
(condition-case nil
|
||||||
(condition-case nil
|
(if (equal type "fuzzy")
|
||||||
(org-export-resolve-id-link link info)
|
(org-export-resolve-fuzzy-link link info)
|
||||||
(org-link-broken nil)))))
|
(org-export-resolve-id-link link info))
|
||||||
|
(org-link-broken nil))))
|
||||||
(when dest
|
(when dest
|
||||||
(concat
|
(concat
|
||||||
(org-ascii--fill-string
|
(org-ascii--fill-string
|
||||||
|
|
Loading…
Reference in New Issue