--- EV-ADNS/ADNS.pm 2007/12/03 11:54:58 1.5 +++ EV-ADNS/ADNS.pm 2007/12/05 10:46:00 1.7 @@ -51,7 +51,7 @@ my ($status, $expires, @rr) = @_; if ($status == EV::ADNS::s_ok) { use JSON::XS; - warn to_json \@rr; + warn encode_json \@rr; } } @@ -145,7 +145,7 @@ use EV (); BEGIN { - $VERSION = '0.2'; + $VERSION = '0.3'; require XSLoader; XSLoader::load (EV::ADNS, $VERSION);