Try to improve the promotion situation on ICS by allowing chess-ply to query for...

[gnu-emacs-elpa] / chess-network.el

diff --git a/chess-network.el b/chess-network.el
index ea181fce5ac3172d1f97bb071399aa5e2514a670..efc9d280a403fe64cef8d5aa9db307e4764e5344 100644 (file)
--- a/chess-network.el
+++ b/chess-network.el
@@ -52,7 +52,7 @@
         (function
          (lambda ()
            (funcall chess-engine-response-handler 'undo
-                    (string-to-int (match-string 1))))))
+                    (string-to-number (match-string 1))))))
    (cons "accept\\(\\s-+\\(.+\\)\\)?$"
         (function
          (lambda ()
@@ -120,7 +120,7 @@
                  (if (fboundp 'open-network-stream-server)
                      (open-network-stream-server "*chess-network*"
                                                  (current-buffer)
-                                                 (string-to-int
+                                                 (string-to-number
                                                   (read-string "Port: ")))
                    (start-process "*chess-network*"
                                   (current-buffer) "/usr/bin/nc"