progresss on blergh fight.

desktop/src-common/advent/actions.clj

@@ -516,7 +516,11 @@
                        (>= (get-in entities [:transition :opacity]) 1.0))
 
                 (terminate [this screen entities]
-                           entities)
+                           (if-let [next-time (get-in entities [:state :next-time])]
+                             (-> entities
+                                 (assoc-in [:state :time] next-time)
+                                 (assoc-in [:state :next-time] nil))
+                             entities))
                 (can-skip? [this screen entities]
                            false))
     (run-action entities