forked from mirrors/org-mode
ox: Fix min level computation
* lisp/ox.el (org-export--get-min-level): Ignore footnote section when computing minimal headline level.
This commit is contained in:
parent
ce6339e292
commit
a7535ca353
|
@ -1784,9 +1784,9 @@ OPTIONS is a plist holding export options."
|
|||
(mapc
|
||||
(lambda (blob)
|
||||
(when (and (eq (org-element-type blob) 'headline)
|
||||
(not (org-element-property :footnote-section-p blob))
|
||||
(not (memq blob (plist-get options :ignore-list))))
|
||||
(setq min-level
|
||||
(min (org-element-property :level blob) min-level)))
|
||||
(setq min-level (min (org-element-property :level blob) min-level)))
|
||||
(when (= min-level 1) (throw 'exit 1)))
|
||||
(org-element-contents data))
|
||||
;; If no headline was found, for the sake of consistency, set
|
||||
|
|
Loading…
Reference in a new issue