diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-08 06:42:12 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-08 06:42:12 +0000 |
| commit | 62425d4d94f95572c985005c33d93fe9ae420ac9 (patch) | |
| tree | 9967191e5e8fb7d9beafa38612370aa0d3294b8c /chess-gnuchess.el | |
| parent | 24c4140cbd18785ecdbb2cfab3d2c6713e615555 (diff) | |
Added support for playing out puzzle collections.
Diffstat (limited to 'chess-gnuchess.el')
| -rw-r--r-- | chess-gnuchess.el | 6 |
1 files changed, 4 insertions, 2 deletions
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")) |