openkylin
/
libxml-sax-perl
mirror of https://gitee.com/openkylin/libxml-sax-perl.git
9
0
Fork 0
Code Issues Projects Releases Wiki Activity

format patches

This commit is contained in:
luoyaoming 2024-05-06 21:49:25 +08:00
parent 8dc79bcc7a
commit 674611b954
6 changed files with 113 additions and 63 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
debian/patches/Fix-another-typo-in-POD.patch vendored
View File

@ -1,6 +1,5 @@
From: intrigeri <intrigeri@boum.org>
Date: Sun, 21 Jul 2019 13:47:20 +0000
Origin: https://github.com/grantm/XML-SAX/pull/4
Subject: Fix another typo in POD
---

39
debian/patches/charset-decoding vendored
View File

@ -1,21 +1,17 @@
Description: Fix charset decoding in the PurePerl module (#405186)
Author: Niko Tyni <ntyni@iki.fi>
Date: Sun, 04 Nov 2007 20:46:58 +0200
From: Niko Tyni <ntyni@iki.fi>
Date: Sun, 4 Nov 2007 20:46:58 +0200
Subject: Fix charset decoding in the PurePerl module (#405186)
--- a/lib/XML/SAX/PurePerl/Productions.pm
+++ b/lib/XML/SAX/PurePerl/Productions.pm
@@ -39,7 +39,7 @@
# can't do this one without unicode
# $CombiningChar = qr/^$/msx;
- $NameChar = qr/^ (?: $BaseChar | $Digit | [._:-] | $Extender )+ $/x;
+ $NameChar = qr/ (?: $BaseChar | $Digit | [._:-] | $Extender )+ /x;
PERL
die $@ if $@;
}
---
lib/XML/SAX/PurePerl.pm | 2 +-
lib/XML/SAX/PurePerl/Productions.pm | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/XML/SAX/PurePerl.pm b/lib/XML/SAX/PurePerl.pm
index 7940736..21ad55e 100644
--- a/lib/XML/SAX/PurePerl.pm
+++ b/lib/XML/SAX/PurePerl.pm
@@ -677,7 +677,7 @@
@@ -677,7 +677,7 @@ sub Name {
return unless length($name);
@ -24,3 +20,16 @@ Date: Sun, 04 Nov 2007 20:46:58 +0200
return $name;
}
diff --git a/lib/XML/SAX/PurePerl/Productions.pm b/lib/XML/SAX/PurePerl/Productions.pm
index 25d49fb..49911ba 100644
--- a/lib/XML/SAX/PurePerl/Productions.pm
+++ b/lib/XML/SAX/PurePerl/Productions.pm
@@ -39,7 +39,7 @@ if ($] < 5.006) {
# can't do this one without unicode
# $CombiningChar = qr/^$/msx;
- $NameChar = qr/^ (?: $BaseChar | $Digit | [._:-] | $Extender )+ $/x;
+ $NameChar = qr/ (?: $BaseChar | $Digit | [._:-] | $Extender )+ /x;
PERL
die $@ if $@;
}

97
debian/patches/parserdetails-debian vendored
View File

@ -1,43 +1,29 @@
Description: The Debian way of handling ParserDetails.ini
Use update-perl-sax-parsers(8) instead.
.
* SAX.pm: the meat of the modifications
+ add XML::SAX->save_parsers_debian(), used by update-perl-sax-parsers
+ disable XML::SAX->save_parsers() with a helpful error message for
users trying to install SAX parsers manually from CPAN
* Makefile.PL: Don't try to modify ParserDetails.ini when building the package
* t/01known.t, t/99cleanup.t: Skip tests related to XML::SAX->save_parsers()
Author: Originally by Ardo van Rangelrooij <ardo@debian.org>
Author: Cleanups and quilt conversion by Niko Tyni <ntyni@iki.fi>
Author: Ansgar Burchardt <ansgar@43-1.org> (XML::SAX::Debian)
From: Originally by Ardo van Rangelrooij <ardo@debian.org>
Date: Mon, 6 May 2024 21:49:25 +0800
Subject: The Debian way of handling ParserDetails.ini
--- a/t/01known.t
+++ b/t/01known.t
@@ -1,6 +1,9 @@
-use Test;
+use Test::More;
BEGIN { plan tests => 3 }
+SKIP: {
+skip 'Tests skipped due to Debian modifications', 3;
use XML::SAX;
ok(XML::SAX->save_parsers);
ok(XML::SAX->load_parsers);
ok(@{XML::SAX->parsers}, 0);
+}
--- a/t/99cleanup.t
+++ b/t/99cleanup.t
@@ -1,7 +1,7 @@
use Test;
BEGIN { plan tests => 1 }
use File::Spec;
-ok(unlink(
+skip('Test skipped due to Debian modifications', unlink(
File::Spec->catdir(qw(blib lib XML SAX ParserDetails.ini))),
1,
'delete ParserDetails.ini'
Use update-perl-sax-parsers(8) instead.
* SAX.pm: the meat of the modifications
+ add XML::SAX->save_parsers_debian(), used by update-perl-sax-parsers
+ disable XML::SAX->save_parsers() with a helpful error message for
users trying to install SAX parsers manually from CPAN
* Makefile.PL: Don't try to modify ParserDetails.ini when building the package
* t/01known.t, t/99cleanup.t: Skip tests related to XML::SAX->save_parsers()
---
Makefile.PL | 4 ++++
lib/XML/SAX.pm | 13 +++++++++++++
lib/XML/SAX/Debian.pm | 47 +++++++++++++++++++++++++++++++++++++++++++++++
t/01known.t | 5 ++++-
t/99cleanup.t | 2 +-
5 files changed, 69 insertions(+), 2 deletions(-)
create mode 100644 lib/XML/SAX/Debian.pm
diff --git a/Makefile.PL b/Makefile.PL
index e3ff75d..dc59cfc 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -27,6 +27,10 @@
@@ -27,6 +27,10 @@ sub MY::install {
package MY;
my $script = shift->SUPER::install(@_);
@ -48,9 +34,11 @@ Author: Ansgar Burchardt <ansgar@43-1.org> (XML::SAX::Debian)
# Only modify existing ParserDetails.ini if user agrees
my $write_ini_ok = 0;
diff --git a/lib/XML/SAX.pm b/lib/XML/SAX.pm
index 7cd93d2..5297a2b 100644
--- a/lib/XML/SAX.pm
+++ b/lib/XML/SAX.pm
@@ -179,6 +179,15 @@
@@ -179,6 +179,15 @@ sub add_parser {
sub save_parsers {
my $class = shift;
@ -66,7 +54,7 @@ Author: Ansgar Burchardt <ansgar@43-1.org> (XML::SAX::Debian)
# get directory from wherever XML::SAX is installed
my $dir = $INC{'XML/SAX.pm'};
$dir = dirname($dir);
@@ -212,6 +221,10 @@
@@ -212,6 +221,10 @@ sub do_warn {
warn(@_) unless $ENV{HARNESS_ACTIVE};
}
@ -77,6 +65,9 @@ Author: Ansgar Burchardt <ansgar@43-1.org> (XML::SAX::Debian)
1;
__END__
diff --git a/lib/XML/SAX/Debian.pm b/lib/XML/SAX/Debian.pm
new file mode 100644
index 0000000..e767c73
--- /dev/null
+++ b/lib/XML/SAX/Debian.pm
@@ -0,0 +1,47 @@
@ -127,3 +118,31 @@ Author: Ansgar Burchardt <ansgar@43-1.org> (XML::SAX::Debian)
+}
+
+1;
diff --git a/t/01known.t b/t/01known.t
index a2db4f1..a9e2536 100644
--- a/t/01known.t
+++ b/t/01known.t
@@ -1,6 +1,9 @@
-use Test;
+use Test::More;
BEGIN { plan tests => 3 }
+SKIP: {
+skip 'Tests skipped due to Debian modifications', 3;
use XML::SAX;
ok(XML::SAX->save_parsers);
ok(XML::SAX->load_parsers);
ok(@{XML::SAX->parsers}, 0);
+}
diff --git a/t/99cleanup.t b/t/99cleanup.t
index 32e196c..72f8438 100644
--- a/t/99cleanup.t
+++ b/t/99cleanup.t
@@ -1,7 +1,7 @@
use Test;
BEGIN { plan tests => 1 }
use File::Spec;
-ok(unlink(
+skip('Test skipped due to Debian modifications', unlink(
File::Spec->catdir(qw(blib lib XML SAX ParserDetails.ini))),
1,
'delete ParserDetails.ini'

13
debian/patches/pod-spelling vendored
View File

@ -1,11 +1,18 @@
Author: gregor herrmann <gregoa@debian.org>
Description: fix spelling errors in POD
From: gregor herrmann <gregoa@debian.org>
Date: Mon, 6 May 2024 21:49:25 +0800
Subject: fix spelling errors in POD
Origin: https://github.com/grantm/XML-SAX/pull/4
Forwarded: yes
---
lib/XML/SAX/Intro.pod | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/XML/SAX/Intro.pod b/lib/XML/SAX/Intro.pod
index 33c77d4..2c66b3b 100644
--- a/lib/XML/SAX/Intro.pod
+++ b/lib/XML/SAX/Intro.pod
@@ -242,7 +242,7 @@
@@ -242,7 +242,7 @@ the values later seen by end_element.
=head2 characters

13
debian/patches/skip-test-with-nonfree-file vendored
View File

@ -1,7 +1,16 @@
Description: Skip a test depending on a non-free input file (testfiles/xmltest.xml)
From: openKylin Developers <packaging@lists.openkylin.top>
Date: Mon, 6 May 2024 21:49:25 +0800
Subject: Skip a test depending on a non-free input file
(testfiles/xmltest.xml)
Origin: vendor
Bug-Debian: https://bugs.debian.org/452872
---
t/16large.t | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/t/16large.t b/t/16large.t
index 537dd8d..d925b44 100644
--- a/t/16large.t
+++ b/t/16large.t
@@ -1,4 +1,4 @@
@ -10,7 +19,7 @@ Bug-Debian: https://bugs.debian.org/452872
BEGIN { plan tests => 3 }
use XML::SAX::PurePerl;
use XML::SAX::PurePerl::DebugHandler;
@@ -9,8 +9,10 @@
@@ -9,8 +9,10 @@ ok($handler);
my $parser = XML::SAX::PurePerl->new(Handler => $handler);
ok($parser);

13
debian/patches/sort-ini-entries vendored
View File

@ -1,13 +1,20 @@
From: Roland Clobus <rclobus@rclobus.nl>
Date: Wed, 1 Sep 2021 15:10:00+0200
Subject: Sort the entries in the .ini-files. This generates the files with a constant content
Date: Wed, 1 Sep 2021 15:10:00 +0200
Subject: Sort the entries in the .ini-files. This generates the files with a
constant content
Bug-Debian: https://bugs.debian.org/993444
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=139175
Bug: https://rt.cpan.org/Ticket/Display.html?id=139175
---
lib/XML/SAX/Debian.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/XML/SAX/Debian.pm b/lib/XML/SAX/Debian.pm
index e767c73..d1297dc 100644
--- a/lib/XML/SAX/Debian.pm
+++ b/lib/XML/SAX/Debian.pm
@@ -31,7 +31,7 @@
@@ -31,7 +31,7 @@ sub save_parsers_debian {
foreach my $p (@{ $class->parsers }) {
print $fh "[$p->{Name}]\n";