From d991fd8e63bbf90d2ee9efb688ab8cd76d2a0f9f Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Wed, 15 Aug 2018 19:55:25 +0200 Subject: Ignore repeating key presses. --- scenes/game.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scenes/game.scm b/scenes/game.scm index 2533310..f49a17a 100644 --- a/scenes/game.scm +++ b/scenes/game.scm @@ -225,7 +225,7 @@ positions layer." (when (eq? key 'q) (die game)) (let ((who (talking? player))) (cond - ((and (not who) (eq? 'space key)) + ((and (not who) (eq? 'space key) (not repeat?)) (handle-action player)) ((and who (not repeat?)) (handle-talking player key))))))) -- cgit v1.2.3