             (if (and cell-items
                      (seq cell-items)
                      (= (cell :discovered) current-time))
-              (if (contains? #{:chest :artifact-chest} (get cell :type))
-                [\■ :dark-beige :black]
-                [(rutil/item->char (first cell-items))
-                 (rutil/item->fg   (first cell-items))
-                 :black])
+              (cond
+                (contains? #{:chest :artifact-chest} (get cell :type))
+                  [\■ :dark-beige :black]
+                (some (fn [item] (= (get item :id) :raft)) cell-items)
+                  [\░ :beige :brown]
+                :default
+                  (do
+                    (log/info cell-items)
+                  [(rutil/item->char (first cell-items))
+                   (rutil/item->fg   (first cell-items))
+                   :black]))
               (case (cell :type)
                :floor           [\·]
                :open-door       [\-  :brown  :black #{:bold}]


(zc/def-component GameOverRescued
  [this]
  (let [{:keys [game-state]} (zc/props this)
        rescue-mode (rendgame/rescue-mode game-state)]
    ;; Title
    ;(put-string (game-state :screen) :ui 10 1 (format "%s: %s." player-name madlib))
    ;(put-string (game-state :screen) :ui 18 2 (format "Rescued by %s after surviving for %d days." rescue-mode days-survived))
    ;(put-string (game-state :screen) :ui 10 3 (format "Points: %s." points))
    ;(put-string (game-state :screen) :ui 10 4 "Inventory:")
    ;(doall (map-indexed
    ;  (fn [idx item] (put-string (game-state :screen) :ui 18 (+ idx 5) (item :name)))
    ;  (-> game-state :world :player :inventory)))
    ;(put-string (game-state :screen) :ui 10 22 "Play again? [yn]")))
))

(zc/def-component GameOver
  [this]

              [:text {} [message]]
              [:text {} [
                [:text {} ["Press "]]
                [Highlight {} ["space "]]
                [:text {} ["to continue."]]]]]])))

(zc/def-component YesNoPopover
  [this]
