r12229 - in /branches/upstream/libxml-dom-perl/current: Changes MANIFEST META.yml lib/XML/DOM.pm

[ghostbar-guest at users.alioth.debian.org]

Author: ghostbar-guest
Date: Tue Jan  8 15:52:36 2008
New Revision: 12229

URL: http://svn.debian.org/wsvn/?sc=1&rev=12229
Log:
[svn-upgrade] Integrating new upstream version, libxml-dom-perl (1.44)

Added:
    branches/upstream/libxml-dom-perl/current/META.yml
Modified:
    branches/upstream/libxml-dom-perl/current/Changes
    branches/upstream/libxml-dom-perl/current/MANIFEST
    branches/upstream/libxml-dom-perl/current/lib/XML/DOM.pm

Modified: branches/upstream/libxml-dom-perl/current/Changes
URL: http://svn.debian.org/wsvn/branches/upstream/libxml-dom-perl/current/Changes?rev=12229&op=diff
==============================================================================
--- branches/upstream/libxml-dom-perl/current/Changes (original)
+++ branches/upstream/libxml-dom-perl/current/Changes Tue Jan  8 15:52:36 2008
@@ -1,4 +1,7 @@
 Change History for XML-DOM:
+
+1.44 (tjmather) 07/25/2005
+- Only use 'use bytes' where needed (by XML::RegExp) (Gisle Aas)
 
 1.43 (tjmather) 07/28/2003
 - Fixed bug that manifests itself with XML::Parser 2.32 and greater,

Modified: branches/upstream/libxml-dom-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/branches/upstream/libxml-dom-perl/current/MANIFEST?rev=12229&op=diff
==============================================================================
--- branches/upstream/libxml-dom-perl/current/MANIFEST (original)
+++ branches/upstream/libxml-dom-perl/current/MANIFEST Tue Jan  8 15:52:36 2008
@@ -60,3 +60,4 @@
 t/dom_template.t
 t/dom_text.t
 XML-Parser-2.31.patch
+META.yml                                 Module meta-data (added by MakeMaker)

Added: branches/upstream/libxml-dom-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libxml-dom-perl/current/META.yml?rev=12229&op=file
==============================================================================
--- branches/upstream/libxml-dom-perl/current/META.yml (added)
+++ branches/upstream/libxml-dom-perl/current/META.yml Tue Jan  8 15:52:36 2008
@@ -1,0 +1,14 @@
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
+name:         XML-DOM
+version:      1.44
+version_from: lib/XML/DOM.pm
+installdirs:  site
+requires:
+    LWP::UserAgent:                0
+    XML::Parser:                   2.30
+    XML::Parser::PerlSAX:          0.07
+    XML::RegExp:                   0
+
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.17

Modified: branches/upstream/libxml-dom-perl/current/lib/XML/DOM.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libxml-dom-perl/current/lib/XML/DOM.pm?rev=12229&op=diff
==============================================================================
--- branches/upstream/libxml-dom-perl/current/lib/XML/DOM.pm (original)
+++ branches/upstream/libxml-dom-perl/current/lib/XML/DOM.pm Tue Jan  8 15:52:36 2008
@@ -29,8 +29,6 @@
 
 use strict;
 
-use bytes;
-
 use vars qw( $VERSION @ISA @EXPORT
 	     $IgnoreReadOnly $SafeMode $TagStyle
 	     %DefaultEntities %DecodeDefaultEntity
@@ -41,7 +39,7 @@
 BEGIN
 {
     require XML::Parser;
-    $VERSION = '1.43';
+    $VERSION = '1.44';
 
     my $needVersion = '2.28';
     die "need at least XML::Parser version $needVersion (current=${XML::Parser::VERSION})"
@@ -405,6 +403,7 @@
 #
 sub forgiving_isValidName
 {
+    use bytes;  # XML::RegExp expressed in terms encoded UTF8
     $_[0] =~ /^$XML::RegExp::Name$/o;
 }
 
@@ -413,6 +412,7 @@
 #
 sub picky_isValidName
 {
+    use bytes;  # XML::RegExp expressed in terms encoded UTF8
     $_[0] =~ /^$XML::RegExp::Name$/o and $_[0] !~ /^xml/i;
 }
 
@@ -1243,6 +1243,7 @@
     my ($self, $str) = @_;
     my $doctype = $self->[_Doc]->getDoctype;
 
+    use bytes;  # XML::RegExp expressed in terms encoded UTF8
     $str =~ s/&($XML::RegExp::Name|(#([0-9]+)|#x([0-9a-fA-F]+)));/
 	defined($2) ? XML::DOM::XmlUtf8Encode ($3 || hex ($4)) 
 		    : expandEntityRef ($1, $doctype)/ego;
@@ -5085,6 +5086,8 @@
 
 =head1 SEE ALSO
 
+L<XML::DOM::XPath>
+
 The Japanese version of this document by Takanori Kawai (Hippo2000)
 at L<http://member.nifty.ne.jp/hippo2000/perltips/xml/dom.htm>