[PATCH]HTML::Parser-XS-2.9913_mac-1

Michael A. Chase (mchase@ix.netcom.com)
Wed, 24 Nov 1999 19:38:53 -0800


------=_NextPart_000_002F_01BF36B3.8A79B0A0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

When declarations are parsed, two extra characters are appended to the
declaration type.  For example,
   '<!ENTITY name "replacement entity text">'
is tokenized as
   ['ENTITY n', 'name' '"replacement entity text"']
The attached patch fixes the problem.
--
Mac :})


------=_NextPart_000_002F_01BF36B3.8A79B0A0
Content-Type: application/octet-stream;
	name="HTML-Parser-XS-2.9913_mac-1.patch"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="HTML-Parser-XS-2.9913_mac-1.patch"

# Fix for declaration type mis-parse
# from Michael A. Chase, mchase@ix.netcom.com
#=20
# To apply this patch:
# STEP 1: Chdir to the source directory.
# STEP 2: Run the 'applypatch' program with this patch file as input.
#
# If you do not have 'applypatch', it is part of the 'makepatch' package
# that you can fetch from the Comprehensive Perl Archive Network:
# http://www.perl.com/CPAN/authors/Johan_Vromans/makepatch-x.y.tar.gz
# In the above URL, 'x' should be 2 or higher.
#
# To apply this patch without the use of 'applypatch':
# STEP 1: Chdir to the source directory.
# STEP 2: Run the 'patch' program with this file as input.
#
#### End of Preamble ####

#### Patch data follows ####
diff -ub 'old\HTML-Parser-XS-2.9913\Parser.xs' =
'new\HTML-Parser-XS-2.9913\Parser.xs'
Index: ./old/HTML-Parser-XS-2.9913/Parser.xs
Prereq:  2.38=20
--- ./old/HTML-Parser-XS-2.9913/Parser.xs	Mon Nov 22 07:44:10 1999
+++ ./new/HTML-Parser-XS-2.9913/Parser.xs	Wed Nov 24 19:13:37 1999
@@ -920,7 +920,7 @@
     while (s < end && isHNAME_CHAR(*s))
       s++;
     /* first word available */
-    av_push(tokens, newSVpv(beg+2, s - beg));
+    av_push(tokens, newSVpv(beg+2, s - beg - 2));
=20
     while (s < end && isHSPACE(*s)) {
       s++;
#### End of Patch data ####

#### ApplyPatch data follows ####
# Data version        : 1.0
# Date generated      : Wed Nov 24 19:22:32 1999
# Generated by        : makepatch 2.00_03
# Recurse directories : Yes
# Excluded files      : (\A|.*/)CVS(/.*|\Z)
#                       (\A|.*/)RCS(/.*|\Z)
#                       ,v\Z
#                       (\A|.*/)SCCS(/.*|\Z)
#                       (\A|.*/)[sp]\..+\Z
# p 'old/HTML-Parser-XS-2.9913/Parser.xs' 33748
#### End of ApplyPatch data ####

#### End of Patch kit [created: Wed Nov 24 19:22:32 1999] ####
#### Patch checksum: 31 1124 9495 ####
#### Checksum: 50 1827 2647 ####

------=_NextPart_000_002F_01BF36B3.8A79B0A0--