diff options
Diffstat (limited to 'chess-ply.el')
| -rw-r--r-- | chess-ply.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/chess-ply.el b/chess-ply.el index 321da83..4ef3558 100644 --- a/chess-ply.el +++ b/chess-ply.el @@ -259,8 +259,10 @@ maneuver." (defsubst chess-ply-final-p (ply) "Return non-nil if this is the last ply of a game/variation." - (chess-ply-any-keyword ply :drawn :perpetual :repetition :stalemate - :flag-fell :resign :checkmate :aborted)) + (or (chess-ply-any-keyword ply :drawn :perpetual :repetition + :flag-fell :resign :aborted) + (chess-ply-any-keyword (chess-pos-preceding-ply + (chess-ply-pos ply)) :stalemate :checkmate))) (eval-when-compile (defvar position) |