--- a/t/00-config.t Sun Jan 16 17:29:01 2011 +0100
+++ b/t/00-config.t Sat Jan 22 00:05:44 2011 +0100
@@ -7,7 +7,7 @@
use File::Temp;
BEGIN {
- use_ok "DNStools::Config", "get_config";
+ use_ok "DNStools::Config" => qw(get_config);
}
can_ok("DNStools::Config" => "get_config");
@@ -37,7 +37,7 @@
$ENV{DNSTOOLS_CONF} = $tmp->filename;
%cf = ();
%cf = get_config("xxx|xxx", $tmp->filename);
-ok(%cf, "got config from env");
+ok(%cf, "got config from \$DNSTOOLS_CONF");
is($cf{abc} => "xyz", "simple value");
is($cf{other} => "valuewithspace", "spaced value");