         door-xy-2         (if (contains? junction-room-centers end)
                             end
                             (find-door end-room-bounds end start))]
-    ;(println "start" start)
-    ;(println "start-room-bounds" start-room-bounds)
-    ;(println "end" end)
-    ;(println "end-room-bounds"end-room-bounds)
-    ;(println "door-1" door-xy-1)
-    ;(println "door-2" door-xy-2)
+    (log/debug "start" start)
+    (log/debug "start-room-bounds" start-room-bounds)
+    (log/debug "end" end)
+    (log/debug "end-room-bounds"end-room-bounds)
+    (log/debug "door-1" door-xy-1)
+    (log/debug "door-2" door-xy-2)
     (cond
       (vertical-or-horizontally-aligned? door-xy-1 door-xy-2)
         (rlos/line-segment door-xy-1 door-xy-2)

     /  \\
    /    \\
    bottom"
  (let [left-bottom  (> (- end-y start-y) (- end-x start-x))
        bottom-right (> (- end-y start-y) (* -1 (- end-x start-x)))]
    (cond
      (and left-bottom bottom-right)
        :bottom

                                  :short-grass
                                :white-corridor
                                  :gravel)}
                       (if (= (get temple-cell :type) :empty)
                         cell
                         temple-cell))))
                  line
                  temple-line
                  (range)))
