diff options
author | Angelo Naselli <anaselli@linux.it> | 2015-03-16 18:16:50 +0100 |
---|---|---|
committer | Angelo Naselli <anaselli@linux.it> | 2015-03-16 18:16:50 +0100 |
commit | fc9772f1f03684e8dab50ff77d2c46c5e0309c7b (patch) | |
tree | 375b76cf80e5d816eb48a4badf3bb949199ef220 /t | |
parent | 825922057a21a9b09c60edf4b44535d7fd49926d (diff) | |
download | manatools-fc9772f1f03684e8dab50ff77d2c46c5e0309c7b.tar manatools-fc9772f1f03684e8dab50ff77d2c46c5e0309c7b.tar.gz manatools-fc9772f1f03684e8dab50ff77d2c46c5e0309c7b.tar.bz2 manatools-fc9772f1f03684e8dab50ff77d2c46c5e0309c7b.tar.xz manatools-fc9772f1f03684e8dab50ff77d2c46c5e0309c7b.zip |
Moved to namespace to ManaTools
Diffstat (limited to 't')
-rw-r--r-- | t/00-load.t | 6 | ||||
-rw-r--r-- | t/01-Locales.t | 4 | ||||
-rw-r--r-- | t/02-JournalCtl.t | 4 | ||||
-rw-r--r-- | t/02-Users.t | 4 | ||||
-rw-r--r-- | t/03-Shared_GUI.t | 16 | ||||
-rw-r--r-- | t/04-Shared_TimeZone.t | 4 | ||||
-rw-r--r-- | t/05-rpmnew.t | 4 | ||||
-rw-r--r-- | t/06-rpmdragora.t | 2 | ||||
-rw-r--r-- | t/boilerplate.t | 2 |
9 files changed, 23 insertions, 23 deletions
diff --git a/t/00-load.t b/t/00-load.t index 7b6ca138..4f28029b 100644 --- a/t/00-load.t +++ b/t/00-load.t @@ -7,8 +7,8 @@ use Test::More; plan tests => 2; BEGIN { - use_ok( 'AdminPanel::Shared' ) || print "AdminPanel::Shared failed\n"; - use_ok( 'AdminPanel::SettingsReader' ) || print "AdminPanel::SettingsReader failed\n"; + use_ok( 'ManaTools::Shared' ) || print "ManaTools::Shared failed\n"; + use_ok( 'ManaTools::SettingsReader' ) || print "ManaTools::SettingsReader failed\n"; } -diag( "Testing AdminPanel::Shared $AdminPanel::Shared::VERSION, Perl $], $^X" ); +diag( "Testing ManaTools::Shared $ManaTools::Shared::VERSION, Perl $], $^X" ); diff --git a/t/01-Locales.t b/t/01-Locales.t index e2016d02..5fef81e2 100644 --- a/t/01-Locales.t +++ b/t/01-Locales.t @@ -4,10 +4,10 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::Shared::Locales' ) || print "Locales failed!\n"; + use_ok( 'ManaTools::Shared::Locales' ) || print "Locales failed!\n"; } -ok( my $o = AdminPanel::Shared::Locales->new({domain_name => 'test_AdminPanel_Shared_Locales'}), 'create'); +ok( my $o = ManaTools::Shared::Locales->new({domain_name => 'test_ManaTools_Shared_Locales'}), 'create'); is( $o->N_("test"), 'test', 'N' ); done_testing; diff --git a/t/02-JournalCtl.t b/t/02-JournalCtl.t index 4826ad48..3eb52122 100644 --- a/t/02-JournalCtl.t +++ b/t/02-JournalCtl.t @@ -4,10 +4,10 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::Shared::JournalCtl' ) || print "JournalCtl failed!\n"; + use_ok( 'ManaTools::Shared::JournalCtl' ) || print "JournalCtl failed!\n"; } - ok( my $o = AdminPanel::Shared::JournalCtl->new(this_boot=>1,), 'create'); + ok( my $o = ManaTools::Shared::JournalCtl->new(this_boot=>1,), 'create'); ok( my $c = $o->getLog(), 'gets_log' ); done_testing; diff --git a/t/02-Users.t b/t/02-Users.t index 0822e0bd..1feb6ad7 100644 --- a/t/02-Users.t +++ b/t/02-Users.t @@ -4,10 +4,10 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::Shared::Users' ) || print "Users failed!\n"; + use_ok( 'ManaTools::Shared::Users' ) || print "Users failed!\n"; } - ok( my $o = AdminPanel::Shared::Users->new({user_face_dir => '/tmp'}), 'create'); + ok( my $o = ManaTools::Shared::Users->new({user_face_dir => '/tmp'}), 'create'); ok( my $facedir = $o->facedir(), 'facedir' ); diag "facedir got: < " . $facedir . " >"; ok( my $userfacedir = $o->userfacedir(), 'userfacedir' ); diff --git a/t/03-Shared_GUI.t b/t/03-Shared_GUI.t index 1bda166d..74c6ec42 100644 --- a/t/03-Shared_GUI.t +++ b/t/03-Shared_GUI.t @@ -4,13 +4,13 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::Shared::GUI' ) || print "AdminPanel::Shared::GUI failed!\n"; - use_ok( 'AdminPanel::Shared' ) || print "AdminPanel::Shared failed!\n"; + use_ok( 'ManaTools::Shared::GUI' ) || print "ManaTools::Shared::GUI failed!\n"; + use_ok( 'ManaTools::Shared' ) || print "ManaTools::Shared failed!\n"; } - is (AdminPanel::Shared::distName(), 'adminpanel', 'distname'); + is (ManaTools::Shared::distName(), 'manatools', 'distname'); - ok( my $gui = AdminPanel::Shared::GUI->new(), 'create'); + ok( my $gui = ManaTools::Shared::GUI->new(), 'create'); SKIP: { #remember to skip the right number of tests @@ -40,7 +40,7 @@ SKIP: { diag "ask_fromList got: < " . ($item ? $item : "none") . " >"; ok( my $mul_selection = $gui->ask_multiple_fromList({ - title => "Choose from list", + title => "Choose from list", header => "What do you have selected?", list => [ map { @@ -57,7 +57,7 @@ SKIP: { )], }), 'ask_multiple_fromList'); diag "ask_multiple_fromList got: < " . join(' - ', @${mul_selection}) . " >"; - + ok(my $selection = $gui->select_fromList({ title => "Select from list", header => { @@ -82,14 +82,14 @@ SKIP: { diag "ask_fromTreeList got: < " . ($item ? $item : "none") . " >"; ok($gui->AboutDialog({ name => "Shared::GUI TABBED", - version => $AdminPanel::Shared::VERSION, + version => $ManaTools::Shared::VERSION, credits => "Copyright (C) 2014 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 => $AdminPanel::Shared::VERSION, + version => $ManaTools::Shared::VERSION, credits => "Copyright (C) 2014 Angelo Naselli", license => 'GPLv2', authors => "Angelo Naselli <anaselli\@linux.it>\nMatteo Pasotti <matteo.pasotti\@gmail.com>", diff --git a/t/04-Shared_TimeZone.t b/t/04-Shared_TimeZone.t index f11bb2c6..0bd007d6 100644 --- a/t/04-Shared_TimeZone.t +++ b/t/04-Shared_TimeZone.t @@ -6,10 +6,10 @@ use Data::Dumper; use Time::Piece; BEGIN { - use_ok( 'AdminPanel::Shared::TimeZone' ) || print "AdminPanel::Shared::TimeZone failed!\n"; + use_ok( 'ManaTools::Shared::TimeZone' ) || print "ManaTools::Shared::TimeZone failed!\n"; } - ok( my $tz = AdminPanel::Shared::TimeZone->new(), 'create'); + ok( my $tz = ManaTools::Shared::TimeZone->new(), 'create'); is( $tz->get_timezone_prefix(), '/usr/share/zoneinfo', 'get_timezone_prefix' ); ok (my @l = $tz->getTimeZones(), 'getTimeZones'); ok (my $h = $tz->readConfiguration(), 'readConfiguration'); diff --git a/t/05-rpmnew.t b/t/05-rpmnew.t index ce561397..d0d16735 100644 --- a/t/05-rpmnew.t +++ b/t/05-rpmnew.t @@ -4,7 +4,7 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::Rpmdragora::rpmnew' ) || print "AdminPanel::Rpmdragora::rpmnew failed!\n"; + use_ok( 'ManaTools::Rpmdragora::rpmnew' ) || print "ManaTools::Rpmdragora::rpmnew failed!\n"; } @@ -21,7 +21,7 @@ SKIP: { print MYFILE "value1 = 1\n"; close (MYFILE); - is( AdminPanel::Rpmdragora::rpmnew::rpmnew_dialog("Test rpmnew dialog", ( + is( ManaTools::Rpmdragora::rpmnew::rpmnew_dialog("Test rpmnew dialog", ( test_package => ["/tmp/_rpmnew_test", "/tmp/rpmnew_test"], test_package2 => ["/tmp/tp2"], )), 0, 'rpmnew'); diff --git a/t/06-rpmdragora.t b/t/06-rpmdragora.t index 1be69c5e..49ff7c5b 100644 --- a/t/06-rpmdragora.t +++ b/t/06-rpmdragora.t @@ -4,7 +4,7 @@ use warnings FATAL => 'all'; use Test::More; BEGIN { - use_ok( 'AdminPanel::rpmdragora' ) || print "AdminPanel::rpmdragora failed!\n"; + use_ok( 'ManaTools::rpmdragora' ) || print "ManaTools::rpmdragora failed!\n"; } diff --git a/t/boilerplate.t b/t/boilerplate.t index 9d8d3fae..b789aa64 100644 --- a/t/boilerplate.t +++ b/t/boilerplate.t @@ -50,7 +50,7 @@ TODO: { "placeholder date/time" => qr(Date/time) ); - module_boilerplate_ok('lib/AdminPanel/Shared.pm'); + module_boilerplate_ok('lib/ManaTools/Shared.pm'); } |