Browse Source

ox: Fix min level computation

* lisp/ox.el (org-export--get-min-level): Ignore footnote section when
  computing minimal headline level.
Nicolas Goaziou 12 years ago
parent
commit
a7535ca353
1 changed files with 2 additions and 2 deletions
  1. 2 2
      lisp/ox.el

+ 2 - 2
lisp/ox.el

@@ -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