Browse Source

ox-html.el: Bugfix wrt org-info.js

* ox-html.el (org-html-headline): For headlines whose first
element is a headline and not a section, pretend there is an
empty section (as "") for the correct HTML div to be inserted.

This fixes a bug wrt org-info.js.  Thanks to Nicolas for
guiding me through this patch.
Bastien Guerry 12 years ago
parent
commit
1f591bcc30
1 changed files with 6 additions and 2 deletions
  1. 6 2
      lisp/ox-html.el

+ 6 - 2
lisp/ox-html.el

@@ -2108,7 +2108,8 @@ holding contextual information."
 	     (preferred-id (car ids))
 	     (extra-ids (cdr ids))
 	     (extra-class (org-element-property :HTML_CONTAINER_CLASS headline))
-	     (level1 (+ level (1- org-html-toplevel-hlevel))))
+	     (level1 (+ level (1- org-html-toplevel-hlevel)))
+	     (first-content (car (org-element-contents headline))))
 	(format "<div id=\"%s\" class=\"%s\">%s%s</div>\n"
 		(format "outline-container-%s"
 			(or (org-element-property :CUSTOM_ID headline)
@@ -2127,7 +2128,10 @@ holding contextual information."
 			 extra-ids "")
 			full-text
 			level1)
-		contents))))))
+		(if (not (eq (org-element-type first-content) 'section))
+		    (concat (org-html-section first-content "" info)
+			    contents)
+		  contents)))))))
 
 
 ;;;; Horizontal Rule