Hello community,
here is the log from the commit of package perl-XML-Parser-Lite for
openSUSE:Factory checked in at 2018-08-31 09:52:45
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-XML-Parser-Lite (Old)
and /work/SRC/openSUSE:Factory/.perl-XML-Parser-Lite.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-XML-Parser-Lite"
Fri Aug 31 09:52:45 2018 rev:3 rq:631290 version:0.722
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-XML-Parser-Lite/perl-XML-Parser-Lite.changes
2015-06-11 08:22:21.000000000 +0200
+++
/work/SRC/openSUSE:Factory/.perl-XML-Parser-Lite.new/perl-XML-Parser-Lite.changes
2018-08-31 09:52:48.289737900 +0200
@@ -1,0 +2,14 @@
+Mon Aug 20 06:21:25 UTC 2018 - [email protected]
+
+- updated to 0.722
+ see /usr/share/doc/packages/perl-XML-Parser-Lite/Changes
+
+ 0.722 2018-08-19 PHRED
+ - Remove unnecessary tests [github/paultcochrane for all]
+ - Fix link to dist repo
+ - Added continuous integration configurations
+ - Minor fixes and cosmetic changes to make code adhere better to current
+ Perl best practices
+ - Documentation fixes
+
+-------------------------------------------------------------------
Old:
----
XML-Parser-Lite-0.721.tar.gz
New:
----
XML-Parser-Lite-0.722.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-XML-Parser-Lite.spec ++++++
--- /var/tmp/diff_new_pack.nd9KvO/_old 2018-08-31 09:52:48.737739030 +0200
+++ /var/tmp/diff_new_pack.nd9KvO/_new 2018-08-31 09:52:48.737739030 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-XML-Parser-Lite
#
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2018 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,14 +17,14 @@
Name: perl-XML-Parser-Lite
-Version: 0.721
+Version: 0.722
Release: 0
%define cpan_name XML-Parser-Lite
Summary: Lightweight pure-perl XML Parser (based on regexps)
-License: Artistic-1.0 or GPL-1.0+
+License: Artistic-1.0 OR GPL-1.0-or-later
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/XML-Parser-Lite/
-Source0:
http://www.cpan.org/authors/id/P/PH/PHRED/%{cpan_name}-%{version}.tar.gz
+Source0:
https://cpan.metacpan.org/authors/id/P/PH/PHRED/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
@@ -35,11 +35,11 @@
%{perl_requires}
%description
-This module implements an XML parser with a interface similar to the
-XML::Parser manpage. Though not all callbacks are supported, you should be
-able to use it in the same way you use XML::Parser. Due to using
-experimental regexp features it'll work only on Perl 5.6 and above and may
-behave differently on different platforms.
+This module implements an XML parser with a interface similar to
+XML::Parser. Though not all callbacks are supported, you should be able to
+use it in the same way you use XML::Parser. Due to using experimental
+regexp features it'll work only on Perl 5.6 and above and may behave
+differently on different platforms.
Note that you cannot use regular expressions or split in callbacks. This is
due to a limitation of perl's regular expression implementation (which is
++++++ XML-Parser-Lite-0.721.tar.gz -> XML-Parser-Lite-0.722.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/Changes
new/XML-Parser-Lite-0.722/Changes
--- old/XML-Parser-Lite-0.721/Changes 2015-05-26 10:06:47.000000000 +0200
+++ new/XML-Parser-Lite-0.722/Changes 2018-08-20 05:22:40.000000000 +0200
@@ -1,5 +1,13 @@
Revision history for Perl module XML::Parser::Lite
+0.722 2018-08-19 PHRED
+ - Remove unnecessary tests [github/paultcochrane for all]
+ - Fix link to dist repo
+ - Added continuous integration configurations
+ - Minor fixes and cosmetic changes to make code adhere better to current
+ Perl best practices
+ - Documentation fixes
+
0.721 2015-05-26 PHRED
- Developer release (with PHRED's permission) to test changes
- Refactored t/37-mod_xmlrpc.t to make the modules it uses optional,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/MANIFEST
new/XML-Parser-Lite-0.722/MANIFEST
--- old/XML-Parser-Lite-0.721/MANIFEST 2015-05-26 10:06:55.000000000 +0200
+++ new/XML-Parser-Lite-0.722/MANIFEST 2018-08-20 05:23:52.000000000 +0200
@@ -1,12 +1,10 @@
Changes
+lib/XML/Parser/Lite.pm
Makefile.PL
-MANIFEST
+MANIFEST This list of files
+MANIFEST.SKIP
README
-lib/XML/Parser/Lite.pm
-t/07-xmlrpc_payload.t
-t/26-xmlrpc.t
t/27-xmlparserlite.t
-t/37-mod_xmlrpc.t
t/adam.xml
t/Lite.t
META.yml Module YAML meta-data (added by
MakeMaker)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/MANIFEST.SKIP
new/XML-Parser-Lite-0.722/MANIFEST.SKIP
--- old/XML-Parser-Lite-0.721/MANIFEST.SKIP 1970-01-01 01:00:00.000000000
+0100
+++ new/XML-Parser-Lite-0.722/MANIFEST.SKIP 2018-08-20 05:21:29.000000000
+0200
@@ -0,0 +1,14 @@
+.appveyor.yml
+.git/
+.gitignore
+.travis.yml
+^blib/
+^cover_db/
+^Makefile$
+MYMETA.*
+^pm_to_blib
+.*~
+.*\.bak
+.*\.lock
+.*\.old
+.*\.swp
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/META.json
new/XML-Parser-Lite-0.722/META.json
--- old/XML-Parser-Lite-0.721/META.json 2015-05-26 10:06:55.000000000 +0200
+++ new/XML-Parser-Lite-0.722/META.json 2018-08-20 05:23:52.000000000 +0200
@@ -4,13 +4,13 @@
"Byrne Reese ([email protected])"
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter
version 2.140640",
+ "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter
version 2.150010",
"license" : [
"perl_5"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
- "version" : "2"
+ "version" : 2
},
"name" : "XML-Parser-Lite",
"no_index" : {
@@ -47,5 +47,6 @@
"url" : "https://github.com/redhotpenguin/perl-XML-Parser-Lite";
}
},
- "version" : "0.721"
+ "version" : "0.722",
+ "x_serialization_backend" : "JSON::PP version 2.97001"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/META.yml
new/XML-Parser-Lite-0.722/META.yml
--- old/XML-Parser-Lite-0.721/META.yml 2015-05-26 10:06:55.000000000 +0200
+++ new/XML-Parser-Lite-0.722/META.yml 2018-08-20 05:23:51.000000000 +0200
@@ -10,7 +10,7 @@
configure_requires:
ExtUtils::MakeMaker: '6.3'
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 6.98, CPAN::Meta::Converter version
2.140640'
+generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -26,4 +26,5 @@
warnings: '0'
resources:
repository: https://github.com/redhotpenguin/perl-XML-Parser-Lite
-version: '0.721'
+version: '0.722'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/README
new/XML-Parser-Lite-0.722/README
--- old/XML-Parser-Lite-0.721/README 2015-05-26 10:04:59.000000000 +0200
+++ new/XML-Parser-Lite-0.722/README 2018-08-20 05:21:29.000000000 +0200
@@ -111,7 +111,9 @@
COPYRIGHT
Copyright (C) 2000-2007 Paul Kulchenko. All rights reserved.
- Copyright (C) 2008- Martin Kutter. All rights reserved.
+ Copyright (C) 2008 Martin Kutter. All rights reserved.
+
+ Copyright (C) 2013-2015 Fred Moyer. All rights reserved.
This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
@@ -120,10 +122,19 @@
http://www.cs.sfu.ca/~cameron/REX.html Copyright (c) 1998, Robert D.
Cameron.
-AUTHOR
+AUTHORS
Paul Kulchenko ([email protected])
Martin Kutter ([email protected])
+ Fred Moyer ([email protected])
+
Additional handlers supplied by Adam Leggett.
+CONTRIBUTORS
+
+ David Steinbrunner ([email protected])
+
+ Neil Bowers ([email protected])
+
+ Paul Cochrane ([email protected])
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/lib/XML/Parser/Lite.pm
new/XML-Parser-Lite-0.722/lib/XML/Parser/Lite.pm
--- old/XML-Parser-Lite-0.721/lib/XML/Parser/Lite.pm 2015-05-26
10:04:59.000000000 +0200
+++ new/XML-Parser-Lite-0.722/lib/XML/Parser/Lite.pm 2018-08-20
05:22:54.000000000 +0200
@@ -13,7 +13,7 @@
use strict;
use warnings;
-our $VERSION = '0.721';
+our $VERSION = '0.722';
sub new {
my $class = shift;
@@ -32,7 +32,7 @@
my $self = shift;
# allow symbolic refs, avoid "subroutine redefined" warnings
- no strict 'refs';
+ no strict 'refs'; ## no critic
no warnings qw(redefine);
# clear all handlers if called without parameters
if (not @_) {
@@ -64,8 +64,8 @@
# this copyright and citation notice remains intact and that modifications
# or additions are clearly identified.
- # Modifications may be tracked on SOAP::Lite's SVN at
- # https://soaplite.svn.sourceforge.net/svnroot/soaplite/
+ # Modifications may be tracked on XML::Parser::Lite's source code
repository at
+ # https://github.com/redhotpenguin/perl-XML-Parser-Lite
#
use re 'eval';
my $TextSE = "[^<]+";
@@ -128,7 +128,7 @@
sub _parse_re {
use re "eval";
undef $^R;
- no strict 'refs';
+ no strict 'refs'; ## no critic
1 while $_[0] =~ m{$REGEXP}go
};
@@ -358,7 +358,9 @@
Copyright (C) 2000-2007 Paul Kulchenko. All rights reserved.
-Copyright (C) 2008- Martin Kutter. All rights reserved.
+Copyright (C) 2008 Martin Kutter. All rights reserved.
+
+Copyright (C) 2013-2015 Fred Moyer. All rights reserved.
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
@@ -367,16 +369,22 @@
L<http://www.cs.sfu.ca/~cameron/REX.html>
Copyright (c) 1998, Robert D. Cameron.
-=head1 AUTHOR
+=head1 AUTHORS
Paul Kulchenko ([email protected])
Martin Kutter ([email protected])
+Fred Moyer ([email protected])
+
Additional handlers supplied by Adam Leggett.
-=cut
+=head1 CONTRIBUTORS
+David Steinbrunner ([email protected])
+Neil Bowers ([email protected])
+Paul Cochrane ([email protected])
+=cut
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/t/07-xmlrpc_payload.t
new/XML-Parser-Lite-0.722/t/07-xmlrpc_payload.t
--- old/XML-Parser-Lite-0.721/t/07-xmlrpc_payload.t 2015-05-26
10:04:59.000000000 +0200
+++ new/XML-Parser-Lite-0.722/t/07-xmlrpc_payload.t 1970-01-01
01:00:00.000000000 +0100
@@ -1,58 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More;
-
-BEGIN { plan tests => 8 }
-
-eval { require XMLRPC::Lite };
-
-SKIP: {
- skip 'need XMLRPC::Lite', 8 if $@;
-
- my ( $a, $s, $r, $serialized, $deserialized );
-
- print "XML-RPC deserialization test(s)...\n";
-
- $deserialized = XMLRPC::Deserializer->deserialize(
- '<?xml version="1.0" encoding="ISO-8859-1"?>
-<methodCall><methodName>SOAP.Lite.Bug.Report</methodName><params>
-<param><value><struct><member><name>This</name><value>Works</value></member></struct></value></param>
-</params></methodCall>
- '
- )->root;
-
- ok( $deserialized->{params}->[0]->{This} eq 'Works' );
-
- $serialized = XMLRPC::Serializer->serialize(
- { param1 => 'value1', param2 => undef, param3 => 0 } );
-
- ok( $serialized =~ m!<member><name>param2</name><value /></member>! );
- ok( $serialized =~
- m!<member><name>param3</name><value><int>0</int></value></member>! );
-
- $deserialized = XMLRPC::Deserializer->deserialize($serialized)->root;
-
- ok( $deserialized->{param2} eq '' );
- ok( $deserialized->{param3} == 0 );
-
- $serialized =
- XMLRPC::Serializer->method(
- a => { param1 => 'value1', param2 => undef, param3 => 'value3' } );
-
- ok( $serialized =~
-m!<methodCall><methodName>a</methodName><params><param><value><struct>(<member><name>param1</name><value><string>value1</string></value></member>|<member><name>param2</name><value
/></member>|<member><name>param3</name><value><string>value3</string></value></member>){3}</struct></value></param></params></methodCall>!
- );
-
- $serialized = XMLRPC::Serializer->method( a => { param1 => 'value1' } );
-
- ok( $serialized eq
-'<?xml version="1.0"
encoding="UTF-8"?><methodCall><methodName>a</methodName><params><param><value><struct><member><name>param1</name><value><string>value1</string></value></member></struct></value></param></params></methodCall>'
- );
-
- eval { XMLRPC::Serializer->serialize( XMLRPC::Data->type( base63 => 1 ) )
};
-
- ok( $@ =~ /unsupported datatype/ );
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/t/26-xmlrpc.t
new/XML-Parser-Lite-0.722/t/26-xmlrpc.t
--- old/XML-Parser-Lite-0.721/t/26-xmlrpc.t 2015-05-26 10:04:59.000000000
+0200
+++ new/XML-Parser-Lite-0.722/t/26-xmlrpc.t 1970-01-01 01:00:00.000000000
+0100
@@ -1,88 +0,0 @@
-#!/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More;
-
-BEGIN { plan tests => 6 }
-
-eval { require XMLRPC::Lite; require SOAP::Test; };
-
-SKIP: {
- skip 'need XMLRPC::Lite and SOAP::Test', 6 if $@;
-
- my ( $a, $s, $r );
-
- my $proxy = 'http://betty.userland.com/RPC2';
-
- # ------------------------------------------------------
-
- $s = XMLRPC::Lite->proxy($proxy)->on_fault( sub { } );
- eval {
- $s->transport->timeout( $SOAP::Test::TIMEOUT = $SOAP::Test::TIMEOUT );
- };
- $r = $s->test_connection;
-
- unless ( defined $r && defined $r->envelope ) {
- skip 'need XMLRPC::Lite', 6 if $@;
- print "1..0 # Skip: ", $s->transport->status, "\n";
- exit;
- }
-
- # ------------------------------------------------------
-
- ok(
- (
- XMLRPC::Lite->proxy($proxy)
- ->call( 'examples.getStateStruct',
- { state1 => 12, state2 => 28 } )->result
- or ''
- ) eq 'Idaho,Nevada'
- );
-
- ok(
- (
- XMLRPC::Lite->proxy($proxy)->call( 'examples.getStateName', 21 )
- ->result
- or ''
- ) eq 'Massachusetts'
- );
-
- ok(
- (
- XMLRPC::Lite->proxy($proxy)
- ->call( 'examples.getStateNames', 21, 22, 23, 24 )->result
- or ''
- ) =~ /Massachusetts\s+Michigan\s+Minnesota\s+Mississippi/
- );
-
- $s =
- XMLRPC::Lite->proxy($proxy)->call( 'examples.getStateList', [ 21, 22 ] );
- ok( ( $s->result or '' ) eq 'Massachusetts,Michigan' );
- ok( !defined $s->fault );
- ok( !defined $s->faultcode );
-
- print "XMLRPC autodispatch and fault check test(s)...\n";
-
- eval "use XMLRPC::Lite +autodispatch =>
- proxy => '$proxy',
- ; 1" or die;
-
- $r = XMLRPC->getStateName(21);
-
- # Looks like this test requires saving away the result of the
- # last call - which introduces a memory leak (removed in 0.70_01)
- # Looks like we'll have to introduce different Fault handling...
- #
- #
- print "#TODO: fix fault handling ...\n";
- last;
- $r = XMLRPC::Lite->self->call;
-
- ok( ref $r->fault eq 'HASH' );
- ok( $r->fault->{faultString} =~ /Can't evaluate/ );
- ok( $r->faultstring =~ /Can't evaluate/ );
- ok( $r->faultcode == 7 );
-
-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/t/27-xmlparserlite.t
new/XML-Parser-Lite-0.722/t/27-xmlparserlite.t
--- old/XML-Parser-Lite-0.721/t/27-xmlparserlite.t 2013-05-16
10:24:03.000000000 +0200
+++ new/XML-Parser-Lite-0.722/t/27-xmlparserlite.t 2018-08-20
05:21:29.000000000 +0200
@@ -1,4 +1,8 @@
-#!/bin/env perl
+#!/bin/env perl
+
+use strict;
+use diagnostics;
+use Test;
BEGIN {
unless(grep /blib/, @INC) {
@@ -7,12 +11,8 @@
}
}
-use strict;
-use diagnostics;
-use Test;
-
unless (eval { require XML::Parser::Lite }) {
- print "1..0 # Skip: ", $@, "\n";
+ print "1..0 # Skip: ", $@, "\n";
exit;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/t/37-mod_xmlrpc.t
new/XML-Parser-Lite-0.722/t/37-mod_xmlrpc.t
--- old/XML-Parser-Lite-0.721/t/37-mod_xmlrpc.t 2015-05-26 10:04:59.000000000
+0200
+++ new/XML-Parser-Lite-0.722/t/37-mod_xmlrpc.t 1970-01-01 01:00:00.000000000
+0100
@@ -1,14 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More;
-
-use Test::Requires {
- 'XMLRPC::Lite' => 0.717,
- 'XMLRPC::Test' => 0.717,
-};
-
-XMLRPC::Test::Server::run_for( shift || 'http://localhost/mod_xmlrpc' );
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/XML-Parser-Lite-0.721/t/Lite.t
new/XML-Parser-Lite-0.722/t/Lite.t
--- old/XML-Parser-Lite-0.721/t/Lite.t 2013-05-18 07:16:41.000000000 +0200
+++ new/XML-Parser-Lite-0.722/t/Lite.t 2018-08-20 05:21:29.000000000 +0200
@@ -50,7 +50,7 @@
SKIP: {
skip 'need File::Basename for resolveing filename', 1
- if ( ! eval "require File::Basename");
+ if ( ! eval { require File::Basename } );
my $dir = File::Basename::dirname( __FILE__ );
$parser = XML::Parser::Lite->new();
open my $fh, '<', "$dir/adam.xml";
