Add index page and adjust CSS

This commit is contained in:
oakes
2014-04-01 16:58:24 -04:00
parent 8085e4eaa5
commit 3fde16714f
2 changed files with 10 additions and 4 deletions

View File

@@ -18,6 +18,10 @@ a {
margin-left: 10px;
}
.sidebar a {
text-decoration: none;
}
.ns {
font-size: 24px;
font-weight: bold;
@@ -29,7 +33,7 @@ a {
}
.content {
margin-left: 250;
margin-left: 250px;
}
.item {

View File

@@ -61,9 +61,9 @@
[:pre raw]]]])
(defn create-file
[parsed-files content]
[parsed-files name content]
(html [:head
[:title "play-clj docs"]
[:title name]
[:link {:rel "stylesheet" :href "highlight.css"}]
[:link {:rel "stylesheet" :href "main.css"}]]
[:body
@@ -86,4 +86,6 @@
(doseq [{:keys [groups] :as pf} parsed-files]
(doseq [{:keys [name] :as group} groups]
(spit (io/file dir (str->filename name))
(create-file parsed-files (content group))))))
(create-file parsed-files name (content group)))))
(spit (io/file dir "index.html")
(create-file parsed-files "play-clj docs" nil)))