diff options
author | Angelo Naselli <anaselli@linux.it> | 2015-03-28 16:06:21 +0100 |
---|---|---|
committer | Angelo Naselli <anaselli@linux.it> | 2015-03-28 16:06:21 +0100 |
commit | e72217385fd636a6bd8b4af86bd0610c8a84c254 (patch) | |
tree | 3c3e251fcd670f109061b169d8b060f63655d93c | |
parent | ad15bccd4be2eb167e4399e27ad2f5df0aba6cb7 (diff) | |
download | colin-keep-e72217385fd636a6bd8b4af86bd0610c8a84c254.tar colin-keep-e72217385fd636a6bd8b4af86bd0610c8a84c254.tar.gz colin-keep-e72217385fd636a6bd8b4af86bd0610c8a84c254.tar.bz2 colin-keep-e72217385fd636a6bd8b4af86bd0610c8a84c254.tar.xz colin-keep-e72217385fd636a6bd8b4af86bd0610c8a84c254.zip |
wrong title in test
-rw-r--r-- | t/03-Shared_GUI.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/03-Shared_GUI.t b/t/03-Shared_GUI.t index 74c6ec4..87f0e36 100644 --- a/t/03-Shared_GUI.t +++ b/t/03-Shared_GUI.t @@ -75,7 +75,7 @@ SKIP: { diag "select_fromList got: < " . join(' - ', @${selection}) . " >"; #TODO cancel makes this test failing - ok($item = $gui->ask_fromTreeList({title => "Choose from list", header => "Which one do you select? [default is leaf 2]", default_button => 1, + ok($item = $gui->ask_fromTreeList({title => "Choose from a tree", header => "Which one do you select? [default is leaf 2]", default_button => 1, default_item => 'leaf 2', list => ['item 1/item 2/item 3', 'item 1/item 2/leaf 1', 'item 1/item 2/leaf 2', 'item 4/leaf 3', 'item 5']}), 'ask_fromTreeList'); @@ -83,14 +83,14 @@ SKIP: { ok($gui->AboutDialog({ name => "Shared::GUI TABBED", version => $ManaTools::Shared::VERSION, - credits => "Copyright (C) 2014 Angelo Naselli", + credits => "Copyright (C) 2014-2015 Angelo Naselli", license => 'GPLv2', authors => "Angelo Naselli <anaselli\@linux.it>\nMatteo Pasotti <matteo.pasotti\@gmail.com>", }), 'AboutDialog'); ok($gui->AboutDialog({ name => "Shared::GUI CLASSIC", version => $ManaTools::Shared::VERSION, - credits => "Copyright (C) 2014 Angelo Naselli", + credits => "Copyright (C) 2014-2015 Angelo Naselli", license => 'GPLv2', authors => "Angelo Naselli <anaselli\@linux.it>\nMatteo Pasotti <matteo.pasotti\@gmail.com>", dialog_mode => 1, |