From d4993c54eb9b6ab904db8ed43189ac0b561092aa Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Tue, 30 Apr 2002 19:32:39 +0000 Subject: bug fixes --- chess-puzzle.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'chess-puzzle.el') diff --git a/chess-puzzle.el b/chess-puzzle.el index 84ca6f5..53de243 100644 --- a/chess-puzzle.el +++ b/chess-puzzle.el @@ -63,12 +63,12 @@ making it easy to go on to the next puzzle once you've solved one." next-game) (if (= index (length chess-puzzle-indices)) (chess-message 'end-of-puzzles) + ;; setup and load the next puzzle position (setq chess-puzzle-position (1+ chess-puzzle-position)) (if (null (setq next-game (chess-database-read database (aref chess-puzzle-indices index)))) - (chess-error 'bag-game-read - (aref chess-puzzle-indices index)) + (chess-error 'bag-game-read (aref chess-puzzle-indices index)) (chess-display-set-game nil next-game 0) (chess-game-set-data game 'my-color (chess-pos-side-to-move (chess-game-pos game))) -- cgit v1.2.3