[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