*** no comment ***

diff --git a/chess-network.el b/chess-network.el
index d321135da243e82ccb2c9a239225364b10606444..244349d48e50677ab830af634bf41bcc9ce19ad7 100644 (file)
--- a/chess-network.el
+++ b/chess-network.el
@@ -37,8 +37,8 @@
                 (message "Your opponent has quit playing"))))))
 
 (defun chess-network-perform-move ()
-  (let ((move (match-string 1))
-       (ply (chess-algebraic-to-ply (chess-engine-position nil) move)))
+  (let* ((move (match-string 1))
+        (ply (chess-algebraic-to-ply (chess-engine-position nil) move)))
     (unless ply
       (error "Could not convert engine move: %s" move))
     (let ((chess-network-now-moving t))