r46294 - in /trunk/libcatalyst-plugin-server-perl/debian: README.source changelog control patches/ patches/series patches/use-parserfactory.patch rules
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Oct 24 03:52:15 UTC 2009
Author: jawnsy-guest
Date: Sat Oct 24 03:52:09 2009
New Revision: 46294
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=46294
Log:
Add a patch to hopefully fix builds...
Added:
trunk/libcatalyst-plugin-server-perl/debian/README.source
trunk/libcatalyst-plugin-server-perl/debian/patches/
trunk/libcatalyst-plugin-server-perl/debian/patches/series
trunk/libcatalyst-plugin-server-perl/debian/patches/use-parserfactory.patch
Modified:
trunk/libcatalyst-plugin-server-perl/debian/changelog
trunk/libcatalyst-plugin-server-perl/debian/control
trunk/libcatalyst-plugin-server-perl/debian/rules
Added: trunk/libcatalyst-plugin-server-perl/debian/README.source
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/README.source?rev=46294&op=file
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/README.source (added)
+++ trunk/libcatalyst-plugin-server-perl/debian/README.source Sat Oct 24 03:52:09 2009
@@ -1,0 +1,5 @@
+This package uses quilt to manage all modifications to the upstream
+source. Changes are stored in the source package as diffs in
+debian/patches and applied during the build.
+
+See /usr/share/doc/quilt/README.source for a detailed explanation.
Modified: trunk/libcatalyst-plugin-server-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/changelog?rev=46294&op=diff
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/changelog (original)
+++ trunk/libcatalyst-plugin-server-perl/debian/changelog Sat Oct 24 03:52:09 2009
@@ -1,5 +1,5 @@
libcatalyst-plugin-server-perl (0.26-1) UNRELEASED; urgency=low
- * Initial Release.
+ * Initial Release (Closes: #552188)
-- Jonathan Yu <jawnsy at cpan.org> Fri, 23 Oct 2009 18:58:27 -0400
Modified: trunk/libcatalyst-plugin-server-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/control?rev=46294&op=diff
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/control (original)
+++ trunk/libcatalyst-plugin-server-perl/debian/control Sat Oct 24 03:52:09 2009
@@ -1,9 +1,9 @@
Source: libcatalyst-plugin-server-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 7)
-Build-Depends-Indep: perl, librpc-xml-perl (>= 1.35),
- libcatalyst-perl (>= 5.66), libmro-compat-perl
+Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7)
+Build-Depends-Indep: perl, librpc-xml-perl (>= 0.69),
+ libcatalyst-perl, libmro-compat-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Jonathan Yu <jawnsy at cpan.org>
Standards-Version: 3.8.3
@@ -13,8 +13,8 @@
Package: libcatalyst-plugin-server-perl
Architecture: all
-Depends: ${perl:Depends}, ${misc:Depends}, librpc-xml-perl (>= 1.35),
- libcatalyst-perl (>= 5.66), libmro-compat-perl
+Depends: ${perl:Depends}, ${misc:Depends}, librpc-xml-perl (>= 0.69),
+ libcatalyst-perl, libmro-compat-perl
Description: Catalyst plugin implementing base server functionality
Catalyst::Plugin::Server is a Perl module that extends Catalyst by providing
a basic XMLRPC server using the RPC::XML module (see librpc-xml-perl). There
Added: trunk/libcatalyst-plugin-server-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/patches/series?rev=46294&op=file
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/patches/series (added)
+++ trunk/libcatalyst-plugin-server-perl/debian/patches/series Sat Oct 24 03:52:09 2009
@@ -1,0 +1,1 @@
+use-parserfactory.patch
Added: trunk/libcatalyst-plugin-server-perl/debian/patches/use-parserfactory.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/patches/use-parserfactory.patch?rev=46294&op=file
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/patches/use-parserfactory.patch (added)
+++ trunk/libcatalyst-plugin-server-perl/debian/patches/use-parserfactory.patch Sat Oct 24 03:52:09 2009
@@ -1,0 +1,92 @@
+Description: use an RPC::XML::ParserFactory
+ Due to a backward-incompatible change in RPC::XML, we need to
+ do this to get the server to work. Otherwise we have to use an
+ old RPC::XML package
+Author: Jonathan Yu <jawnsy at cpan.org>
+Bug-CPAN: https://rt.cpan.org/Ticket/Display.html?id=50013
+Origin: vendor
+Forwarded: not-needed
+--- a/lib/Catalyst/Plugin/Server/XMLRPC.pm
++++ b/lib/Catalyst/Plugin/Server/XMLRPC.pm
+@@ -549,7 +549,7 @@
+ use warnings;
+
+ use RPC::XML;
+- use RPC::XML::Parser;
++ use RPC::XML::ParserFactory;
+
+ use Data::Dumper;
+ use Text::SimpleTable;
+@@ -563,7 +563,7 @@
+ ] );
+
+ __PACKAGE__->mk_classdata( qw[_xmlrpc_parser]);
+- __PACKAGE__->_xmlrpc_parser( RPC::XML::Parser->new );
++ __PACKAGE__->_xmlrpc_parser( RPC::XML::ParserFactory->new );
+
+ *parameters = *params;
+
+--- a/t/002_live.t
++++ b/t/002_live.t
+@@ -60,7 +60,7 @@
+ ok( $res->is_success, " Response successfull 2XX" );
+ is( $res->code, 200, " Reponse code 200" );
+
+- my $data = RPC::XML::Parser->new->parse( $res->content )->value->value;
++ my $data = RPC::XML::ParserFactory->new->parse( $res->content )->value->value;
+ is_deeply( $data, $rv, " Return value as expected" );
+
+ if( ref $data and UNIVERSAL::isa( $data, 'HASH' ) ) {
+--- a/t/003_Settings.t
++++ b/t/003_Settings.t
+@@ -44,7 +44,7 @@
+ ok( $res->is_success, " Response successfull 2XX" );
+ is( $res->code, 200, " Reponse code 200" );
+
+- my $data = RPC::XML::Parser->new->parse( $res->content )->value->value;
++ my $data = RPC::XML::ParserFactory->new->parse( $res->content )->value->value;
+
+ ### general settings
+ { is( $data->{method}, $Method,
+--- a/t/004_Attributes.t
++++ b/t/004_Attributes.t
+@@ -70,7 +70,7 @@
+ ### Check RPC
+ {
+ my $req = shoot($data->{rpc});
+- my $res = RPC::XML::Parser->new->parse( $req->content )->value->value;
++ my $res = RPC::XML::ParserFactory->new->parse( $req->content )->value->value;
+ if (grep(/^rpc$/, @{$data->{valid}})) {
+ ok(!$res->{faultString}, 'Got RPC response on ' . $data->{rpc});
+ } else {
+--- a/t/030_Error_live.t
++++ b/t/030_Error_live.t
+@@ -71,7 +71,7 @@
+ ok( $res->is_success, " Response successfull 2XX" );
+ is( $res->code, 200, " Reponse code 200" );
+
+- my $rv = RPC::XML::Parser->new->parse( $res->content )->value->value;
++ my $rv = RPC::XML::ParserFactory->new->parse( $res->content )->value->value;
+ #is_deeply( $data, $rv, " Return value as expected" );
+ is($rv->{faultString}, 'Invalid XMLRPC request: No such method', 'Got faultString "No such method"');
+ }
+@@ -79,7 +79,7 @@
+ ### This content is NOT VALID xml check
+ {
+ my $res = shoot((keys %Methods)[0], 'bLegH');
+- my $data = RPC::XML::Parser->new->parse( $res->content )->value->value;
++ my $data = RPC::XML::ParserFactory->new->parse( $res->content )->value->value;
+
+ if (UNIVERSAL::isa($data, 'HASH') && $data->{faultString}) {
+ like($data->{faultString}, qr/Invalid XMLRPC request.*syntax error/s,'Got faultString "syntax error"');
+--- a/t/040_faultcode.t
++++ b/t/040_faultcode.t
+@@ -48,7 +48,7 @@
+ ok( $res->is_success, " Response successfull 2XX" );
+ is( $res->code, 200, " Reponse code 200" );
+
+- my $data = RPC::XML::Parser->new->parse( $res->content )->value->value;
++ my $data = RPC::XML::ParserFactory->new->parse( $res->content )->value->value;
+ my ($rv_code,$rv_msg) = @$rv;
+ is_deeply( $data->{faultCode}, $rv_code, " Return value of faultCode as expected" );
+ is_deeply( $data->{faultString}, $rv_msg, " Return value of faultString as expected" );
Modified: trunk/libcatalyst-plugin-server-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-plugin-server-perl/debian/rules?rev=46294&op=diff
==============================================================================
--- trunk/libcatalyst-plugin-server-perl/debian/rules (original)
+++ trunk/libcatalyst-plugin-server-perl/debian/rules Sat Oct 24 03:52:09 2009
@@ -1,4 +1,4 @@
#!/usr/bin/make -f
%:
- dh $@
+ dh --with quilt $@
More information about the Pkg-perl-cvs-commits
mailing list