From 7f1661ee969daf84f2f0b281e6483d23204baa15 Mon Sep 17 00:00:00 2001
From: Matteo Pasotti <matteo.pasotti@gmail.com>
Date: Mon, 12 Jan 2015 18:09:49 +0100
Subject: improved test for ask_multiple_fromList

---
 t/03-Shared_GUI.t | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

(limited to 't')

diff --git a/t/03-Shared_GUI.t b/t/03-Shared_GUI.t
index edc15a02..1bda166d 100644
--- a/t/03-Shared_GUI.t
+++ b/t/03-Shared_GUI.t
@@ -45,11 +45,16 @@ SKIP: {
         list  => [
             map {
                 {
-                    id => $_,
-                    text=>'item 1',
-                    val => \$_
+                    id => $_->{id},
+                    text=>$_->{text},
+                    val => \$_->{val}
                 },
-            } (1,0,1,0)],
+            } (
+               {id => "a",val=>1,text=>"Item 1"},
+               {id => "b",val=>0, text=>"Item 2"},
+               {id => "c",val=>1,text=>"Item 3"},
+               {id => "d",val=>0,text=>"Item 4"}
+              )],
     }), 'ask_multiple_fromList');
     diag "ask_multiple_fromList got: < " . join(' - ', @${mul_selection}) . " >";
     
-- 
cgit v1.2.1