# HG changeset patch # User Steve Losh # Date 1450122942 0 # Node ID c3a802d2c17678885677ed541ee4d556718be5c7 # Parent d134612014c59019aa66f842db0c0e9b168392b1 Screen opts, bugfix diff -r d134612014c5 -r c3a802d2c176 src/silt/core.clj --- 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]