X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fdiskusage.t;h=aa8b27f3491fbe2d41e9340fbf3358ae27718570;hb=ff3e98f6acae398971006c007d2f1bb1e7e8e04e;hp=6499aa3fbd640cffcece48d8ddfce7cca97442e4;hpb=da47168ae5cf20d1b2874d6a1ee2295342e3efb9;p=scpubgit%2FSystem-Introspector.git diff --git a/t/diskusage.t b/t/diskusage.t index 6499aa3..aa8b27f 100644 --- a/t/diskusage.t +++ b/t/diskusage.t @@ -4,7 +4,11 @@ use Test::More; use System::Introspector::DiskUsage; my $probe = System::Introspector::DiskUsage->new; -my $data = $probe->gather; + +my $result = $probe->gather; +ok $result, 'received data'; +my $data = $result->{disk_usage}; +ok $data, 'received disk usage data'; ok scalar(@$data), 'received data'; my @fields = qw( filesystem blocks_1024 used available capacity mount_point );