closer to having gandarf be right.

This commit is contained in:
2015-05-05 22:23:27 -07:00
parent ae50600203
commit 4f67c1006d
6 changed files with 18 additions and 12 deletions

View File

@@ -621,8 +621,8 @@
(let [ego (get-in entities [:room :entities :ego])
old-music (get-music (get-in entities [:room :music]) (get-in entities [:state :time]))
entities (as-> entities e
(if between (between screen e) e)
(assoc-in e [:room] (get-in entities [:rooms new-background]))
(if between (between screen e) e)
(assoc-in e [:room :entities :ego] ego)
(assoc-in e [:state :last-room] new-background)
(assoc-in e [:tweens :fade-in] (tween/tween :fade-in screen [:fade :opacity] 1.0 0.0 time))