0.0601 Wed Apr 20 12:17:43 CEST 2011

       - Fix fail to load json, with json-any
         http://www.cpantesters.org/cpan/report/f1e67256-36b4-11e0-afb0-adca6bb533f3

Changes

@@ -1,5 +1,9 @@
 Revision history for Transmission-Client
 
+0.0601   Wed Apr 20 12:17:43 CEST 2011
+       - Fix fail to load json, with json-any
+         http://www.cpantesters.org/cpan/report/f1e67256-36b4-11e0-afb0-adca6bb533f3
+
 0.06     Sun Feb  6 18:33:13 CET 2011
        - Fix RT62805: location to the rpc-spec is updated:
          https://trac.transmissionbt.com/browser/trunk/extras/rpc-spec.txt

Makefile.PL

@@ -3,6 +3,24 @@ use inc::Module::Install;
 name     q(Transmission-Client);
 all_from q(lib/Transmission/Client.pm);
 
+# copy/paste from JSON-Any/Makefile.PL
+sub has_json () {
+    our @order = qw(XS JSON DWIW);
+    foreach my $testmod (@order) {
+        $testmod = "JSON::$testmod" unless $testmod eq "JSON";
+        eval "require $testmod";
+        return 1 unless $@;
+    }
+    return 0;
+}
+
+unless (has_json) {
+    requires 'JSON' => '2.02';
+}
+else {
+    feature 'JSON', -default => 0, 'JSON'   => '2.02';
+}
+
 requires q(DateTime) => 0.50;
 requires q(JSON::Any) => 1.20;
 requires q(LWP::UserAgent) => 5.8;

README

@@ -2,7 +2,7 @@ NAME
     Transmission::Client - Interface to Transmission
 
 VERSION
-    0.06
+    0.0601
 
 DESCRIPTION
     Transmission::Client is the main module in a collection of modules to

lib/Transmission/Client.pm

@@ -6,7 +6,7 @@ Transmission::Client - Interface to Transmission
 
 =head1 VERSION
 
-0.06
+0.0601
 
 =head1 DESCRIPTION
 
@@ -83,7 +83,7 @@ use Transmission::Torrent;
 use Transmission::Session;
 use constant RPC_DEBUG => $ENV{'TC_RPC_DEBUG'};
 
-our $VERSION = eval '0.06';
+our $VERSION = eval '0.0601';
 our $SESSION_ID_HEADER_NAME = 'X-Transmission-Session-Id';
 my $JSON = JSON::Any->new;
 

t/00-load.t

@@ -1,4 +1,3 @@
-#!/usr/bin/env perl
 use lib qw(lib);
 use Test::More;
 plan tests => 8;