aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAngelo Naselli <anaselli@linux.it>2015-03-25 17:09:25 +0100
committerAngelo Naselli <anaselli@linux.it>2015-03-25 17:09:25 +0100
commit4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61 (patch)
tree07b7d1840de68a3ce611b0be75399ce85c409156
parent708eb6dcf2e4e7602250a35ba7552ddad8a72419 (diff)
downloadmanatools-4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61.tar
manatools-4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61.tar.gz
manatools-4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61.tar.bz2
manatools-4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61.tar.xz
manatools-4410e51e4ed7d76da5e5d4f84d49b8f56c27fb61.zip
better order in test case
-rw-r--r--t/04-Shared_TimeZone.t10
1 files changed, 5 insertions, 5 deletions
diff --git a/t/04-Shared_TimeZone.t b/t/04-Shared_TimeZone.t
index a88733be..c96165a4 100644
--- a/t/04-Shared_TimeZone.t
+++ b/t/04-Shared_TimeZone.t
@@ -14,6 +14,11 @@ BEGIN {
ok (my @l = $tz->getTimeZones(), 'getTimeZones');
ok (my $h = $tz->readConfiguration(), 'readConfiguration');
diag Dumper($h);
+ ok (my $services = $tz->ntpServiceList(), 'ntpServiceList');
+ diag Dumper($services);
+ ok ($tz->refreshNTPServiceList(), 'refreshNTPServiceList');
+ ok ($services = $tz->ntpServiceList(), 'ntpServiceList after refresh');
+ diag Dumper($services);
ok (my $currService = $tz->ntp_program(), 'ntp_program');
diag "ntp_program got: < " . $currService . " >";
ok (my $a = ($tz->isNTPRunning() ? "running" : "not running"), 'isNTPRunning');
@@ -25,11 +30,6 @@ BEGIN {
for my $pair (@pairs) {
is ($tz->getNTPServiceConfig($pair->[0]), $pair->[1], "ntpServiceConfigPairs $pair->[0]");
}
- ok (my $services = $tz->ntpServiceList(), 'ntpServiceList');
- diag Dumper($services);
- ok ($tz->refreshNTPServiceList(), 'refreshNTPServiceList');
- ok ($services = $tz->ntpServiceList(), 'ntpServiceList after refresh');
- diag Dumper($services);
SKIP: {
#remember to skip the right number of tests