[gnome-games] aisleriot: Add slot types to Klondike

[Christian Persch <chpe src gnome org>]

commit f9e0c26aeec23251f524599579184ad903eba02a
Author: Christian Persch <chpe gnome org>
Date:   Fri Nov 20 18:01:29 2009 +0100

    aisleriot: Add slot types to Klondike

 aisleriot/rules/klondike.scm |   28 ++++++++++++++--------------
 1 files changed, 14 insertions(+), 14 deletions(-)
---
diff --git a/aisleriot/rules/klondike.scm b/aisleriot/rules/klondike.scm
index a3e7ec4..fdffb4a 100644
--- a/aisleriot/rules/klondike.scm
+++ b/aisleriot/rules/klondike.scm
@@ -35,25 +35,25 @@
   (make-standard-deck)
   (shuffle-deck)
   
-  (add-normal-slot DECK)
+  (add-normal-slot DECK 'stock)
 
   (if deal-three
-      (add-partially-extended-slot '() right 3)
-      (add-normal-slot '()))
+      (add-partially-extended-slot '() right 3 'waste)
+      (add-normal-slot '() 'waste))
 
   (add-blank-slot)
-  (add-normal-slot '())
-  (add-normal-slot '())
-  (add-normal-slot '())
-  (add-normal-slot '())
+  (add-normal-slot '() 'foundation)
+  (add-normal-slot '() 'foundation)
+  (add-normal-slot '() 'foundation)
+  (add-normal-slot '() 'foundation)
   (add-carriage-return-slot)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
-  (add-extended-slot '() down)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
+  (add-extended-slot '() down 'tableau)
 
   (deal-tableau tableau)