HTML export: Add <div id="content"> around everything in <body>

This commit is contained in:
Carsten Dominik 2009-03-03 10:23:22 +01:00
parent a5b2a0c759
commit a68eb4b1e6
3 changed files with 12 additions and 2 deletions

View File

@ -188,6 +188,11 @@ The manual chapters about tags and about properties now only
refer to the section about agenda views, where the general syntax refer to the section about agenda views, where the general syntax
of tag/property matches is described. of tag/property matches is described.
*** New div around the entire page in HTMP export
A new =<div id=content>= is wrapped around the entire page,
everything that is inside =<body>=.
* Version 6.23 * Version 6.23
** Overview ** Overview

View File

@ -1,5 +1,8 @@
2009-03-03 Carsten Dominik <carsten.dominik@gmail.com> 2009-03-03 Carsten Dominik <carsten.dominik@gmail.com>
* org-exp.el (org-export-as-html): Add a "content" div around the
entire content of the body tag.
* org.el (org-match-sparse-tree): Renamed from * org.el (org-match-sparse-tree): Renamed from
`org-tags-sparse-tree'. `org-tags-sparse-tree'.
(org-tags-sparse-tree): New alias. (org-tags-sparse-tree): New alias.

View File

@ -3490,7 +3490,9 @@ lang=\"%s\" xml:lang=\"%s\">
<meta name=\"generated\" content=\"%s\"/> <meta name=\"generated\" content=\"%s\"/>
<meta name=\"author\" content=\"%s\"/> <meta name=\"author\" content=\"%s\"/>
%s %s
</head><body> </head>
<body>
<div id=\"content\">
" "
language language (org-html-expand title) language language (org-html-expand title)
(or charset "iso-8859-1") date author style)) (or charset "iso-8859-1") date author style))
@ -4072,7 +4074,7 @@ lang=\"%s\" xml:lang=\"%s\">
(if org-export-html-with-timestamp (if org-export-html-with-timestamp
(insert org-export-html-html-helper-timestamp)) (insert org-export-html-html-helper-timestamp))
(insert (or (plist-get opt-plist :postamble) "")) (insert (or (plist-get opt-plist :postamble) ""))
(insert "</body>\n</html>\n")) (insert "\n</div>\n</body>\n</html>\n"))
(unless (plist-get opt-plist :buffer-will-be-killed) (unless (plist-get opt-plist :buffer-will-be-killed)
(normal-mode) (normal-mode)