summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--starling/transition.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/starling/transition.scm b/starling/transition.scm
index f673d9c..826032e 100644
--- a/starling/transition.scm
+++ b/starling/transition.scm
@@ -66,8 +66,10 @@
;;;
(define-class <transition> (<scene>)
- (scene-from #:getter scene-from #:init-keyword #:from)
- (scene-to #:getter scene-to #:init-keyword #:to)
+ (scene-from #:getter scene-from #:init-keyword #:from
+ #:init-thunk current-scene)
+ (scene-to #:getter scene-to #:init-keyword #:to
+ #:init-thunk previous-scene)
(duration #:getter duration #:init-keyword #:duration))
(define-generic do-transition)