diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-21 11:13:03 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-21 11:13:03 +0200 |
commit | 56fe493618b67b54b57ea0a4b4329354bf46b90e (patch) | |
tree | bff72c2478b075659a94899f8c300d614a05bbdb | |
parent | 3719cdd48e3c580f0b0b1111467ea097265cfded (diff) | |
parent | 5792f0687174a23bd5d5b2ab9013ca68520e0457 (diff) | |
download | org-mode-56fe493618b67b54b57ea0a4b4329354bf46b90e.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/ox-md.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/ox-md.el b/lisp/ox-md.el index 960407a..7a40134 100644 --- a/lisp/ox-md.el +++ b/lisp/ox-md.el @@ -574,10 +574,13 @@ contents according to the current headline." (make-string (* 4 (1- (org-export-get-relative-level headline info))) ?\s)) - (number (format "%d." - (org-last - (org-export-get-headline-number headline info)))) - (bullet (concat number (make-string (- 4 (length number)) ?\s))) + (bullet + (if (not (org-export-numbered-headline-p headline info)) "- " + (let ((prefix + (format "%d." (org-last (org-export-get-headline-number + headline info))))) + (concat prefix (make-string (max 1 (- 4 (length prefix))) + ?\s))))) (title (format "[%s](#%s)" (org-export-data-with-backend |