 
 (defn style []
 "
+body {
+  background-color: #EEE;
+}
+a:link, a:visited {
+  text-decoration: none;
+  color: #33f;
+}
+a:hover, a:active {
+  text-decoration: underline;
+  color: #77f;
+}
+.content {
+  width: 600px;
+  margin: 25px auto 15px auto;
+  padding: 25px;
+  border-left: #BBB;
+  border-right: #BBB;
+  background-color: #FFFFFF;
+  -webkit-box-shadow: 0px 0px 23px 3px rgba(135,135,135,0.77);
+  -moz-box-shadow: 0px 0px 23px 3px rgba(135,135,135,0.77);
+  box-shadow: 0px 0px 23px 3px rgba(135,135,135,0.77);
+}
+.menu {
+  position: absolute;
+  left: 0;
+  top: 0;
+}
+.menu2 {
+  font-family: Arial, sans-serif;
+  position: fixed;
+  background-color: #DDD;
+  border-right: 1px solid #BBB;
+  border-bottom: 1px solid #BBB;
+  padding: 6px;
+  border-bottom-right-radius: 4px;
+}
 .ref {
   display: none;
 }

              {:book-id (:id b)
               :book-num (:num b)
               :chap-cnt (count (:chapters b))}))
          (:chapters b))))))

(def ^:private beginbracket [:beginbracket "["])
(def ^:private endbracket [:endbracket "]"])

    (.writeFileSync node-fs filepath buff)))

(defn prepare! [parser src output-dir]
  (let [m (parse parser src)
        all-chapters (chapters m)]
    (write! output-dir "styles.css" (style))
    (write! output-dir "7ce12f75-f371-4e85-a3e9-b7749a65f140.html" (toc m))
    (dorun
      (map-indexed
        #(write!
          output-dir
          (rel-url %2)
          (chapter %2
            (prev-chapter all-chapters %1)
            (next-chapter all-chapters %1)))
        all-chapters))))