From 62425d4d94f95572c985005c33d93fe9ae420ac9 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 8 Apr 2002 06:42:12 +0000 Subject: Added support for playing out puzzle collections. --- chess-gnuchess.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'chess-gnuchess.el') diff --git a/chess-gnuchess.el b/chess-gnuchess.el index 1151291..6eb26c0 100644 --- a/chess-gnuchess.el +++ b/chess-gnuchess.el @@ -41,8 +41,10 @@ (chess-engine-send nil "quit\n")) ((eq event 'setup) - (chess-engine-send nil (format "setboard %s\n" - (chess-pos-to-fen (car args))))) + (let ((file (make-temp-file "gch"))) + (with-temp-file file + (insert (chess-pos-to-fen (car args)) ?\n)) + (chess-engine-send nil (format "epdload %s\n" file)))) ((eq event 'pass) (chess-engine-send nil "go\n")) -- cgit v1.2.3