From 7b11cf3a656f2f54d8035827322a3f74648e0266 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Sun, 8 Feb 2004 23:52:18 +0000 Subject: Corrected some invalid calls to `format'. --- chess-crafty.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/chess-crafty.el b/chess-crafty.el index 25a0b43..644e343 100644 --- a/chess-crafty.el +++ b/chess-crafty.el @@ -78,7 +78,8 @@ (chess-var-pos var) (match-string-no-properties 0)))) (unless ply - (error "unable to read move '%s'" move)) + (error "unable to read move '%s'" + (match-string-no-properties 0))) (chess-var-move var ply)))) (skip-chars-forward " ")) var)))))))) @@ -145,10 +146,10 @@ (chess-engine-send nil "easy\n"))) ((eq (car args) 'search-depth) (assert (and (integerp (cadr args)) (>= (cadr args) 0))) - (chess-engine-send nil (format "sd %d\n") (cadr args))) + (chess-engine-send nil (format "sd %d\n" (cadr args)))) ((eq (car args) 'search-time) (assert (and (integerp (cadr args)) (> (cadr args) 0))) - (chess-engine-send nil (format "st %d\n") (cadr args))))) + (chess-engine-send nil (format "st %d\n" (cadr args)))))) (t (if (and (eq event 'undo) -- cgit v1.2.3