              (arrow :left :room01)]
             
             :room06
-            [(defentity "" "images/room06.png" 0 0 700 480)
+            [(hide (defentity "room06-bg" "images/room06.png" 0 0 700 480))
              (arrow :left :room05)
              ]})
 

    (render! screen [(assoc (texture "images/inventory.png")
                            :x 700 :y 0
                            :width 100 :height 480)])
    (render! screen entities)
    (render! screen (:inventory screen))
    (if (:selected screen)
      (render! screen [(assoc (texture "images/inventory-selected.png")

     (:inventory screen))
    (mapv
     (fn [ent]
       (cond (and (not (:hidden ent)) (clicked? ent screen)
                  (:action ent))
             (do (debug "ACTIVATING ACTION for" (:name ent))
                 ((:action ent) ent screen entities))
