From 50e1c47dec1a68387ad945dda34e8ca073eabdf3 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Mon, 14 Jul 2008 15:11:58 -0500
Subject: [PATCH] ui.gadgets.packs.tests: fix test
---
extra/ui/gadgets/packs/packs-tests.factor | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/extra/ui/gadgets/packs/packs-tests.factor b/extra/ui/gadgets/packs/packs-tests.factor
index 4ae84f83df..065267d7be 100644
--- a/extra/ui/gadgets/packs/packs-tests.factor
+++ b/extra/ui/gadgets/packs/packs-tests.factor
@@ -5,10 +5,8 @@ kernel namespaces tools.test math.parser sequences math.geometry.rect ;
[ t ] [
{ 0 0 } { 100 100 } <rect> clip set
- [
- 100 [ number>string <label> gadget, ] each
- ] make-pile
-
+ <pile>
+ 100 [ number>string <label> add-gadget ] each
dup layout
visible-children [ label? ] all?