From e9e407113268032ddf230fdb243c403160dc22d4 Mon Sep 17 00:00:00 2001
From: cage <cage-invalid@invalid>
Date: Thu, 31 Dec 2020 11:38:37 +0100
Subject: [PATCH] - moved function.

---
 src/main.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/main.lisp b/src/main.lisp
index 1babfc1..ba4bfb1 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -56,8 +56,8 @@ etc.) happened"
             (declare (ignore w e))
             (incf-dt)
             (incf-ticks)
+            (scheduled-events:run-scheduled-events *ticks*)
             (when (not (program-events:stop-event-dispatching-p))
-              (scheduled-events:run-scheduled-events *ticks*)
               (program-events:dispatch-program-events))
             (windows:calculate-all +dt+)))))