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-pgn.el | |
| parent | 24c4140cbd18785ecdbb2cfab3d2c6713e615555 (diff) | |
Added support for playing out puzzle collections.
Diffstat (limited to 'chess-pgn.el')
| -rw-r--r-- | chess-pgn.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/chess-pgn.el b/chess-pgn.el index ae0adc3..930edc5 100644 --- a/chess-pgn.el +++ b/chess-pgn.el @@ -64,10 +64,11 @@ (goto-char (match-end 0))) (let ((fen (chess-game-tag game "FEN"))) (chess-game-set-plies - game (chess-pgn-read-plies - game (if fen - (chess-fen-to-pos fen) - (chess-pos-copy chess-starting-position)) t))) + game (or (chess-pgn-read-plies + game (if fen + (chess-fen-to-pos fen) + (chess-pos-copy chess-starting-position)) t) + (list (chess-ply-create (chess-fen-to-pos fen)))))) game))) (defun chess-pgn-insert-annotations (game index ply) |