From e69c2dcb4809d6c6dbf5e6bb15ed3a1ac9092921 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Mon, 15 Jul 2013 23:28:28 -0400
Subject: Update the global agenda in the game loop.

---
 2d/game-loop.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to '2d')

diff --git a/2d/game-loop.scm b/2d/game-loop.scm
index d508d26..9e743c7 100644
--- a/2d/game-loop.scm
+++ b/2d/game-loop.scm
@@ -24,6 +24,7 @@
 (define-module (2d game-loop)
   #:use-module ((sdl sdl) #:prefix SDL:)
   #:use-module (figl gl)
+  #:use-module (2d agenda)
   #:export (set-render-callback
             set-update-callback
             set-key-up-callback
@@ -152,6 +153,7 @@ is the unused accumulator time."
   (if (>= accumulator frame-interval)
       (begin
         (update-callback)
+        (update-agenda)
         (update (- accumulator frame-interval)))
       accumulator))
 
-- 
cgit v1.2.3