use reusable I/O utils, more solid error handling for Nagios::CheckMkAgent probe

[scpubgit/System-Introspector.git] / t / nagios-checkmkagent.t

diff --git a/t/nagios-checkmkagent.t b/t/nagios-checkmkagent.t
index 0ffcc08..2fee140 100644 (file)
--- a/t/nagios-checkmkagent.t
+++ b/t/nagios-checkmkagent.t
@@ -18,7 +18,11 @@ my $probe = System::Introspector::Nagios::CheckMkAgent->new;
 my $data = $probe->gather;
 
 is_deeply $data,
-    { foo => [qw( bar baz )], bar => [], baz => [qw( qux )] },
+    { nagios_check_mk_agent => {
+        foo => [qw( bar baz )],
+        bar => [],
+        baz => [qw( qux )],
+    } },
     'output parsing worked';
 
 done_testing;