diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-18 19:36:20 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-18 19:36:20 +0000 |
| commit | 11b367ebafee85881a10cc01c287a0b78bfba1ea (patch) | |
| tree | 43325d2cbb3b6d318a6e9e101d494a9e430f8bf0 /chess-game.el | |
| parent | 563cf2037068f67f6786172b029363aaa7d52776 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-game.el')
| -rw-r--r-- | chess-game.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/chess-game.el b/chess-game.el index b28d7f9..b1b1ccf 100644 --- a/chess-game.el +++ b/chess-game.el @@ -158,7 +158,9 @@ This conveys the status of the game at the given index." "Return the current GAME sequence." (let ((index (chess-game-index game))) (if (> index 1) - (1+ (/ index 2)) + (if (= (mod index 2) 0) + (/ index 2) + (1+ (/ index 2))) 1))) (defsubst chess-game-side-to-move (game) |