summaryrefslogtreecommitdiff
path: root/chess-clock.el
diff options
context:
space:
mode:
authorMario Lang <mlang@delysid.org>2004-01-11 21:56:03 +0000
committerMario Lang <mlang@delysid.org>2004-01-11 21:56:03 +0000
commitf92e8d98006f17ec3ad2751fcdb368c2be5bd756 (patch)
tree65d0c3783d488a46d52427c570b43f25917dd095 /chess-clock.el
parent87d6ebeca025ddab739b839a66f266593f4200b1 (diff)
(chess-clock-tick-tock): Do not decrease time if (chess-game-status chess-module-game)
is non-nil.
Diffstat (limited to 'chess-clock.el')
-rw-r--r--chess-clock.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/chess-clock.el b/chess-clock.el
index 9ef01f7..c8bb28e 100644
--- a/chess-clock.el
+++ b/chess-clock.el
@@ -84,7 +84,8 @@
(chess-game-inhibit-events t)
counter)
(setq chess-clock-last-time (current-time))
- (when (> (chess-game-index chess-module-game) 0)
+ (when (and (> (chess-game-index chess-module-game) 0)
+ (not (chess-game-status chess-module-game)))
(if (chess-pos-side-to-move (chess-game-pos chess-module-game))
(setq counter 'white-remaining)
(setq counter 'black-remaining))