X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=advent08.hs;h=7def6d1224d649bc1ce85097e151d2ff64f5a409;hb=f9f0bc22576835cad53961170a64e7ffa0824fd8;hp=c89ba8094fd2baf371f127dceb862d65af81164c;hpb=be703250238d6be7f7b9bcb4adaf5c72c23a3bf2;p=advent-of-code-16.git

diff --git a/advent08.hs b/advent08.hs
index c89ba80..7def6d1 100644
--- a/advent08.hs
+++ b/advent08.hs
@@ -22,8 +22,8 @@ mkScreen w h = array ((0, 0), (h - 1, w - 1))
 showScreen :: Screen -> String
 showScreen screen = unlines [showRow r | r <- [minRow..maxRow]]
     where ((minRow, minCol), (maxRow, maxCol)) = bounds screen
-          showCell True  = '#'
-          showCell False = '.'
+          showCell True  = '*'
+          showCell False = ' '
           showRow r = [showCell (screen!(r, c)) | c <- [minCol..maxCol]]
 
 countLights :: Screen -> Int