diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-13 09:40:07 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-13 09:40:07 +0000 |
| commit | f4639c9095c34caa60b4122e2cf4d6b1402508e3 (patch) | |
| tree | 782e3cc6fb10e1fdbc8ab41065f70445615ea0da /chess-game.el | |
| parent | fba3a7b20a520eb83726944082ef7c86362f2bf6 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-game.el')
| -rw-r--r-- | chess-game.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/chess-game.el b/chess-game.el index 3214eb2..25d089d 100644 --- a/chess-game.el +++ b/chess-game.el @@ -166,8 +166,10 @@ matches." (defun chess-game-undo (game count) "Undo the last COUNT plies of GAME." (if (> count (chess-game-index game)) - (error "Cannot undo further") - (chess-game-set-plies game (nbutlast (chess-game-plies game) count)))) + (error "Cannot undo further")) + (let ((chess-game-inhibit-events t)) + (chess-game-set-plies game (nbutlast (chess-game-plies game) count))) + (chess-game-run-hooks game 'update)) (defsubst chess-game-over-p (game) |