diff options
-rw-r--r-- | chickadee/graphics/engine.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chickadee/graphics/engine.scm b/chickadee/graphics/engine.scm index e5b2d4d..a007c6e 100644 --- a/chickadee/graphics/engine.scm +++ b/chickadee/graphics/engine.scm @@ -287,10 +287,10 @@ (engine (current-graphics-engine))) (hashq-set! (graphics-engine-variables engine) var value)) -(define* (graphics-engine-commit! #:optional (engine (current-graphics-engine))) +(define (graphics-engine-commit!) (array-list-for-each (lambda (id state) (graphics-state-bind-maybe state)) - (graphics-engine-states engine))) + (graphics-engine-states (current-graphics-engine)))) (define* (graphics-engine-guard! obj #:optional (engine (current-graphics-engine))) |