Permalink
Browse files

JSON::Syck to JSON::XS

  • Loading branch information...
1 parent 398cce0 commit 92343b4f322a5f62efe78ea937f5e7a2f710cadf @cooldaemon committed Feb 24, 2010
Showing with 24 additions and 12 deletions.
  1. +1 −1 Makefile.PL
  2. +5 −5 config.json
  3. +6 −2 xt/04_anyevent.t
  4. +6 −2 xt/05_coro.t
  5. +6 −2 xt/06_multi_channel.t
View
@@ -7,7 +7,7 @@ requires 'MooseX::AttributeHelpers';
requires 'MooseX::App::Cmd';
requires 'MooseX::ConfigFromFile';
requires 'Config::Any';
-requires 'JSON::Syck' => '0.88';
+requires 'JSON::XS';
requires 'List::MoreUtils';
requires 'Net::AMQP';
requires 'AnyEvent';
View
@@ -1,7 +1,7 @@
{
- host: 'localhost',
- port: '5672',
- user: 'guest',
- pass: 'guest',
- vhost: '/'
+ "host": "localhost",
+ "port": 5672,
+ "user": "guest",
+ "pass": "guest",
+ "vhost": "/"
}
View
@@ -2,9 +2,13 @@ use Test::More;
use Test::Exception;
use FindBin;
-use JSON::Syck;
+use JSON::XS;
-my $conf = JSON::Syck::LoadFile($FindBin::Bin . '/../config.json');
+my $json_text;
+open my $fh, '<', $FindBin::Bin . '/../config.json' or die $!;
+{undef $/; $json_text = <$fh>;}
+close $fh;
+my $conf = decode_json($json_text);
eval {
use IO::Socket::INET;
View
@@ -2,9 +2,13 @@ use Test::More;
use Test::Exception;
use FindBin;
-use JSON::Syck;
+use JSON::XS;
-my $conf = JSON::Syck::LoadFile($FindBin::Bin . '/../config.json');
+my $json_text;
+open my $fh, '<', $FindBin::Bin . '/../config.json' or die $!;
+{undef $/; $json_text = <$fh>;}
+close $fh;
+my $conf = decode_json($json_text);
eval {
use IO::Socket::INET;
View
@@ -2,9 +2,13 @@ use Test::More;
use Test::Exception;
use FindBin;
-use JSON::Syck;
+use JSON::XS;
-my $conf = JSON::Syck::LoadFile($FindBin::Bin . '/../config.json');
+my $json_text;
+open my $fh, '<', $FindBin::Bin . '/../config.json' or die $!;
+{undef $/; $json_text = <$fh>;}
+close $fh;
+my $conf = decode_json($json_text);
eval {
use IO::Socket::INET;

0 comments on commit 92343b4

Please sign in to comment.