4dccbc0c808a

--- a/src/silt/core.clj	Mon Dec 14 15:35:34 2015 +0000
+++ b/src/silt/core.clj	Mon Dec 14 16:13:27 2015 +0000
@@ -124,8 +124,12 @@
              (maybe (or mc 20) v
                     (mutate-directions v)))
      (update-in [:styles :fg]
-                (maybe (or mc 0.01) v
-                       (rr/rand-nth [:white :blue :green :yellow :red]))))))
+                (maybe (or mc 0.8) v
+                       (rr/rand-nth [:white :blue :green :yellow :red])))
+     (update :glyph
+             (maybe (or mc 0.01) v
+                    (rr/rand-nth ["♞" "☃" "ℵ" "ℇ" "⧲" "⦼" "⨾" "∂" "∀" "€"
+                                  "₵" "★" "♞" "♟" "❣" "¿" "?" "§" "@"]))))))
 
 (defn map-vals [m f]
   (into {} (for [[k v] m]