summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2011-06-14 10:46:09 +0200
committerCarsten Dominik <carsten.dominik@gmail.com>2011-06-14 10:46:09 +0200
commit1891ee5aafee710315a26595385e670e1ac3771e (patch)
tree02eac88cec55ac352c54c8fc18d1cc20d67c0b1b
parent36dd7e21500fabbe2faf3e3bd96a2b7e05f13dae (diff)
downloadorg-mode-1891ee5aafee710315a26595385e670e1ac3771e.tar.gz
Fix HTML export to make CUSTOM_ID links work again
* lisp/org-html.el (org-export-as-html): (org-html-level-start): Only convert section number underscores to dashes.
-rw-r--r--lisp/org-html.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-html.el b/lisp/org-html.el
index afc6a77..b5d371f 100644
--- a/lisp/org-html.el
+++ b/lisp/org-html.el
@@ -1395,7 +1395,7 @@ lang=\"%s\" xml:lang=\"%s\">
(setq txt (replace-match "" t t txt)))
(setq href
(replace-regexp-in-string
- "\\." "_" (format "sec-%s" snumber)))
+ "\\." "-" (format "sec-%s" snumber)))
(setq href (org-solidify-link-text (or (cdr (assoc href org-export-preferred-target-alist)) href)))
(push
(format
@@ -2412,7 +2412,7 @@ When TITLE is nil, just close all open levels."
(insert "<ul>\n<li>" title "<br/>\n"))))
(aset org-levels-open (1- level) t)
(setq snumber (org-section-number level)
- snu (replace-regexp-in-string "\\." "_" snumber))
+ snu (replace-regexp-in-string "\\." "-" snumber))
(setq level (+ level org-export-html-toplevel-hlevel -1))
(if (and num (not body-only))
(setq title (concat