r29747 - in /trunk/libjson-any-perl: ._Makefile.PL Changes MANIFEST META.yml Makefile.PL debian/changelog debian/control debian/copyright lib/JSON/._Any.pm lib/JSON/Any.pm t/._00-load.t t/._01-JSON.t t/10_unicode.t t/11-string-escape.t
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Sat Jan 17 15:02:56 UTC 2009
Author: ansgar-guest
Date: Sat Jan 17 15:02:50 2009
New Revision: 29747
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=29747
Log:
* New upstream release.
* debian/copyright: Update copyright years.
* debian/control: Do not depend on libjson-syck-perl. It has been
deprecated upstream and is disabled by default.
* Add myself to Uploaders.
Added:
trunk/libjson-any-perl/t/11-string-escape.t
- copied unchanged from r29746, branches/upstream/libjson-any-perl/current/t/11-string-escape.t
Removed:
trunk/libjson-any-perl/._Makefile.PL
trunk/libjson-any-perl/lib/JSON/._Any.pm
trunk/libjson-any-perl/t/._00-load.t
trunk/libjson-any-perl/t/._01-JSON.t
Modified:
trunk/libjson-any-perl/Changes
trunk/libjson-any-perl/MANIFEST
trunk/libjson-any-perl/META.yml
trunk/libjson-any-perl/Makefile.PL
trunk/libjson-any-perl/debian/changelog
trunk/libjson-any-perl/debian/control
trunk/libjson-any-perl/debian/copyright
trunk/libjson-any-perl/lib/JSON/Any.pm
trunk/libjson-any-perl/t/10_unicode.t
Modified: trunk/libjson-any-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/Changes?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/Changes (original)
+++ trunk/libjson-any-perl/Changes Sat Jan 17 15:02:50 2009
@@ -1,4 +1,8 @@
Revision history for JSON-Any
+1.19 2009-01-15
+ * Make JSON::Syck optional and deprecated. (perigrin)
+ * Added tests for string escapes. (semifor)
+
1.18 2008-11-12
* Removed JSON::PC support as it's been removed from CPAN (perigrin)
Modified: trunk/libjson-any-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/MANIFEST?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/MANIFEST (original)
+++ trunk/libjson-any-perl/MANIFEST Sat Jan 17 15:02:50 2009
@@ -23,3 +23,4 @@
t/04-ENV.t
t/05-JSON-Syck.t
t/10_unicode.t
+t/11-string-escape.t
Modified: trunk/libjson-any-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/META.yml?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/META.yml (original)
+++ trunk/libjson-any-perl/META.yml Sat Jan 17 15:02:50 2009
@@ -20,4 +20,4 @@
Carp: 0
resources:
license: http://dev.perl.org/licenses/
-version: 1.18
+version: 1.19
Modified: trunk/libjson-any-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/Makefile.PL?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/Makefile.PL (original)
+++ trunk/libjson-any-perl/Makefile.PL Sat Jan 17 15:02:50 2009
@@ -9,7 +9,7 @@
requires 'Carp' => '0';
sub has_json () {
- @order = qw(XS JSON DWIW Syck);
+ @order = qw(XS JSON DWIW);
foreach my $testmod (@order) {
$testmod = "JSON::$testmod" unless $testmod eq "JSON";
eval "require $testmod";
Modified: trunk/libjson-any-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/debian/changelog?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/debian/changelog (original)
+++ trunk/libjson-any-perl/debian/changelog Sat Jan 17 15:02:50 2009
@@ -1,3 +1,13 @@
+libjson-any-perl (1.19-1) UNRELEASED; urgency=low
+
+ * New upstream release.
+ * debian/copyright: Update copyright years.
+ * debian/control: Do not depend on libjson-syck-perl. It has been
+ deprecated upstream and is disabled by default.
+ * Add myself to Uploaders.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org> Sat, 17 Jan 2009 12:50:07 +0100
+
libjson-any-perl (1.18-1) unstable; urgency=low
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
Modified: trunk/libjson-any-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/debian/control?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/debian/control (original)
+++ trunk/libjson-any-perl/debian/control Sat Jan 17 15:02:50 2009
@@ -5,7 +5,8 @@
Build-Depends-Indep: perl (>= 5.8.8-7), libjson-perl (>= 2.02),
libyaml-syck-perl, libtest-pod-perl, libtest-pod-coverage-perl, libjson-xs-perl (>= 2.01)
Uploaders: Krzysztof Krzyzaniak (eloy) <eloy at debian.org>,
- Damyan Ivanov <dmn at debian.org>, gregor herrmann <gregoa at debian.org>
+ Damyan Ivanov <dmn at debian.org>, gregor herrmann <gregoa at debian.org>,
+ Ansgar Burchardt <ansgar at 43-1.org>
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Standards-Version: 3.8.0
Homepage: http://search.cpan.org/dist/JSON-Any/
@@ -14,7 +15,7 @@
Package: libjson-any-perl
Architecture: all
-Depends: ${perl:Depends}, ${misc:Depends}, libjson-perl (>= 2.02) | libyaml-syck-perl | libjson-xs-perl (>= 2.01)
+Depends: ${perl:Depends}, ${misc:Depends}, libjson-perl (>= 2.02) | libjson-xs-perl (>= 2.01)
Description: wrapper class for the various JSON classes
The JSON::Any module provides a coherent API to bring together the various
JSON modules currently on CPAN. This module will allow you to code to
Modified: trunk/libjson-any-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/debian/copyright?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/debian/copyright (original)
+++ trunk/libjson-any-perl/debian/copyright Sat Jan 17 15:02:50 2009
@@ -1,16 +1,16 @@
Format-Specification:
http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
-Upstream-Maintainer: Chris Thompson, C<< <cthom at cpan.org> >>
+Upstream-Maintainer: Chris Thompson <cthom at cpan.org>
Upstream-Source: http://search.cpan.org/dist/JSON-Any/
Upstream-Name: JSON-Any
Files: *
-Copyright: 2007, Chris Thompson, <cthom at cpan.org>
+Copyright: 2007-2009, Chris Thompson <cthom at cpan.org>
License-Alias: Perl
License: Artistic | GPL-1+
Files: inc/*:
-Copyright: 2002 - 2008 by Brian Ingerson, Audrey Tang and Adam Kennedy.
+Copyright: 2002-2008, Brian Ingerson, Audrey Tang and Adam Kennedy.
License-Alias: Perl
License: Artistic | GPL-1+
Modified: trunk/libjson-any-perl/lib/JSON/Any.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/lib/JSON/Any.pm?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/lib/JSON/Any.pm (original)
+++ trunk/libjson-any-perl/lib/JSON/Any.pm Sat Jan 17 15:02:50 2009
@@ -20,7 +20,7 @@
=cut
-our $VERSION = '1.18';
+our $VERSION = '1.19';
our $UTF8;
@@ -201,7 +201,7 @@
@order = split /\s/, $ENV{JSON_ANY_ORDER}
if !@order and $ENV{JSON_ANY_ORDER};
- @order = qw(XS JSON DWIW Syck) unless @order;
+ @order = qw(XS JSON DWIW) unless @order;
foreach my $testmod (@order) {
$testmod = "JSON::$testmod" unless $testmod eq "JSON";
@@ -259,13 +259,12 @@
JSON::XS
JSON
JSON::DWIW
- JSON::Syck
And loading the first one it finds.
You may change the order by specifying it on the C<use JSON::Any> line:
- use JSON::Any qw(DWIW Syck XS JSON);
+ use JSON::Any qw(DWIW XS JSON);
Specifying an order that is missing one of the modules will prevent that module from being used:
@@ -273,6 +272,17 @@
This will check in that order, and will never attempt to load JSON::Syck. This can also be set via
the $ENV{JSON_ANY_ORDER} environment variable.
+
+JSON::Syck has been deprecated by it's author, but in the attempt to still stay relevant as a "Compat Layer"
+JSON::Any still supports it. This support however has been made optional, and disabled by default. If you would like
+to use JSON::Any with version 1.19 and above you'll need to explicitly add it to the import list.
+
+ use JSON::Any qw(Syck XS JSON);
+
+or
+
+ $ENV{JSON_ANY_ORDER} = 'Syck XS JSON';
+
WARNING: If you call JSON::Any with an empty list
@@ -505,7 +515,8 @@
=head1 AUTHOR
Chris Thompson, C<< <cthom at cpan.org> >>
-Chris Prather, C<< <perigrin at cpan.org> >>
+Chris Prather, C<< <chris at prather.org> >>
+Robin Berjon, C<< robin at berjon.com >>
=head1 BUGS
@@ -530,7 +541,7 @@
=head1 COPYRIGHT & LICENSE
-Copyright 2007 Chris Thompson, some rights reserved.
+Copyright 2007-2009 Chris Thompson, some rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
Modified: trunk/libjson-any-perl/t/10_unicode.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libjson-any-perl/t/10_unicode.t?rev=29747&op=diff
==============================================================================
--- trunk/libjson-any-perl/t/10_unicode.t (original)
+++ trunk/libjson-any-perl/t/10_unicode.t Sat Jan 17 15:02:50 2009
@@ -13,7 +13,7 @@
$ENV{JSON_ANY_CONFIG} = "utf8=1";
-foreach my $backend qw(XS JSON DWIW Syck PC) {
+foreach my $backend qw(XS JSON DWIW Syck) {
my $j = eval {
JSON::Any->import($backend);
JSON::Any->new;
More information about the Pkg-perl-cvs-commits
mailing list