From 676840aeb80ebcbed9eb0206b83810e8bffd8d88 Mon Sep 17 00:00:00 2001 Message-Id: <676840aeb80ebcbed9eb0206b83810e8bffd8d88.1715561043.git.mdw@distorted.org.uk> From: Mark Wooding Date: Fri, 22 Mar 2013 22:34:41 +0000 Subject: [PATCH] atoms.lisp: Reorder the notifications in `play-cell'. Organization: Straylight/Edgeware From: Mark Wooding Really :processing-move should always come before :start-turn. --- atoms.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/atoms.lisp b/atoms.lisp index 5dc0def..fa65755 100644 --- a/atoms.lisp +++ b/atoms.lisp @@ -362,8 +362,8 @@ (defmethod play-cell ((game atom-game) player i j) (unless (cell-played cell player-index) (return-from escape)) (setf (player-state player) :playing) - (perform-explosions game (list cell))) - (changed game :processing-move))))) + (changed game :processing-move) + (perform-explosions game (list cell))))))) (defmethod restart-game ((game atom-game) &key grid players) (game-cancel-timeout game) -- [mdw]