From c37224c7d13cd9aa63b9d614e24b1832acf168d7 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 6 Jul 2013 19:50:51 -0400 Subject: Update demos to use new sprite-batch-draw procedure. --- examples/particles.scm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'examples/particles.scm') diff --git a/examples/particles.scm b/examples/particles.scm index b5044bb..9883dfb 100644 --- a/examples/particles.scm +++ b/examples/particles.scm @@ -61,9 +61,7 @@ (let* ((pos (particle-position p)) (x (vx pos)) (y (vy pos))) - (sprite-batch-draw batch particle-image x y 0 0 - particle-width particle-height - 1 1 0))) + (sprite-batch-draw particle-image x y particle-width particle-height))) particles))) (set-render-callback (lambda () (render))) -- cgit v1.2.3