From d68b5d0491e16f818ef0e342ea1fda02f9a9e468 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Thu, 23 May 2024 16:41:11 -0400 Subject: [PATCH] Speed up wipe effect. Also, handle when user spams the undo key better. --- game.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/game.scm b/game.scm index b14e01f..6b406fb 100644 --- a/game.scm +++ b/game.scm @@ -112,7 +112,8 @@ (set! *actormap* snapshot) (set! *snapshots* older-snapshots) (play-sound-effect audio:undo) - (show-effect! (make-wipe-effect 0.25))))) + (unless *current-effect* + (show-effect! (make-wipe-effect 0.15)))))) (define (sort lst compare) (match lst