[aisleriot] api.scm: Use correct arguments to list-tail.
- From: Vincent Povirk <vpovirk src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [aisleriot] api.scm: Use correct arguments to list-tail.
- Date: Mon, 28 May 2012 14:33:35 +0000 (UTC)
commit 5824bce7a75df921a481c9491bdafcd67b9f2f75
Author: Vincent Povirk <madewokherd gmail com>
Date: Mon May 28 09:29:59 2012 -0500
api.scm: Use correct arguments to list-tail.
For bug 676924.
games/api.scm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/games/api.scm b/games/api.scm
index f38ad1f..6249fb7 100644
--- a/games/api.scm
+++ b/games/api.scm
@@ -545,7 +545,7 @@
(add-cards! end-slot cards))
(define-public (remove-n-cards slot-id n)
- (set-cards! slot-id (list-tail n (get-cards slot-id))))
+ (set-cards! slot-id (list-tail (get-cards slot-id) n)))
(define-public (deal-cards-from-deck deck slot-list)
(if (not (null? slot-list))
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]