Bernt Hansen <be...@norang.ca> writes:
> ,----[ test.org exported to HTML buffer ]
> | <head>
> | <div style="text-align:right;font-size:70%;white-space:nowrap;">
> |  <a accesskey="h" href="up_goes_here"> UP </a>
> |  |
> |  <a accesskey="H" href="home_goes_there"> HOME </a>
> | </div>
> | 
> | <title>test.org</title>
> `----
>
> Shouldn't the up and home links both be moved to the body of the page,
> stripped of their in-line style info (text-align, font-size,
> white-space) and use CSS for this instead?  I think that might be more
> flexible for formatting.



This patch fixes it. I've put the LINK_UP and ..._HOME directly after
the <body> tag:

<body>
   -----  HERE ---
  <div id="content">

..


The links can be formated customizing the variable

          `org-export-html-home/up-format'



  Sebastian


diff --git a/lisp/org-html.el b/lisp/org-html.el
index 11a692e..66cc86b 100644
--- a/lisp/org-html.el
+++ b/lisp/org-html.el
@@ -753,7 +753,6 @@ PUB-DIR is set, use this as the publishing directory."
 <html xmlns=\"http://www.w3.org/1999/xhtml\";
 lang=\"%s\" xml:lang=\"%s\">
 <head>
-%s
 <title>%s</title>
 <meta http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"/>
 <meta name=\"generator\" content=\"Org-mode\"/>
@@ -765,6 +764,7 @@ lang=\"%s\" xml:lang=\"%s\">
 </head>
 <body>
 <div id=\"content\">
+%s
 "
 		 (format
 		  (or (and (stringp org-export-html-xml-declaration)
@@ -775,17 +775,17 @@ lang=\"%s\" xml:lang=\"%s\">
 		      "")
 		  (or charset "iso-8859-1"))
 		 language language
+		 (org-html-expand title)
+		 (or charset "iso-8859-1")
+		 date author description keywords
+		 style
 		 (if (or link-up link-home)
 		     (concat
 		      (format org-export-html-home/up-format
 			      (or link-up link-home)
 			      (or link-home link-up))
 		      "\n")
-		   "")
-		 (org-html-expand title)
-		 (or charset "iso-8859-1")
-		 date author description keywords
-		 style))
+		   "")))
 
         (org-export-html-insert-plist-item opt-plist :preamble opt-plist)
 
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to