summaryrefslogtreecommitdiff
path: root/examples/mines
diff options
context:
space:
mode:
Diffstat (limited to 'examples/mines')
-rw-r--r--examples/mines/mines.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/examples/mines/mines.scm b/examples/mines/mines.scm
index 98056cc..97d77b0 100644
--- a/examples/mines/mines.scm
+++ b/examples/mines/mines.scm
@@ -163,7 +163,8 @@
(cond
;; Nothing to do.
((or (tile-shown? tile)
- (tile-flagged? tile))
+ (tile-flagged? tile)
+ (board-lose? board))
board)
;; Oops!
((tile-mine? tile)