X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/atoms/blobdiff_plain/676840aeb80ebcbed9eb0206b83810e8bffd8d88..c1be708422af28ae0515b71ebadac0c9e1a8793b:/atoms.lisp

diff --git a/atoms.lisp b/atoms.lisp
index fa65755..77329cf 100644
--- a/atoms.lisp
+++ b/atoms.lisp
@@ -294,7 +294,7 @@ (defmethod game-update-scores (game)
 		 (incf remaining)
 		 (setf found player)))))
       (changed game :scores :players players)
-      (when (= remaining 1)
+      (when (and (= remaining 1) (>= (length players) 2))
 	(setf (player-state found) :winning)
 	(changed game :finished :victor found)))))
 
@@ -742,7 +742,7 @@ (defclass new-game-dialogue (gtk:dialog)
 					       :step-increment 1))
    (count-adjustment :type gtk:adjustment
 		     :initform (make-instance 'gtk:adjustment
-					      :lower 2 :upper 20
+					      :lower 1 :upper 20
 					      :step-increment 1))
    (players :type gtk:list-store
 	    :initform (make-instance 'gtk:list-store