r77387 - in /branches/upstream/libxml-libxml-perl/current: ./ docs/ lib/XML/LibXML/ lib/XML/LibXML/SAX/ t/
ghedo-guest at users.alioth.debian.org
ghedo-guest at users.alioth.debian.org
Mon Jul 11 18:12:10 UTC 2011
Author: ghedo-guest
Date: Mon Jul 11 18:12:08 2011
New Revision: 77387
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77387
Log:
[svn-upgrade] new version libxml-libxml-perl (1.79+dfsg)
Modified:
branches/upstream/libxml-libxml-perl/current/Changes
branches/upstream/libxml-libxml-perl/current/LibXML.pm
branches/upstream/libxml-libxml-perl/current/LibXML.pod
branches/upstream/libxml-libxml-perl/current/META.yml
branches/upstream/libxml-libxml-perl/current/docs/libxml.dbk
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Attr.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/CDATASection.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Comment.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Common.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DOM.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Document.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DocumentFragment.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Dtd.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Element.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/ErrNo.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Error.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/InputCallback.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Namespace.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Node.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/PI.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Parser.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Pattern.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Reader.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RegExp.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RelaxNG.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX/Builder.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Schema.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Text.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathContext.pod
branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathExpression.pod
branches/upstream/libxml-libxml-perl/current/t/12html.t
branches/upstream/libxml-libxml-perl/current/t/46err_column.t
branches/upstream/libxml-libxml-perl/current/t/49global_extent.t
branches/upstream/libxml-libxml-perl/current/t/61error.t
Modified: branches/upstream/libxml-libxml-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/Changes?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/Changes (original)
+++ branches/upstream/libxml-libxml-perl/current/Changes Mon Jul 11 18:12:08 2011
@@ -1,4 +1,15 @@
Revision history for Perl extension XML::LibXML
+
+1.79 Fri Jul 8 20:02:32 IDT 2011
+ - t/46err_column.t : add a skip for a test for CentOS/RHEL 4:
+ - https://rt.cpan.org/Ticket/Display.html?id=69070
+ - old version of libxml2 .
+ - t/49global_extent.t : fix the double plan (present on libxml2
+ below 2.6.27):
+ - https://rt.cpan.org/Ticket/Display.html?id=69330
+ - Thanks to Chris for reporting it.
+ - double plan in t/61error.t .
+ - in accordance to the previous change.
1.78 Wed Jul 6 20:23:58 IDT 2011
- Change t/02parse.t to test for the localized error message:
Modified: branches/upstream/libxml-libxml-perl/current/LibXML.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/LibXML.pm?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/LibXML.pm (original)
+++ branches/upstream/libxml-libxml-perl/current/LibXML.pm Mon Jul 11 18:12:08 2011
@@ -27,7 +27,7 @@
use IO::Handle; # for FH reads called as methods
BEGIN {
-$VERSION = "1.78"; # VERSION TEMPLATE: DO NOT CHANGE
+$VERSION = "1.79"; # VERSION TEMPLATE: DO NOT CHANGE
$ABI_VERSION = 2;
require Exporter;
require DynaLoader;
Modified: branches/upstream/libxml-libxml-perl/current/LibXML.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/LibXML.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/LibXML.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/LibXML.pod Mon Jul 11 18:12:08 2011
@@ -505,7 +505,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/META.yml?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/META.yml (original)
+++ branches/upstream/libxml-libxml-perl/current/META.yml Mon Jul 11 18:12:08 2011
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: XML-LibXML
-version: 1.78
+version: 1.79
abstract: Interface to Gnome libxml2 xml parsing and DOM library
author:
- Petr Pajas
Modified: branches/upstream/libxml-libxml-perl/current/docs/libxml.dbk
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/docs/libxml.dbk?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/docs/libxml.dbk (original)
+++ branches/upstream/libxml-libxml-perl/current/docs/libxml.dbk Mon Jul 11 18:12:08 2011
@@ -22,7 +22,7 @@
</authorgroup>
- <edition>1.78</edition>
+ <edition>1.79</edition>
<copyright>
<year>2001-2007</year>
<holder>AxKit.com Ltd</holder>
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Attr.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Attr.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Attr.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Attr.pod Mon Jul 11 18:12:08 2011
@@ -121,7 +121,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/CDATASection.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/CDATASection.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/CDATASection.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/CDATASection.pod Mon Jul 11 18:12:08 2011
@@ -45,7 +45,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Comment.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Comment.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Comment.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Comment.pod Mon Jul 11 18:12:08 2011
@@ -46,7 +46,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Common.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Common.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Common.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Common.pod Mon Jul 11 18:12:08 2011
@@ -116,7 +116,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DOM.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DOM.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DOM.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DOM.pod Mon Jul 11 18:12:08 2011
@@ -129,7 +129,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Document.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Document.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Document.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Document.pod Mon Jul 11 18:12:08 2011
@@ -683,7 +683,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DocumentFragment.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DocumentFragment.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DocumentFragment.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/DocumentFragment.pod Mon Jul 11 18:12:08 2011
@@ -27,7 +27,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Dtd.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Dtd.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Dtd.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Dtd.pod Mon Jul 11 18:12:08 2011
@@ -89,7 +89,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Element.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Element.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Element.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Element.pod Mon Jul 11 18:12:08 2011
@@ -371,7 +371,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/ErrNo.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/ErrNo.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/ErrNo.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/ErrNo.pod Mon Jul 11 18:12:08 2011
@@ -14,7 +14,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Error.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Error.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Error.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Error.pod Mon Jul 11 18:12:08 2011
@@ -241,7 +241,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/InputCallback.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/InputCallback.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/InputCallback.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/InputCallback.pod Mon Jul 11 18:12:08 2011
@@ -280,7 +280,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Namespace.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Namespace.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Namespace.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Namespace.pod Mon Jul 11 18:12:08 2011
@@ -130,7 +130,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Node.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Node.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Node.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Node.pod Mon Jul 11 18:12:08 2011
@@ -739,7 +739,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/PI.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/PI.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/PI.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/PI.pod Mon Jul 11 18:12:08 2011
@@ -74,7 +74,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Parser.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Parser.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Parser.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Parser.pod Mon Jul 11 18:12:08 2011
@@ -960,7 +960,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Pattern.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Pattern.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Pattern.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Pattern.pod Mon Jul 11 18:12:08 2011
@@ -94,7 +94,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Reader.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Reader.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Reader.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Reader.pod Mon Jul 11 18:12:08 2011
@@ -656,7 +656,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RegExp.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RegExp.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RegExp.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RegExp.pod Mon Jul 11 18:12:08 2011
@@ -58,7 +58,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RelaxNG.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RelaxNG.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RelaxNG.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/RelaxNG.pod Mon Jul 11 18:12:08 2011
@@ -68,7 +68,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX.pod Mon Jul 11 18:12:08 2011
@@ -47,7 +47,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX/Builder.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX/Builder.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX/Builder.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/SAX/Builder.pod Mon Jul 11 18:12:08 2011
@@ -38,7 +38,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Schema.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Schema.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Schema.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Schema.pod Mon Jul 11 18:12:08 2011
@@ -65,7 +65,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Text.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Text.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Text.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/Text.pod Mon Jul 11 18:12:08 2011
@@ -170,7 +170,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathContext.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathContext.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathContext.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathContext.pod Mon Jul 11 18:12:08 2011
@@ -359,7 +359,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathExpression.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathExpression.pod?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathExpression.pod (original)
+++ branches/upstream/libxml-libxml-perl/current/lib/XML/LibXML/XPathExpression.pod Mon Jul 11 18:12:08 2011
@@ -52,7 +52,7 @@
=head1 VERSION
-1.78
+1.79
=head1 COPYRIGHT
Modified: branches/upstream/libxml-libxml-perl/current/t/12html.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/t/12html.t?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/t/12html.t (original)
+++ branches/upstream/libxml-libxml-perl/current/t/12html.t Mon Jul 11 18:12:08 2011
@@ -2,18 +2,22 @@
use strict;
use warnings;
-use Test;
-BEGIN { plan tests => 41 }
+# should be 41.
+use Test::More tests => 41;
+
use XML::LibXML;
use IO::File;
-ok(1);
+
+# TEST
+ok(1, ' TODO : Add test name');
my $html = "example/test.html";
my $parser = XML::LibXML->new();
{
my $doc = $parser->parse_html_file($html);
- ok($doc);
+ # TEST
+ ok($doc, ' TODO : Add test name');
}
my $fh;
@@ -29,17 +33,23 @@
seek($fh, 0, 0);
-ok($string);
+# TEST
+
+ok($string, ' TODO : Add test name');
my $doc = $parser->parse_html_string($string);
-ok($doc);
+# TEST
+
+ok($doc, ' TODO : Add test name');
undef $doc;
$doc = $parser->parse_html_fh($fh);
-ok($doc);
+# TEST
+
+ok($doc, ' TODO : Add test name');
$fh->close();
@@ -66,49 +76,63 @@
};
# ok( not $@ );
-ok( $htmldoc );
-
-print "parse_html_string with encoding...\n";
+# TEST
+ok( $htmldoc, ' TODO : Add test name' );
+
+# parse_html_string with encoding
# encodings
-if (eval { require Encode; }) {
- use utf8;
-
- my $utf_str = "ěšÄÅ™";
-
- # w/o 'meta' charset
- $strhref = <<EOHTML;
+SKIP:
+{
+ if (! eval { require Encode; })
+ {
+ skip("Encoding related tests require Encode", 14);
+ }
+ use utf8;
+
+ my $utf_str = "ěšÄÅ™";
+
+ # w/o 'meta' charset
+ $strhref = <<EOHTML;
<html>
<body>
<p>$utf_str</p>
</body>
</html>
EOHTML
-
- ok( Encode::is_utf8($strhref) );
- $htmldoc = $parser->parse_html_string( $strhref );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- $htmldoc = $parser->parse_html_string( $strhref,
- {
- encoding => 'UTF-8'
- }
- );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
-
- my $iso_str = Encode::encode('iso-8859-2', $strhref);
- $htmldoc = $parser->parse_html_string( $iso_str,
- {
- encoding => 'iso-8859-2'
- }
- );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- # w/ 'meta' charset
- $strhref = <<EOHTML;
+
+ # TEST
+
+ ok( Encode::is_utf8($strhref), ' TODO : Add test name' );
+ $htmldoc = $parser->parse_html_string( $strhref );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ $htmldoc = $parser->parse_html_string( $strhref,
+ {
+ encoding => 'UTF-8'
+ }
+ );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+
+ my $iso_str = Encode::encode('iso-8859-2', $strhref);
+ $htmldoc = $parser->parse_html_string( $iso_str,
+ {
+ encoding => 'iso-8859-2'
+ }
+ );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ # w/ 'meta' charset
+ $strhref = <<EOHTML;
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;
@@ -120,106 +144,138 @@
</html>
EOHTML
- $htmldoc = $parser->parse_html_string( $strhref, { encoding => 'UTF-8' });
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- $iso_str = Encode::encode('iso-8859-2', $strhref);
- $htmldoc = $parser->parse_html_string( $iso_str );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- $htmldoc = $parser->parse_html_string( $iso_str, { encoding => 'iso-8859-2',
- URI => 'foo'
- } );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
- ok($htmldoc->URI, 'foo');
-} else {
- skip("Encoding related tests require Encode") for 1..14;
-}
-
-print "parse example/enc_latin2.html...\n";
+ $htmldoc = $parser->parse_html_string( $strhref, { encoding => 'UTF-8' });
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ $iso_str = Encode::encode('iso-8859-2', $strhref);
+ $htmldoc = $parser->parse_html_string( $iso_str );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ $htmldoc = $parser->parse_html_string( $iso_str, { encoding => 'iso-8859-2',
+ URI => 'foo'
+ } );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+ # TEST
+ is($htmldoc->URI, 'foo', ' TODO : Add test name');
+}
+
+# parse example/enc_latin2.html
# w/ 'meta' charset
{
- use utf8;
- my $utf_str = "ěšÄÅ™";
- my $test_file = 'example/enc_latin2.html';
- my $fh;
-
- $htmldoc = $parser->parse_html_file( $test_file );
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- $htmldoc = $parser->parse_html_file( $test_file, { encoding => 'iso-8859-2',
- URI => 'foo'
- });
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
- ok($htmldoc->URI, 'foo');
-
- open $fh, '<', $test_file
- or die "Cannot open '$test_file' for reading - $!";
- $htmldoc = $parser->parse_html_fh( $fh );
- close $fh;
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- open $fh, '<', $test_file
- or die "Cannot open '$test_file' for reading - $!";
- $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'iso-8859-2',
- URI => 'foo',
- });
- close $fh;
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->URI, 'foo');
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- if (1000*$] < 5008) {
- skip("skipping for Perl < 5.8") for 1..2;
- } elsif (20627 > XML::LibXML::LIBXML_VERSION) {
- skip("skipping for libxml2 < 2.6.27") for 1..2;
- } else {
- # translate to UTF8 on perl-side
- open $fh, '<:encoding(iso-8859-2)', $test_file
+ use utf8;
+ my $utf_str = "ěšÄÅ™";
+ my $test_file = 'example/enc_latin2.html';
+ my $fh;
+
+ $htmldoc = $parser->parse_html_file( $test_file );
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ $htmldoc = $parser->parse_html_file( $test_file, { encoding => 'iso-8859-2',
+ URI => 'foo'
+ });
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+ # TEST
+ is($htmldoc->URI, 'foo', ' TODO : Add test name');
+
+ open $fh, '<', $test_file
or die "Cannot open '$test_file' for reading - $!";
- $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'UTF-8' });
+ $htmldoc = $parser->parse_html_fh( $fh );
close $fh;
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
- }
-}
-
-print "parse example/enc2_latin2.html...\n";
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ open $fh, '<', $test_file
+ or die "Cannot open '$test_file' for reading - $!";
+ $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'iso-8859-2',
+ URI => 'foo',
+ });
+ close $fh;
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->URI, 'foo', ' TODO : Add test name');
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ SKIP:
+ {
+ my $num_tests = 2;
+ if (1000*$] < 5008)
+ {
+ skip("skipping for Perl < 5.8", $num_tests);
+ }
+ elsif (20627 > XML::LibXML::LIBXML_VERSION)
+ {
+ skip("skipping for libxml2 < 2.6.27", $num_tests);
+ }
+ # translate to UTF8 on perl-side
+ open $fh, '<:encoding(iso-8859-2)', $test_file
+ or die "Cannot open '$test_file' for reading - $!";
+ $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'UTF-8' });
+ close $fh;
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+ }
+}
+
+# parse example/enc2_latin2.html
# w/o 'meta' charset
{
- use utf8;
- my $utf_str = "ěšÄÅ™";
- my $test_file = 'example/enc2_latin2.html';
- my $fh;
-
- $htmldoc = $parser->parse_html_file( $test_file, { encoding => 'iso-8859-2' });
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- open $fh, '<', $test_file
- or die "Cannot open '$test_file' for reading - $!";
- $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'iso-8859-2' });
- close $fh;
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
-
- if (1000*$] < 5008) {
- skip("skipping for Perl < 5.8") for 1..2;
- } else {
- # translate to UTF8 on perl-side
- open my $fh, '<:encoding(iso-8859-2)', $test_file
+ use utf8;
+ my $utf_str = "ěšÄÅ™";
+ my $test_file = 'example/enc2_latin2.html';
+ my $fh;
+
+ $htmldoc = $parser->parse_html_file( $test_file, { encoding => 'iso-8859-2' });
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ open $fh, '<', $test_file
or die "Cannot open '$test_file' for reading - $!";
- $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'UTF-8' } );
+ $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'iso-8859-2' });
close $fh;
- ok( $htmldoc && $htmldoc->getDocumentElement );
- ok($htmldoc->findvalue('//p/text()'), $utf_str);
- }
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+
+ SKIP:
+ {
+ if (1000*$] < 5008)
+ {
+ skip("skipping for Perl < 5.8", 2);
+ }
+ # translate to UTF8 on perl-side
+ open my $fh, '<:encoding(iso-8859-2)', $test_file
+ or die "Cannot open '$test_file' for reading - $!";
+ $htmldoc = $parser->parse_html_fh( $fh, { encoding => 'UTF-8' } );
+ close $fh;
+ # TEST
+ ok( $htmldoc && $htmldoc->getDocumentElement, ' TODO : Add test name' );
+ # TEST
+ is($htmldoc->findvalue('//p/text()'), $utf_str, ' TODO : Add test name');
+ }
}
@@ -247,9 +303,12 @@
$html => { recover => 1, suppress_errors => 1 }
);
};
- ok(!$@);
- ok($doc);
+ # TEST
+ ok (!$@, 'No exception was thrown.');
+ # TEST
+ ok ($doc, ' Parsing was succesful.');
my $root = $doc && $doc->documentElement;
my $val = $root && $root->findvalue('//input[@id="foo"]/@value');
- ok($val eq 'working');
-}
+ # TEST
+ is ($val, 'working', 'XPath');
+}
Modified: branches/upstream/libxml-libxml-perl/current/t/46err_column.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/t/46err_column.t?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/t/46err_column.t (original)
+++ branches/upstream/libxml-libxml-perl/current/t/46err_column.t Mon Jul 11 18:12:08 2011
@@ -19,5 +19,22 @@
)
};
-# TEST
-is ($@->column(), 203, "Column is OK.");
+SKIP:
+{
+ my $err = $@;
+ # This is a fix for:
+ # https://rt.cpan.org/Ticket/Display.html?id=69070
+ # << t/46err_column.t is broken on centos/RHEL 4 >>
+
+ # On this system, libxml is as follows:
+ # libxml2-devel-2.6.16-12.8
+
+ if (! ref($err))
+ {
+ skip('parse_string returned a string - not an XML::LibXML::Error object - probably an old libxml2',
+ 1
+ );
+ }
+ # TEST
+ is ($err->column(), 203, "Column is OK.");
+}
Modified: branches/upstream/libxml-libxml-perl/current/t/49global_extent.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/t/49global_extent.t?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/t/49global_extent.t (original)
+++ branches/upstream/libxml-libxml-perl/current/t/49global_extent.t Mon Jul 11 18:12:08 2011
@@ -1,11 +1,15 @@
use strict;
use warnings;
-use Test::More tests => 1;
+use Test::More;
use XML::LibXML;
if (XML::LibXML::LIBXML_VERSION() < 20627) {
plan skip_all => "skipping for libxml2 < 2.6.27";
+}
+else
+{
+ plan tests => 1;
}
sub handler {
Modified: branches/upstream/libxml-libxml-perl/current/t/61error.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libxml-libxml-perl/current/t/61error.t?rev=77387&op=diff
==============================================================================
--- branches/upstream/libxml-libxml-perl/current/t/61error.t (original)
+++ branches/upstream/libxml-libxml-perl/current/t/61error.t Mon Jul 11 18:12:08 2011
@@ -2,14 +2,18 @@
use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More;
use XML::LibXML;
+
+use XML::LibXML::Error;
if (! XML::LibXML::HAVE_STRUCT_ERRORS() ) {
plan skip_all => 'XML::LibXML does not have struct errrors.';
}
-
-use XML::LibXML::Error;
+else
+{
+ plan tests => 3;
+}
my $p = XML::LibXML->new();
More information about the Pkg-perl-cvs-commits
mailing list