From: Robert 'phaylon' Sedlacek <r.sedlacek@shadowcat.co.uk>
Date: Thu, 10 May 2012 02:28:36 +0000 (+0000)
Subject: top level hosts/error value
X-Git-Tag: v0.001_001~86
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=505ca707feafd6691d9e95c00db554f906806aaf;p=scpubgit%2FSystem-Introspector.git

top level hosts/error value
---

diff --git a/t/hosts.t b/t/hosts.t
index ed6c1e9..323dcde 100644
--- a/t/hosts.t
+++ b/t/hosts.t
@@ -7,7 +7,11 @@ use System::Introspector::Hosts;
 my $probe = System::Introspector::Hosts->new(
     hosts_file => "$FindBin::Bin/data/hosts",
 );
-my $data  = $probe->gather;
+
+my $result = $probe->gather;
+ok $result, 'received data';
+my $data = $result->{hosts};
+ok $data, 'received hosts data';
 
 is_deeply $data,
     [['1.2.3.4', qw( foo bar )], ['2.3.4.5', 'bar']],