atoms.lisp: Don't start the game automatically.

[atoms] / atoms.lisp

diff --git a/atoms.lisp b/atoms.lisp
index 3f225b39c8dc77ea2125b33a5400c78af1cbb423..6aeb8de8647bc08a5c9bed700f0b32ea3894a58e 100644 (file)
--- a/atoms.lisp
+++ b/atoms.lisp
@@ -1157,6 +1157,8 @@ (defun start-atom-game (&rest initargs)
   (setf *window* (apply #'make-instance 'atom-game-window initargs))
   (gtk:widget-show-all *window*))
 
-(start-atom-game :width 7 :players (list "Mark" "Vicky"))
+#+debug
+(start-atom-game :width 7
+                :players '("Alice" "Bob"))
 
 ;;;----- That's all, folks --------------------------------------------------