X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela%2Fscene.scm;h=e62048021a414f34de219e179378b9983ee84029;hb=2a08d93dcd9a52442e59c185ac85d4344e716650;hp=9145907347b4e505a935fbb17d2614c5d37463fc;hpb=e07174ebbc0c612e7b88ae75e261e14a52b686fd;p=gacela.git

diff --git a/gacela/scene.scm b/gacela/scene.scm
index 9145907..e620480 100644
--- a/gacela/scene.scm
+++ b/gacela/scene.scm
@@ -39,9 +39,9 @@
 
 ;;; Scene Procedures
 
-(define (display-scene scene)
-  ((scene-procedure scene)))
+(define (display-scene scene . args)
+  (apply (scene-procedure scene) args))
 
 (define (run-scene scene)
-  (run-game-loop
+  (play-game
    (scene-procedure scene)))