From 596f585a7d5a39e8878c49fa24dc11c0182e8959 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Mon, 22 Aug 2016 22:13:24 +0200 Subject: [PATCH] ox-html: Tiny fix * lisp/ox-html.el (org-html-paragraph): Move space after the figure number within the "figure-number" class so it can be hidden if needed. Small refactoring. --- lisp/ox-html.el | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/lisp/ox-html.el b/lisp/ox-html.el index beff484ce..64f384d8f 100644 --- a/lisp/ox-html.el +++ b/lisp/ox-html.el @@ -3112,16 +3112,16 @@ the plist used as a communication channel." (let ((raw (org-export-data (org-export-get-caption paragraph) info)) (org-html-standalone-image-predicate - 'org-html--has-caption-p)) + #'org-html--has-caption-p)) (if (not (org-string-nw-p raw)) raw - (concat - "" - (format (org-html--translate "Figure %d:" info) - (org-export-get-ordinal - (org-element-map paragraph 'link - 'identity info t) - info nil 'org-html-standalone-image-p)) - " " raw)))) + (concat "" + (format (org-html--translate "Figure %d:" info) + (org-export-get-ordinal + (org-element-map paragraph 'link + #'identity info t) + info nil #'org-html-standalone-image-p)) + " " + raw)))) (label (and (org-element-property :name paragraph) (org-export-get-reference paragraph info)))) (org-html--wrap-image contents info caption label)))