c3a802d2c176

Screen opts, bugfix
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Mon, 14 Dec 2015 19:55:42 +0000
parents d134612014c5
children d379542ae906
branches/tags (none)
files src/silt/core.clj

Changes

--- a/src/silt/core.clj	Mon Dec 14 19:40:58 2015 +0000
+++ b/src/silt/core.clj	Mon Dec 14 19:55:42 2015 +0000
@@ -18,7 +18,11 @@
 (def screen-size (atom [0 0]))
 (defn handle-resize [cols rows]
   (reset! screen-size [cols rows]))
-(def screen (s/get-screen :swing {:resize-listener handle-resize}))
+(def screen (s/get-screen :swing {:resize-listener handle-resize
+                                  :palette :mac-os-x
+                                  :font ["Menlo" "Consolas"]
+                                  :font-size 16
+                                  }))
 
 (def pond-count 100)
 (def pond-size 3)
@@ -72,7 +76,7 @@
   {:glyph "@"
    :styles {:fg :white}
    :temp 0
-   :insulation 0
+   :insulation 1
    :energy initial-energy
    :id "eve"
    :directions [[[-1 -1] 2] [[0 -1] 1] [[1 -1] 2]