From 14532ec6a5c9f3dfdb03cb838934c3df86d14e02 Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Sat, 23 Jul 2022 14:05:43 +0800 Subject: [PATCH] ox-md: Fix export with broken links * lisp/ox-md.el (org-md--headline-referred-p): Allow exporting headlines when the document contains broken links and `org-export-with-broken-links' is non-nil. For broken links, `org-export-resolve-link' throws an error - catch it and do not match the headline against such broken link. --- lisp/ox-md.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/lisp/ox-md.el b/lisp/ox-md.el index ad684d803..91b7ee657 100644 --- a/lisp/ox-md.el +++ b/lisp/ox-md.el @@ -193,11 +193,10 @@ of contents can refer to headlines." ;; A link refers internally to HEADLINE. (org-element-map (plist-get info :parse-tree) 'link (lambda (link) - (eq headline - (pcase (org-element-property :type link) - ((or "custom-id" "id") (org-export-resolve-id-link link info)) - ("fuzzy" (org-export-resolve-fuzzy-link link info)) - (_ nil)))) + (equal headline + ;; Ignore broken links. + (ignore-error 'org-link-broken + (org-export-resolve-link link info)))) info t)))) (defun org-md--headline-title (style level title &optional anchor tags)