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

[Vincent Povirk <vpovirk src gnome org>]

commit 6338de6443a6d091e25d46a7cba4f6b82c3a0604
Author: Vincent Povirk <madewokherd gmail com>
Date:   Mon May 28 14:31:41 2012 -0500

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

 games/hopscotch.scm |    4 +---
 1 files changed, 1 insertions(+), 3 deletions(-)
---
diff --git a/games/hopscotch.scm b/games/hopscotch.scm
index c06e791..31d6332 100644
--- a/games/hopscotch.scm
+++ b/games/hopscotch.scm
@@ -116,9 +116,7 @@
 				(get-value (get-top-card foundation-id)))
 			     13))))
 	 (check-to-foundation slot-id (+ 1 foundation-id)))
-	(#t (list 1 
-		  (get-name (get-top-card slot-id))
-		  (get-name (get-top-card foundation-id))))))
+	(#t (hint-move slot-id 1 foundation-id ))))
 
 (define (check-waste)
   (cond ((empty-slot? 1)