[Orgmode] [PATCH] Fix section id on HTML export when no custom id is present

[Bernt Hansen]

This fixes a bug where section ids were all set to 'nil'.
suffix and href were identical so suffix is no more.

Before this change the table of contents had the correct id but the
heading levels all had id="nil"
---

This patch is available at git://git.norang.ca/org-mode for-carsten

 lisp/org-html.el |    9 ++++-----
 1 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/lisp/org-html.el b/lisp/org-html.el
index 0f3d113..0c416af 100644
--- a/lisp/org-html.el
+++ b/lisp/org-html.el
@@ -1817,7 +1817,7 @@ When TITLE is nil, just close all open levels."
         (preferred (cdr (assoc target org-export-preferred-target-alist)))
         (remove (or preferred target))
         (l org-level-max)
-        snumber href suffix)
+        snumber href)
     (setq extra-targets (remove remove extra-targets))
     (setq extra-targets
          (mapconcat (lambda (x)
@@ -1874,12 +1874,11 @@ When TITLE is nil, just close all open levels."
                                 level snumber)
                         " " title)))
        (unless (= head-count 1) (insert "\n</div>\n"))
-       (setq href (cdr (assoc (concat "sec-" snumber) 
org-export-preferred-target-alist)))
-       (setq suffix (or href (concat "sec-" snumber)))
+       (setq href (or (cdr (assoc (concat "sec-" snumber) 
org-export-preferred-target-alist)) (concat "sec-" snumber)))
        (insert (format "\n<div id=\"outline-container-%s\" 
class=\"outline-%d\">\n<h%d id=\"%s\">%s%s</h%d>\n<div 
class=\"outline-text-%d\" id=\"text-%s\">\n"
-                       suffix level level href
+                       href level level href
                        extra-targets
-                       title level level suffix))
+                       title level level href))
        (org-open-par)))))
 
 (defun org-export-html-get-tag-class-name (tag)
-- 
1.6.3.rc1