comment out test code we don't want run every time the library is loaded!

This commit is contained in:
Simon Brooke 2024-04-07 22:13:59 +01:00
parent 716eb9442e
commit a44e9548a2
2 changed files with 3 additions and 3 deletions

View file

@ -285,4 +285,4 @@
"&"
"&"))))
(visualise-drainage (run-drainage "resources/heightmaps/20x20/crucible.png") "test.html")
;; (visualise-drainage (run-drainage "resources/heightmaps/20x20/crucible.png") "test.html")

View file

@ -5,7 +5,7 @@
interaction."
;; TODO: but possibly it would be better if there is to be a newer version of
;; mw-ui, to base it on this.
(:require [hiccup2.page :refer [xhtml]])
(:require [hiccup2.core :refer [html]])
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@ -89,7 +89,7 @@
(defn world->html-file
([world output-path]
(spit output-path (str (xhtml (render-world-page world)))))
(spit output-path (str (html (render-world-page world)))))
([world output-path state-images-relative-path]
(binding [*state-images-relative-path* state-images-relative-path]
(world->html-file world output-path))))