Fixed link to toc generation

This commit is contained in:
dm3 2011-08-01 23:04:12 +08:00 committed by fogus
parent 3e30d02444
commit 632cd45e21

View file

@ -406,7 +406,7 @@
(header-html project-metadata) (header-html project-metadata)
(toc-html {:uberdoc? true} docs) (toc-html {:uberdoc? true} docs)
(floating-toc-html docs) (floating-toc-html docs)
(map #(groups-html (:uberdoc? true) %) docs))) (map #(groups-html {:uberdoc? true} %) docs)))
(defn index-html (defn index-html
[project-metadata docs] [project-metadata docs]
@ -426,4 +426,4 @@
"" ;; no header "" ;; no header
"" ;; no toc "" ;; no toc
(floating-toc-html all-docs) (floating-toc-html all-docs)
(groups-html (:uberdoc? false) doc))) (groups-html {:uberdoc? false} doc)))