diff options
| author | Angelo Naselli <anaselli@linux.it> | 2015-03-25 12:36:24 +0100 |
|---|---|---|
| committer | Angelo Naselli <anaselli@linux.it> | 2015-03-25 12:36:24 +0100 |
| commit | 143675198e9c0fcef3335affa224c6b9799a9a6b (patch) | |
| tree | c20c6367de27330fd30ade94edee7695b3b626df /t | |
| parent | 7d4134a7fdc5651e90b7aefbda95c5a1998ec3c6 (diff) | |
| download | manatools-143675198e9c0fcef3335affa224c6b9799a9a6b.tar manatools-143675198e9c0fcef3335affa224c6b9799a9a6b.tar.gz manatools-143675198e9c0fcef3335affa224c6b9799a9a6b.tar.bz2 manatools-143675198e9c0fcef3335affa224c6b9799a9a6b.tar.xz manatools-143675198e9c0fcef3335affa224c6b9799a9a6b.zip | |
fixed isNTPRunning and its test
Diffstat (limited to 't')
| -rw-r--r-- | t/04-Shared_TimeZone.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/04-Shared_TimeZone.t b/t/04-Shared_TimeZone.t index 21dd2e72..a88733be 100644 --- a/t/04-Shared_TimeZone.t +++ b/t/04-Shared_TimeZone.t @@ -16,10 +16,10 @@ BEGIN { diag Dumper($h); ok (my $currService = $tz->ntp_program(), 'ntp_program'); diag "ntp_program got: < " . $currService . " >"; + ok (my $a = ($tz->isNTPRunning() ? "running" : "not running"), 'isNTPRunning'); + diag "Check if " . $currService . " is running got: < " . $a . " >"; ok (my $s = $tz->ntpCurrentServer(), 'currentNTPServer'); diag "ntpCurrentServer got: < " . ($s ? $s : "none") . " >"; - ok (my $a = ($tz->isNTPRunning() ? "running" : "not running"), 'isNTPRunning'); - diag "isNTPRunning got: < " . $a . " >"; ok (my @pairs = $tz->ntpServiceConfigPairs(), 'ntpServiceConfigPairs'); diag Dumper(@pairs); for my $pair (@pairs) { |