Day 2 progress.

1 files changed, 5 insertions, 6 deletions

diff --git a/apple-town-fair/place.scm b/apple-town-fair/place.scm
index 2cfb5ed..b96130d 100644
--- a/apple-town-fair/place.scm
+++ b/apple-town-fair/place.scm
@@ -32,14 +32,13 @@
   (name #:accessor name #:init-keyword #:name)
   (condition #:accessor condition #:init-keyword #:condition
              #:init-form (const #t))
-  (exec #:accessor exec #:init-keyword #:exec)
-  (duration #:accessor duration #:init-keyword #:duration #:init-value 1))
+  (exec #:accessor exec #:init-keyword #:exec))
 
-(define-method (performable? (action <action>) state)
-  ((condition action) state))
+(define-method (performable? (action <action>) scene)
+  ((condition action) scene))
 
-(define-method (perform (action <action>) state)
-  ((exec action) state))
+(define-method (perform (action <action>) scene)
+  ((exec action) scene))
 
 (define-class <place> (<node-2d>)
   (title #:accessor title #:init-keyword #:title #:init-value "Unknown")