From ec00aa70de696e226644b5e43dde943c13cb3a71 Mon Sep 17 00:00:00 2001 From: David Botton Date: Sun, 17 Jan 2021 12:38:44 -0500 Subject: [PATCH] fix cond --- demos/01-snake-game.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/demos/01-snake-game.lisp b/demos/01-snake-game.lisp index 88b059e..af1ebe3 100644 --- a/demos/01-snake-game.lisp +++ b/demos/01-snake-game.lisp @@ -119,9 +119,9 @@ (setf (snake app) (butlast (snake app))))) (fill-style cx :brown) - (draw-segment (food app))) + (draw-segment (food app)))) - game-over)))) + game-over))) (defun on-key-down (obj event) (let ((app (connection-data-item obj "app-data"))