From 2aac1818d57d994628f154bae69686b28768def1 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sat, 8 Dec 2012 19:30:27 +0100 Subject: [PATCH] org-md: Fix export error with inline images * contrib/lisp/org-md.el (org-md-link): Fix error with inline images. --- contrib/lisp/org-md.el | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/contrib/lisp/org-md.el b/contrib/lisp/org-md.el index c640a1ebb..80e701744 100644 --- a/contrib/lisp/org-md.el +++ b/contrib/lisp/org-md.el @@ -286,11 +286,14 @@ a communication channel." destination info) "."))))))) ((org-export-inline-image-p link org-e-html-inline-image-rules) - (format "![%s](%s)" - (let ((caption (org-export-get-caption - (org-export-get-parent-element link)))) - (when caption (org-export-data caption info))) - path)) + (let ((path (let ((raw-path (org-element-property :path link))) + (if (not (file-name-absolute-p raw-path)) raw-path + (expand-file-name raw-path))))) + (format "![%s](%s)" + (let ((caption (org-export-get-caption + (org-export-get-parent-element link)))) + (when caption (org-export-data caption info))) + path))) ((string= type "coderef") (let ((ref (org-element-property :path link))) (format (org-export-get-coderef-format ref contents) -- 2.11.4.GIT