diff options
Diffstat (limited to 'src/application.lisp')
| -rw-r--r-- | src/application.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/application.lisp b/src/application.lisp index 2f6747e..d38cd8a 100644 --- a/src/application.lisp +++ b/src/application.lisp @@ -18,7 +18,7 @@ (window :with :a) (refocus-on-mousedown-p :std t) (focus last-motion-target :with :a) - (fps :with :std 30 :doc "Frames Per Second") + (fps :std 30 :doc "Frames Per Second") (frame-wait :r))) @@ -82,7 +82,7 @@ "Runs all of the handlers objects listening for perframe events, if those objects are currently part of the scene tree." (let ((table (perframe-table (listener app))) - (time (get-universal-time))) + (time (sdl2:get-ticks))) (loop for target being the hash-key of table for handlers = (slot-value (listener target) 'perframe) ;; only fire perframe when target is in scene |