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

top level resolv_conf/error value
---

diff --git a/t/resolvconf.t b/t/resolvconf.t
index 79839e5..4d927f0 100644
--- a/t/resolvconf.t
+++ b/t/resolvconf.t
@@ -7,7 +7,10 @@ use System::Introspector::ResolvConf;
 my $probe = System::Introspector::ResolvConf->new(
     resolv_conf_file => "$FindBin::Bin/data/resolv.conf",
 );
-my $data = $probe->gather;
+my $result = $probe->gather;
+ok $result, 'received data';
+my $data = $result->{resolv_conf};
+ok $data, 'received resolv.conf data';
 
 is_deeply $data,
     [[qw( domain foo )],