Hello community, here is the log from the commit of package perl-XML-Writer for openSUSE:Factory checked in at 2015-04-25 21:16:54 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-XML-Writer (Old) and /work/SRC/openSUSE:Factory/.perl-XML-Writer.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-XML-Writer" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-XML-Writer/perl-XML-Writer.changes 2014-02-28 17:46:27.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-XML-Writer.new/perl-XML-Writer.changes 2015-04-25 21:16:55.000000000 +0200 @@ -1,0 +2,10 @@ +Thu Apr 16 20:46:02 UTC 2015 - co...@suse.com + +- updated to 0.625 + see /usr/share/doc/packages/perl-XML-Writer/Changes + + 0.625 Thu 05 Jun 2014 23:55:42 +1000 <j...@kafsemo.org> + - Allow xml-model processing instructions (#94078). + - Don't warn when undef is passed to setOutput (#94369). + +------------------------------------------------------------------- Old: ---- XML-Writer-0.624.tar.gz New: ---- XML-Writer-0.625.tar.gz cpanspec.yml ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-XML-Writer.spec ++++++ --- /var/tmp/diff_new_pack.SSterr/_old 2015-04-25 21:16:56.000000000 +0200 +++ /var/tmp/diff_new_pack.SSterr/_new 2015-04-25 21:16:56.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-XML-Writer # -# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2015 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,16 @@ Name: perl-XML-Writer -Version: 0.624 +Version: 0.625 Release: 0 +#Upstream: SUSE-Public-Domain %define cpan_name XML-Writer -Summary: Perl extension for writing XML documents. +Summary: Perl extension for writing XML documents License: MIT Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/XML-Writer/ -Source: http://www.cpan.org/authors/id/J/JO/JOSEPHW/%{cpan_name}-%{version}.tar.gz +Source0: http://www.cpan.org/authors/id/J/JO/JOSEPHW/%{cpan_name}-%{version}.tar.gz +Source1: cpanspec.yml BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl ++++++ XML-Writer-0.624.tar.gz -> XML-Writer-0.625.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/XML-Writer-0.624/Changes new/XML-Writer-0.625/Changes --- old/XML-Writer-0.624/Changes 2014-02-12 13:29:32.000000000 +0100 +++ new/XML-Writer-0.625/Changes 2014-06-05 15:56:29.000000000 +0200 @@ -1,5 +1,9 @@ Revision history for Perl extension XML::Writer. +0.625 Thu 05 Jun 2014 23:55:42 +1000 <j...@kafsemo.org> + - Allow xml-model processing instructions (#94078). + - Don't warn when undef is passed to setOutput (#94369). + 0.624 Wed Feb 12 23:28:39 2014 +1100 <j...@kafsemo.org> - Allow an empty system ID in a doctype declaration. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/XML-Writer-0.624/META.yml new/XML-Writer-0.625/META.yml --- old/XML-Writer-0.624/META.yml 2014-02-12 13:29:32.000000000 +0100 +++ new/XML-Writer-0.625/META.yml 2014-06-05 15:56:29.000000000 +0200 @@ -3,7 +3,7 @@ version: 1.4 url: http://module-build.sourceforge.net/META-spec-v1.4.html name: XML-Writer -version: 0.624 +version: 0.625 abstract: Easily generate well-formed, namespace-aware XML. author: - David Megginson <da...@megginson.com> diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/XML-Writer-0.624/Makefile.PL new/XML-Writer-0.625/Makefile.PL --- old/XML-Writer-0.624/Makefile.PL 2014-02-12 13:29:32.000000000 +0100 +++ new/XML-Writer-0.625/Makefile.PL 2014-06-05 15:56:29.000000000 +0200 @@ -7,7 +7,7 @@ # the contents of the Makefile that is written. WriteMakefile( 'NAME' => 'XML::Writer', - 'VERSION' => '0.624', + 'VERSION' => '0.625', # A manually-created META.yml has all the other metadata; # we don't want it overwritten diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/XML-Writer-0.624/Writer.pm new/XML-Writer-0.625/Writer.pm --- old/XML-Writer-0.624/Writer.pm 2014-02-12 13:29:32.000000000 +0100 +++ new/XML-Writer-0.625/Writer.pm 2014-06-05 15:56:29.000000000 +0200 @@ -15,7 +15,7 @@ use vars qw($VERSION); use Carp; use IO::Handle; -$VERSION = "0.624"; +$VERSION = "0.625"; use overload '""' => \&_overload_string; @@ -172,7 +172,7 @@ my $SAFE_pi = sub { my ($name, $data) = (@_); $seen{ANYTHING} = 1; - if (($name =~ /^xml/i) && ($name !~ /^xml-stylesheet$/i)) { + if (($name =~ /^xml/i) && ($name !~ /^xml-(stylesheet|model)$/i)) { carp("Processing instruction target begins with 'xml'"); } @@ -470,10 +470,10 @@ $self->{'SETOUTPUT'} = sub { my $newOutput = $_[0]; - if ( !ref($newOutput) && 'self' eq $newOutput ) { - $newOutput = \$selfcontained_output; - $use_selfcontained_output = 1; - } + if (defined($newOutput) && !ref($newOutput) && 'self' eq $newOutput ) { + $newOutput = \$selfcontained_output; + $use_selfcontained_output = 1; + } if (ref($newOutput) eq 'SCALAR') { $output = XML::Writer::_String->new($newOutput); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/XML-Writer-0.624/t/01_main.t new/XML-Writer-0.625/t/01_main.t --- old/XML-Writer-0.624/t/01_main.t 2014-02-12 13:29:32.000000000 +0100 +++ new/XML-Writer-0.625/t/01_main.t 2014-06-05 15:56:29.000000000 +0200 @@ -15,7 +15,7 @@ use Errno; -use Test::More(tests => 242); +use Test::More(tests => 246); # Catch warnings @@ -800,6 +800,22 @@ wasNoWarning('The test processing instructions should not cause warnings'); }; +# Additionally, confirm that 'xml-model' is also permitted +TEST: { + initEnv(); + $w->pi('xml-model', 'href="http://example.org/example.rng";'); + + $w->emptyTag('x'); + + $w->end(); + + wasNoWarning('An xml-model processing instruction should not cause warnings'); + checkResult(<<"EOS", "A document with an xsl-model pi"); +<?xml-model href="http://example.org/example.rng";?> +<x /> +EOS +}; + # Verify that a still-reserved processing instruction generates # a warning. TEST: { @@ -1351,6 +1367,8 @@ $w->setOutput(); + wasNoWarning('setOutput without a defined argument should not cause warnings'); + is($w->getOutput(), \*STDOUT, 'If no output is given, STDOUT should be used'); }; ++++++ cpanspec.yml ++++++ --- #description_paragraphs: 3 #no_testing: broken upstream #sources: # - source1 # - source2 #patches: # foo.patch: -p1 # bar.patch: #preamble: |- # BuildRequires: gcc-c++ #post_prep: |- # hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'` # sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL #post_install: |- # sed on %{name}.files license: MIT #skip_noarch: 1 #custom_build: - #./Build build flags=%{?_smp_mflags} --myflag
