[aisleriot] Use list? here

[Christian Persch <chpe src gnome org>]

commit 60b7889d5a2c1e6e76306645936a7dcbf1732553
Author: Christian Persch <chpe gnome org>
Date:   Thu Apr 14 13:50:02 2011 +0200

    Use list? here

 src/game.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/src/game.c b/src/game.c
index 673ade7..1485b12 100644
--- a/src/game.c
+++ b/src/game.c
@@ -564,7 +564,7 @@ cscmi_slot_set_cards (ArSlot *slot,
   guint8 *data = NULL;
   guint i, n_cards = 0;
 
-  if (scm_is_true (cards)) {
+  if (scm_is_true (scm_list_p (cards))) {
     for (list_el = cards; list_el != SCM_EOL; list_el = SCM_CDR (list_el)) {
       ++n_cards;
     }