emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/mines b419959 18/43: * mines.el (mines-init): Preserve


From: Stefan Monnier
Subject: [elpa] externals/mines b419959 18/43: * mines.el (mines-init): Preserve board settings after restart game
Date: Mon, 30 Nov 2020 18:44:15 -0500 (EST)

branch: externals/mines
commit b419959bb29a0534a8d26b0800bceaa6d3769eb6
Author: Tino Calancha <tino.calancha@gmail.com>
Commit: Tino Calancha <tino.calancha@gmail.com>

    * mines.el (mines-init): Preserve board settings after restart game
---
 mines.el | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/mines.el b/mines.el
index 6771975..a88386a 100644
--- a/mines.el
+++ b/mines.el
@@ -139,16 +139,19 @@ If `custom' then ask user for these numbers."
      (cond (,cond1
             (setq mines-number-cols 8
                   mines-number-rows 8
-                  mines-number-mines 10))
+                  mines-number-mines 10
+                  mines-difficulty-level 'easy))
            (,cond2
             (setq mines-number-cols 16
                   mines-number-rows 16
-                  mines-number-mines 40))
+                  mines-number-mines 40
+                  mines-difficulty-level 'medium))
            (,cond3
             (setq mines-number-cols 30
                   mines-number-rows 16
-                  mines-number-mines 99))
-           (,cond4 ,@body))
+                  mines-number-mines 99
+                  mines-difficulty-level 'hard))
+           (,cond4 (setq mines-difficulty-level 'custom) ,@body))
      (setq mines-number-cells (* mines-number-rows mines-number-cols))))
 
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]