Hello community,
here is the log from the commit of package perl-HTML-Parser for openSUSE:Factory checked in at 2016-01-28 22:50:01
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-HTML-Parser (Old)
and /work/SRC/openSUSE:Factory/.perl-HTML-Parser.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-HTML-Parser"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-HTML-Parser/perl-HTML-Parser.changes 2015-04-21 10:50:31.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.perl-HTML-Parser.new/perl-HTML-Parser.changes 2016-01-28 22:50:02.000000000 +0100
@@ -1,0 +2,26 @@
+Wed Jan 20 10:12:44 UTC 2016 - coolo@suse.com
+
+- updated to 3.72
+ see /usr/share/doc/packages/perl-HTML-Parser/Changes
+
+ 2016-01-19 Release 3.72
+
+ Gisle Aas (3):
+ Avoid more clang casting warnings
+ Remove trailing whitespace
+ Ensure entities expand to utf8 sequences under 'utf8_mode' [RT#99755]
+
+ David Steinbrunner (2):
+ typo fix
+ typo fixes
+
+ Jacques Germishuys (1):
+ Silence clang warning
+
+ bulk88 (1):
+ const+static-ing
+
+
+ _______________________________________________________________________________
+
+-------------------------------------------------------------------
Old:
----
HTML-Parser-3.71.tar.gz
New:
----
HTML-Parser-3.72.tar.gz
cpanspec.yml
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-HTML-Parser.spec ++++++
--- /var/tmp/diff_new_pack.Q7yrdZ/_old 2016-01-28 22:50:03.000000000 +0100
+++ /var/tmp/diff_new_pack.Q7yrdZ/_new 2016-01-28 22:50:03.000000000 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-HTML-Parser
#
-# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2016 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,15 @@
Name: perl-HTML-Parser
-Version: 3.71
+Version: 3.72
Release: 0
%define cpan_name HTML-Parser
Summary: HTML parser class
License: Artistic-1.0 or GPL-1.0+
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/HTML-Parser/
-Source: http://www.cpan.org/authors/id/G/GA/GAAS/%{cpan_name}-%{version}.tar.gz
+Source0: http://www.cpan.org/authors/id/G/GA/GAAS/%{cpan_name}-%{version}.tar.gz
+Source1: cpanspec.yml
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
@@ -55,7 +56,7 @@
%prep
%setup -q -n %{cpan_name}-%{version}
-find . -type f -print0 | xargs -0 chmod 644
+find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="%{optflags}"
++++++ HTML-Parser-3.71.tar.gz -> HTML-Parser-3.72.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/Changes new/HTML-Parser-3.72/Changes
--- old/HTML-Parser-3.71/Changes 2013-05-09 00:21:16.000000000 +0200
+++ new/HTML-Parser-3.72/Changes 2016-01-19 18:37:01.000000000 +0100
@@ -1,4 +1,23 @@
_______________________________________________________________________________
+2016-01-19 Release 3.72
+
+Gisle Aas (3):
+ Avoid more clang casting warnings
+ Remove trailing whitespace
+ Ensure entities expand to utf8 sequences under 'utf8_mode' [RT#99755]
+
+David Steinbrunner (2):
+ typo fix
+ typo fixes
+
+Jacques Germishuys (1):
+ Silence clang warning
+
+bulk88 (1):
+ const+static-ing
+
+
+_______________________________________________________________________________
2013-05-09 Release 3.71
Gisle Aas (1):
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/META.json new/HTML-Parser-3.72/META.json
--- old/HTML-Parser-3.71/META.json 2013-05-09 00:21:52.000000000 +0200
+++ new/HTML-Parser-3.72/META.json 2016-01-19 18:41:33.000000000 +0100
@@ -4,7 +4,7 @@
"Gisle Aas "
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.120921",
+ "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.133380",
"license" : [
"perl_5"
],
@@ -49,5 +49,5 @@
},
"x_MailingList" : "mailto:libwww@perl.org"
},
- "version" : "3.71"
+ "version" : "3.72"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/META.yml new/HTML-Parser-3.72/META.yml
--- old/HTML-Parser-3.71/META.yml 2013-05-09 00:21:52.000000000 +0200
+++ new/HTML-Parser-3.72/META.yml 2016-01-19 18:41:32.000000000 +0100
@@ -8,7 +8,7 @@
configure_requires:
ExtUtils::MakeMaker: 0
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.120921'
+generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version 2.133380'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -25,6 +25,6 @@
XSLoader: 0
perl: 5.008
resources:
+ MailingList: mailto:libwww@perl.org
repository: http://github.com/gisle/html-parser
- x_MailingList: mailto:libwww@perl.org
-version: 3.71
+version: 3.72
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/Parser.pm new/HTML-Parser-3.72/Parser.pm
--- old/HTML-Parser-3.71/Parser.pm 2013-05-09 00:19:18.000000000 +0200
+++ new/HTML-Parser-3.72/Parser.pm 2016-01-19 18:37:26.000000000 +0100
@@ -1,15 +1,9 @@
package HTML::Parser;
-# Copyright 1996-2009, Gisle Aas.
-# Copyright 1999-2000, Michael A. Chase.
-#
-# This library is free software; you can redistribute it and/or
-# modify it under the same terms as Perl itself.
-
use strict;
use vars qw($VERSION @ISA);
-$VERSION = "3.71";
+$VERSION = "3.72";
require HTML::Entities;
@@ -373,7 +367,7 @@
sequence "/>" instead of ">". When recognized by CHTML::Parser they
cause an artificial end event in addition to the start event. The
C<text> for the artificial end event will be empty and the C<tokenpos>
-array will be undefined even though the the token array will have one
+array will be undefined even though the token array will have one
element containing the tag name.
=item $p->marked_sections
@@ -1190,7 +1184,7 @@
for any entities that expand to characters with code above 127. This
is not a good thing.
-The recommened solution is to apply Encode::decode_utf8() on the data before
+The recommended solution is to apply Encode::decode_utf8() on the data before
feeding it to the $p->parse(). For $p->parse_file() pass a file that has been
opened in ":utf8" mode.
@@ -1231,7 +1225,7 @@
=head1 COPYRIGHT
- Copyright 1996-2008 Gisle Aas. All rights reserved.
+ Copyright 1996-2016 Gisle Aas. All rights reserved.
Copyright 1999-2000 Michael A. Chase. All rights reserved.
This library is free software; you can redistribute it and/or
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/Parser.xs new/HTML-Parser-3.72/Parser.xs
--- old/HTML-Parser-3.71/Parser.xs 2013-03-25 23:33:39.000000000 +0100
+++ new/HTML-Parser-3.72/Parser.xs 2016-01-19 16:18:18.000000000 +0100
@@ -1,5 +1,5 @@
-/*
- * Copyright 1999-2009, Gisle Aas.
+/*
+ * Copyright 1999-2016, Gisle Aas.
* Copyright 1999-2000, Michael A. Chase.
*
* This library is free software; you can redistribute it and/or
@@ -312,7 +312,7 @@
#endif
-MGVTBL vtbl_pstate =
+const MGVTBL vtbl_pstate =
{
0,
0,
@@ -362,7 +362,7 @@
#endif
mg = mg_find(sv, '~');
assert(mg);
- mg->mg_virtual = &vtbl_pstate;
+ mg->mg_virtual = (MGVTBL*)&vtbl_pstate;
#if defined(USE_ITHREADS) && PATCHLEVEL >= 8
mg->mg_flags |= MGf_DUP;
#endif
@@ -480,7 +480,7 @@
case 12: attr = &pstate->xml_pic; break;
case 13: attr = &pstate->backquote; break;
default:
- croak("Unknown boolean attribute (%d)", ix);
+ croak("Unknown boolean attribute (%d)", (int)ix);
}
RETVAL = boolSV(*attr);
if (items > 1)
@@ -517,7 +517,7 @@
case 2: attr = &pstate->ignore_tags; break;
case 3: attr = &pstate->ignore_elements; break;
default:
- croak("Unknown tag-list attribute (%d)", ix);
+ croak("Unknown tag-list attribute (%d)", (int)ix);
}
if (GIMME_V != G_VOID)
croak("Can't report tag lists yet");
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/README new/HTML-Parser-3.72/README
--- old/HTML-Parser-3.71/README 2013-03-25 23:32:22.000000000 +0100
+++ new/HTML-Parser-3.72/README 2016-01-19 16:16:41.000000000 +0100
@@ -58,7 +58,7 @@
COPYRIGHT
- © 1995-2009 Gisle Aas. All rights reserved.
+ © 1995-2016 Gisle Aas. All rights reserved.
© 1999-2000 Michael A. Chase. All rights reserved.
This library is free software; you can redistribute it and/or modify
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/hparser.c new/HTML-Parser-3.72/hparser.c
--- old/HTML-Parser-3.71/hparser.c 2013-03-25 23:32:23.000000000 +0100
+++ new/HTML-Parser-3.72/hparser.c 2016-01-19 16:18:55.000000000 +0100
@@ -1,5 +1,5 @@
-/*
- * Copyright 1999-2009, Gisle Aas
+/*
+ * Copyright 1999-2016, Gisle Aas
* Copyright 1999-2000, Michael A. Chase
*
* This library is free software; you can redistribute it and/or
@@ -14,7 +14,7 @@
#include "tokenpos.h" /* dTOKEN; PUSH_TOKEN() */
-static
+const static
struct literal_tag {
int len;
char* str;
@@ -59,10 +59,10 @@
ARG_FLAG_FLAT_ARRAY
};
-char *argname[] = {
+static const char * const argname[] = {
/* Must be in the same order as enum argcode */
"self", /* ARG_SELF */
- "tokens", /* ARG_TOKENS */
+ "tokens", /* ARG_TOKENS */
"tokenpos", /* ARG_TOKENPOS */
"token0", /* ARG_TOKEN0 */
"tagname", /* ARG_TAGNAME */
@@ -215,7 +215,7 @@
if (event == E_NONE)
goto IGNORE_EVENT;
-
+
#ifdef MARKED_SECTION
if (p_state->ms == MS_IGNORE)
goto IGNORE_EVENT;
@@ -335,7 +335,7 @@
argspec = h->argspec ? SvPV(h->argspec, my_na) : "";
if (SvTYPE(h->cb) == SVt_PVAV) {
-
+
if (*argspec == ARG_FLAG_FLAT_ARRAY) {
argspec++;
array = (AV*)h->cb;
@@ -464,8 +464,10 @@
SvUTF8_on(attrval);
if (!p_state->attr_encoded) {
#ifdef UNICODE_HTML_PARSER
- if (p_state->utf8_mode)
+ if (p_state->utf8_mode) {
sv_utf8_decode(attrval);
+ sv_utf8_upgrade(attrval);
+ }
#endif
decode_entities(aTHX_ attrval, p_state->entity2char, 0);
if (p_state->utf8_mode)
@@ -522,7 +524,7 @@
arg = sv_2mortal(newRV_noinc((SV*)av));
}
break;
-
+
case ARG_TEXT:
arg = sv_2mortal(newSVpvn(beg, end - beg));
if (utf8)
@@ -536,8 +538,10 @@
SvUTF8_on(arg);
if (!p_state->is_cdata) {
#ifdef UNICODE_HTML_PARSER
- if (p_state->utf8_mode)
+ if (p_state->utf8_mode) {
sv_utf8_decode(arg);
+ sv_utf8_upgrade(arg);
+ }
#endif
decode_entities(aTHX_ arg, p_state->entity2char, 1);
if (p_state->utf8_mode)
@@ -545,7 +549,7 @@
}
}
break;
-
+
case ARG_IS_CDATA:
if (event == E_TEXT) {
arg = boolSV(p_state->is_cdata);
@@ -595,7 +599,7 @@
case ARG_UNDEF:
arg = sv_mortalcopy(&PL_sv_undef);
break;
-
+
default:
arg = sv_2mortal(newSVpvf("Bad argspec %d", *s));
break;
@@ -663,7 +667,7 @@
}
#endif
}
-#undef CHR_DIST
+#undef CHR_DIST
return;
}
@@ -701,7 +705,7 @@
if (isHNAME_FIRST(*s) || *s == '@') {
char *name = s;
int a = ARG_SELF;
- char **arg_name;
+ const char * const *arg_name;
s++;
while (isHNAME_CHAR(*s))
@@ -735,7 +739,7 @@
}
}
else {
- croak("Unrecognized identifier %.*s in argspec", s - name, name);
+ croak("Unrecognized identifier %.*s in argspec", (int) (s - name), name);
}
}
else if (*s == '"' || *s == '\'') {
@@ -768,7 +772,7 @@
while (isHSPACE(*s))
s++;
-
+
if (*s == '}' && SvPVX(argspec)[0] == ARG_FLAG_FLAT_ARRAY) {
/* end of '@{ ... }' */
s++;
@@ -812,7 +816,7 @@
p_state->column = p_state->pend_text_column;
report_event(p_state, E_TEXT,
- SvPVX(old_pend_text), SvEND(old_pend_text),
+ SvPVX(old_pend_text), SvEND(old_pend_text),
SvUTF8(old_pend_text), 0, 0, self);
SvOK_off(old_pend_text);
@@ -945,7 +949,7 @@
goto LOCATE_END;
}
}
-
+
if (s == end)
return beg;
}
@@ -1058,11 +1062,11 @@
/* comment finished */
goto FIND_NAMES;
}
- }
+ }
}
else
goto FAIL;
-
+
}
if (*s == '[') {
s++;
@@ -1084,7 +1088,7 @@
FAIL:
SvREFCNT_dec(tokens);
return 0; /* not yet implemented */
-
+
PREMATURE:
SvREFCNT_dec(tokens);
return beg;
@@ -1424,7 +1428,7 @@
FREE_TOKENS;
return s;
}
-
+
FREE_TOKENS;
return 0;
@@ -1512,9 +1516,9 @@
continue;
token_pos.end = s - 2;
}
-
+
/* a complete processing instruction seen */
- report_event(p_state, E_PROCESS, beg, s, utf8,
+ report_event(p_state, E_PROCESS, beg, s, utf8,
&token_pos, 1, self);
return s;
}
@@ -1565,7 +1569,7 @@
end_text = s;
s++;
-
+
/* here we rely on '\0' termination of perl svpv buffers */
if (*s == '/') {
s++;
@@ -1640,7 +1644,7 @@
0, 0, self);
t = s;
SvREFCNT_dec(av_pop(p_state->ms_stack));
- marked_section_update(p_state);
+ marked_section_update(p_state);
continue;
}
}
@@ -1794,7 +1798,7 @@
/* report rest as text */
report_event(p_state, E_TEXT, s, end, utf8, 0, 0, self);
}
-
+
SvREFCNT_dec(p_state->buf);
p_state->buf = 0;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/hparser.h new/HTML-Parser-3.72/hparser.h
--- old/HTML-Parser-3.71/hparser.h 2013-03-25 23:32:23.000000000 +0100
+++ new/HTML-Parser-3.72/hparser.h 2016-01-19 16:18:46.000000000 +0100
@@ -1,5 +1,5 @@
-/*
- * Copyright 1999-2009, Gisle Aas
+/*
+ * Copyright 1999-2016, Gisle Aas
* Copyright 1999-2000, Michael A. Chase
*
* This library is free software; you can redistribute it and/or
@@ -129,4 +129,3 @@
SV* tmp;
};
typedef struct p_state PSTATE;
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/lib/HTML/Filter.pm new/HTML-Parser-3.72/lib/HTML/Filter.pm
--- old/HTML-Parser-3.71/lib/HTML/Filter.pm 2013-03-25 23:32:23.000000000 +0100
+++ new/HTML-Parser-3.72/lib/HTML/Filter.pm 2016-01-19 18:38:44.000000000 +0100
@@ -6,7 +6,7 @@
require HTML::Parser;
@ISA=qw(HTML::Parser);
-$VERSION = "3.57";
+$VERSION = "3.72";
sub declaration { $_[0]->output("") }
sub process { $_[0]->output($_[2]) }
@@ -28,7 +28,7 @@
=head1 NOTE
B<This module is deprecated.> The CHTML::Parser now provides the
-functionally of CHTML::Filter much more efficiently with the the
+functionally of CHTML::Filter much more efficiently with the
C<default> handler.
=head1 SYNOPSIS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/HTML-Parser-3.71/t/unicode.t new/HTML-Parser-3.72/t/unicode.t
--- old/HTML-Parser-3.71/t/unicode.t 2013-03-25 23:32:23.000000000 +0100
+++ new/HTML-Parser-3.72/t/unicode.t 2016-01-19 16:13:30.000000000 +0100
@@ -7,7 +7,7 @@
plan skip_all => "This perl does not support Unicode" if $] < 5.008;
}
-plan tests => 105;
+plan tests => 107;
my @warn;
$SIG{__WARN__} = sub {
@@ -172,7 +172,7 @@
$p->parse(q(<a href="a=1&lang=2×=3">foo</a>))->eof;
is(@parsed, "5");
is($parsed[1][0], "start");
-is($parsed[1][8]{href}, "a=1&lang=2\xd7=3");
+is($parsed[1][8]{href}, "a=1&lang=2\xC3\x97=3");
ok(!HTML::Entities::_probably_utf8_chunk(""));
ok(!HTML::Entities::_probably_utf8_chunk("f"));
@@ -196,3 +196,17 @@
ok(!@warn);
is(@parsed, 9);
+
+@parsed = ();
+$p = HTML::Parser->new(
+ api_version => 3,
+ utf8_mode => 1,
+ unbroken_text => 1,
+ default_h => [\@parsed, 'event,dtext'],
+);
+
+$p->parse("<p>R\xC3\xA9ductions jusqu'à -70%.<p>Réductions jusqu'à -70%.");
+$p->eof;
+
+is($parsed[2][1], "R\xC3\xA9ductions jusqu'\xC3\xA0 -70%.");
+is($parsed[4][1], "R\xC3\xA9ductions jusqu'\xC3\xA0 -70%.");
++++++ cpanspec.yml ++++++
---
#description_paragraphs: 3
#description: |-
# override description from CPAN
#summary: override summary from CPAN
#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_build: |-
# rm unused.files
#post_install: |-
# sed on %{name}.files
#license: SUSE-NonFree
#skip_noarch: 1
#custom_build: |-
#./Build build flags=%{?_smp_mflags} --myflag
#custom_test: |-
#startserver && make test
#ignore_requires: Bizarre::Module