gnome-games r9032 - trunk/aisleriot/rules

[vpovirk svn gnome org]

Author: vpovirk
Date: Thu Apr  9 06:45:09 2009
New Revision: 9032
URL: http://svn.gnome.org/viewvc/gnome-games?rev=9032&view=rev

Log:
aisleriot: fix a crash in Labyrinth

I made a bad assumption in an earlier change that caused this.
Fortunately, it never hit a stable branch.


Modified:
   trunk/aisleriot/rules/labyrinth.scm

Modified: trunk/aisleriot/rules/labyrinth.scm
==============================================================================
--- trunk/aisleriot/rules/labyrinth.scm	(original)
+++ trunk/aisleriot/rules/labyrinth.scm	Thu Apr  9 06:45:09 2009
@@ -102,7 +102,8 @@
        (add-to-score! 1)))
  
 (define (check-slot-and-deal slot)
-  (cond ((= slot 21)
+  (cond ((or (empty-slot? 0)
+             (= slot 21))
 	 #t)
 	((empty-slot? (- slot 8))
 	 (and (deal-cards-face-up 0 (list (- slot 8)))