XML-SemanticDiff
view release on metacpan or search on metacpan
- Applied a modified version of:
http://rt.cpan.org/Ticket/Display.html?id=18491
- Fixes a case where the same tags in different places with
identical contents, are not considered semantically identical.
- Thanks to CLOTHO for reporting it and suggesting a
fix.
- t/11tag-in-different-locations.t
- Added a regression test against bug:
http://rt.cpan.org/Ticket/Display.html?id=2322
- Seems to already have been fixed.
- t/12missing-element-has-o-as-cdata.t
0.95 2002-04-09
[ Undocumented changelog. ]
0.93 2001-06-14
- third (hopefully final) BETA
- more doc fixes.
0.91 2001-06-12
- second BETA release.
t/02load_xml.t
t/03simple_compare.t
t/04namespaces.t
t/05simple_handler.t
t/06pass_to_handler.t
t/07pitest.t
t/08nonexist_ns.t
t/09two-tags.t
t/10wide-chars.t
t/11tag-in-different-locations.t
t/12missing-element-has-o-as-cdata.t
t/13to-doc-read.t
t/14ignore_xpath.t
t/15ignore_multi.t
t/16zero_to_empty_str_cmp.t
t/style-trailing-space.t
weaver.ini
xt/author/eol.t
xt/author/no-tabs.t
xt/author/pod-coverage.t
xt/author/pod-syntax.t
t/12missing-element-has-o-as-cdata.t view on Meta::CPAN
return $self;
}
sub missing_element
{
my $self = shift;
my ($elem, $properties) = @_;
push @{$self->{save_CData}}, { cdata => $properties->{CData} };
return {};
}
package main;
my $handler = MyDiffHandler->new();
my $diff = XML::SemanticDiff->new(diffhandler => $handler);
t/12missing-element-has-o-as-cdata.t view on Meta::CPAN
<root><b>Quark</b></root>
EOF
my @results = $diff->compare(
$xml_with_empty_element,
$xml_without_empty_element,
);
# TEST
is_deeply ($handler->{save_CData},
[ { cdata => undef } ],
"Testing that the cdata for an empty element is the empty string."
);
xt/author/eol.t view on Meta::CPAN
't/02load_xml.t',
't/03simple_compare.t',
't/04namespaces.t',
't/05simple_handler.t',
't/06pass_to_handler.t',
't/07pitest.t',
't/08nonexist_ns.t',
't/09two-tags.t',
't/10wide-chars.t',
't/11tag-in-different-locations.t',
't/12missing-element-has-o-as-cdata.t',
't/13to-doc-read.t',
't/14ignore_xpath.t',
't/15ignore_multi.t',
't/16zero_to_empty_str_cmp.t',
't/style-trailing-space.t'
);
eol_unix_ok($_, { trailing_whitespace => 1 }) foreach @files;
done_testing;
xt/author/no-tabs.t view on Meta::CPAN
't/02load_xml.t',
't/03simple_compare.t',
't/04namespaces.t',
't/05simple_handler.t',
't/06pass_to_handler.t',
't/07pitest.t',
't/08nonexist_ns.t',
't/09two-tags.t',
't/10wide-chars.t',
't/11tag-in-different-locations.t',
't/12missing-element-has-o-as-cdata.t',
't/13to-doc-read.t',
't/14ignore_xpath.t',
't/15ignore_multi.t',
't/16zero_to_empty_str_cmp.t',
't/style-trailing-space.t'
);
notabs_ok($_) foreach @files;
done_testing;
( run in 0.356 second using v1.01-cache-2.11-cpan-ec4f86ec37b )