| Subject: | Bug fix for lib/SGML/DTDParse/ContentModel.pm |
| Date: | Mon, 9 Mar 2020 15:19:37 -0700 |
| To: | bug-SGML-DTDParse [...] rt.cpan.org |
| From: | Len Weisberg <Len [...] Weisberg.com> |
CPAN,
Below is a fix for a typo (looks like an incomplete copy/paste) in
lib/SGML/DTDParse/ContentModel.pm
from 57846 2020-02-20 22:22 SGML-DTDParse-2.00.tar.gz
The error is that for elements with "EMPTY" in the DTD, the output has:
content-type="element">
but it should have:
content-type="empty">
Thanks,
-Len
-----------------
*** ContentModel.pm-050702-orig 2005-07-02 16:51:18.000000000 -0700
--- ContentModel.pm-200309-fix 2020-03-09 14:32:16.400093752 -0700
***************
*** 238,244 ****
if ($depth == 0) {
return 'cdata' if $tok->element() eq 'CDATA';
return 'rcdata' if $tok->element() eq 'RCDATA';
! return 'empty' if $tok->element() eq 'RCDATA';
}
} elsif ((ref $tok) =~ /Group$/) {
my $cm = $tok->content_model();
--- 238,244 ----
if ($depth == 0) {
return 'cdata' if $tok->element() eq 'CDATA';
return 'rcdata' if $tok->element() eq 'RCDATA';
! return 'empty' if $tok->element() eq 'EMPTY';
}
} elsif ((ref $tok) =~ /Group$/) {
my $cm = $tok->content_model();