X-Git-Url: https://git.jsancho.org/?p=gacela.git;a=blobdiff_plain;f=gacela%2Fscene.scm;h=4b66a1e9731048631add71edd5f9e255a89e44ea;hp=f3803cdf7b4a2cf197a571dcee5d1c6615f400d9;hb=5f298cad7dceabfa1a8f41bf71ae17b9554c0443;hpb=553ee324ccbd833eea5f2003ec9d55badd09f3b8 diff --git a/gacela/scene.scm b/gacela/scene.scm index f3803cd..4b66a1e 100644 --- a/gacela/scene.scm +++ b/gacela/scene.scm @@ -20,8 +20,8 @@ #:use-module (srfi srfi-9) #:use-module (srfi srfi-9 gnu) #:export (make-scene - display-scene - run-scene)) + display-scene + run-scene)) ;;; Scene Type @@ -48,8 +48,8 @@ (define (run-scene scene . args) (apply start-game - (cons - (if (scene? scene) - (scene-procedure scene) - scene) - args))) + (cons + (if (scene? scene) + (scene-procedure scene) + scene) + args)))