[aisleriot] golf: Use hint-move instead of get-name.



commit d69aa1b1d1e338202c29cbc5ca7f04e4d957dd0a
Author: Vincent Povirk <madewokherd gmail com>
Date:   Sun May 5 13:25:43 2013 -0500

    golf: Use hint-move instead of get-name.
    
    For bug 551859.

 games/golf.scm |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)
---
diff --git a/games/golf.scm b/games/golf.scm
index 7c8018c..a6c77d2 100644
--- a/games/golf.scm
+++ b/games/golf.scm
@@ -130,8 +130,7 @@
                         (+ 1 waste-value))
                      (= (+ 1 (get-value (get-top-card slot)))
                         waste-value))))
-            (list 1 (get-name (get-top-card slot)) 
-                  (get-name (get-top-card waste))))
+            (hint-move slot 1 waste))
            (#t (check-slots (+ 1 slot)))))
 
 (define (dealable?)


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]