- PERL_INSTALL_ROOT => DESTDIR - dropped old BR on perl(JSON) - dropped old BR on perl(JSON::Syck)epel9
parent
fa5757e733
commit
948032da88
@ -1 +1 @@
|
||||
JSON-Any-1.21.tar.gz
|
||||
JSON-Any-1.22.tar.gz
|
||||
|
@ -0,0 +1,5 @@
|
||||
[add_build_requires]
|
||||
perl(JSON::XS)=0
|
||||
|
||||
[add_requires]
|
||||
perl(JSON::XS)=0
|
@ -1 +1 @@
|
||||
3e5d6f943b03c2c0c688be1295719c09 JSON-Any-1.21.tar.gz
|
||||
c576a6765c310ad36135e2c090eb0be7 JSON-Any-1.22.tar.gz
|
||||
|
@ -1,33 +0,0 @@
|
||||
diff -ur JSON-Any-1.16.orig/lib/JSON/Any.pm JSON-Any-1.16/lib/JSON/Any.pm
|
||||
--- JSON-Any-1.16.orig/lib/JSON/Any.pm 2008-02-13 15:15:46.000000000 -0800
|
||||
+++ JSON-Any-1.16/lib/JSON/Any.pm 2008-03-22 10:50:12.831848606 -0700
|
||||
@@ -110,6 +110,8 @@
|
||||
max_depth
|
||||
);
|
||||
|
||||
+ local $conf->{utf8} = !$conf->{utf8}; # it means the opposite
|
||||
+
|
||||
my $obj = $handler->new;
|
||||
for my $mutator (@params) {
|
||||
next unless exists $conf->{$mutator};
|
||||
@@ -199,6 +201,7 @@
|
||||
foreach my $testmod (@order) {
|
||||
$testmod = "JSON::$testmod" unless $testmod eq "JSON";
|
||||
eval "require $testmod";
|
||||
+ $@ = 'JSON too old' if $testmod eq 'JSON' && "$JSON::VERSION" =~ /^1/;
|
||||
unless ($@) {
|
||||
$handler = $testmod;
|
||||
my $key = _make_key($handler);
|
||||
diff -ur JSON-Any-1.16.orig/t/04-ENV.t JSON-Any-1.16/t/04-ENV.t
|
||||
--- JSON-Any-1.16.orig/t/04-ENV.t 2008-01-01 12:05:35.000000000 -0800
|
||||
+++ JSON-Any-1.16/t/04-ENV.t 2008-03-22 10:36:06.260856865 -0700
|
||||
@@ -13,7 +13,8 @@
|
||||
|
||||
SKIP: {
|
||||
eval { require JSON; };
|
||||
- skip "JSON not installed: $@", 1 if $@;
|
||||
+ skip "JSON unusable or not installed: $@", 1
|
||||
+ if $@ || $JSON::VERSION =~ /^1/;
|
||||
|
||||
$ENV{JSON_ANY_ORDER} = qw(JSON);
|
||||
JSON::Any->import();
|
Loading…
Reference in new issue