gnome-games r7706 - trunk/aisleriot/rules

[chpe svn gnome org]

Author: chpe
Date: Wed Jun 18 20:49:57 2008
New Revision: 7706
URL: http://svn.gnome.org/viewvc/gnome-games?rev=7706&view=rev

Log:
Implement dealable? for template. Bug #445955


Modified:
   trunk/aisleriot/rules/template.scm

Modified: trunk/aisleriot/rules/template.scm
==============================================================================
--- trunk/aisleriot/rules/template.scm	(original)
+++ trunk/aisleriot/rules/template.scm	Wed Jun 18 20:49:57 2008
@@ -56,13 +56,21 @@
 (define (timeout) 
   #f)
 
+(define (dealable?)
+  #f)
+
+(define (do-deal-next-cards)
+  #f)
+
 ;; Define the optional features the game uses. Valid options are:
 ;;  droppable-feature: An predicate, droppable?, is defined that will 
 ;;                     return whether the card can be dropped here. 
 ;;                     This is used by the drawing code to highlight
 ;;                     droppable locations.
-(set-features droppable-feature)
+;;  dealable-feature: An predicate, dealable?, is defined that will
+;;                    return whether new card(s) can be dealt.
+(set-features droppable-feature dealable-feature)
 
 (set-lambda new-game button-pressed button-released button-clicked
 button-double-clicked game-continuable game-won get-hint get-options
-apply-options timeout droppable?)
+apply-options timeout droppable? dealable?)