X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela%2Fgame.scm;h=fe5f0b3a1cfdc993d413ee9371f29c02b04a7fc0;hb=dd1b9bdb7e499be3f8ed0192469ad3684f5ca22d;hp=e8e635a51b0ad632dc3662a124702e14f0b979ce;hpb=9c72ec850cadd9c1c273cac1c16817b15a73665a;p=gacela.git

diff --git a/gacela/game.scm b/gacela/game.scm
index e8e635a..fe5f0b3 100644
--- a/gacela/game.scm
+++ b/gacela/game.scm
@@ -82,6 +82,7 @@ unused accumulator time."
 	       (iter (- lag tick-interval) (1+ ticks)))
 	      (else
 	       lag)))
+      (clear-events)
       (iter lag 0))
 
     (define (alpha lag)