[libsoap-wsdl-perl] 06/08: make Text::XML usage optional
Damyan Ivanov
dmn at moszumanska.debian.org
Wed Jan 15 09:50:15 UTC 2014
This is an automated email from the git hooks/post-receive script.
dmn pushed a commit to branch master
in repository libsoap-wsdl-perl.
commit d996841d99c2400db94ca4993ad882db6c29bd6d
Author: Damyan Ivanov <dmn at debian.org>
Date: Wed Jan 15 09:41:49 2014 +0000
make Text::XML usage optional
---
debian/patches/use-Test::XML.patch | 21 +++++++++++++--------
1 file changed, 13 insertions(+), 8 deletions(-)
diff --git a/debian/patches/use-Test::XML.patch b/debian/patches/use-Test::XML.patch
index 7fd14fb..079434e 100644
--- a/debian/patches/use-Test::XML.patch
+++ b/debian/patches/use-Test::XML.patch
@@ -1,17 +1,22 @@
+Description: use Test::XML for comparing XML instead of 'eq'
+ 'eq' works most of the time, until you have XML structures which have more
+ than one attribute. Their serialization is non-deterministic since the order
+ of the attributes is not predictable.
+Author: Damyan Ivanov <dmn at debian.org>
+Bug: https://rt.cpan.org/Ticket/Display.html?id=74257
+Bug-Debian: http://bugs.debian.org/720964
--- a/t/SOAP/WSDL/05_simpleType-list.t
+++ b/t/SOAP/WSDL/05_simpleType-list.t
-@@ -1,4 +1,5 @@
- use Test::More tests => 8;
-+use Test::XML;
- use strict;
- use lib '../lib';
- use lib 't/lib';
-@@ -36,7 +37,7 @@ ok $xml = $soap->call('test', testAll =>
+@@ -36,7 +36,11 @@ ok $xml = $soap->call('test', testAll =>
#5
ok ( $xml2 = $soap->call('test', testAll => "1 2" ) , 'Serialized scalar call' );
#6
-ok( $xml eq $xml2, 'Got expected result');
-+is_xml( $xml, $xml2, 'Got expected result');
++SKIP: {
++ skip "Test::XML needed for comparing XML", 1
++ unless eval { require Text::XML };
++ is_xml( $xml, $xml2, 'Got expected result');
++}
#7
TODO: {
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libsoap-wsdl-perl.git
More information about the Pkg-perl-cvs-commits
mailing list