X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela%2Fscene.scm;h=4b66a1e9731048631add71edd5f9e255a89e44ea;hb=5f298cad7dceabfa1a8f41bf71ae17b9554c0443;hp=f3803cdf7b4a2cf197a571dcee5d1c6615f400d9;hpb=9c72ec850cadd9c1c273cac1c16817b15a73665a;p=gacela.git 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)))