diff options
| -rw-r--r-- | TODO | 9 | ||||
| -rw-r--r-- | chess-game.el | 4 |
2 files changed, 12 insertions, 1 deletions
@@ -12,6 +12,15 @@ Hotlist +- Move chess-assert-can-move into chess-display-move + +- Allow an "index N" command to the network protocol, so two people + can review a game together + +- Make ( create variations in a display, and { begin an annotation + +- Make chess-display-create use require, not chess.el + - Polish chess-input.el - Find a way that regexp-alist entries that only need to fire once are 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) |