Bug#467318: libxml-autowriter-perl: uses pseudo hashes, breaks with Perl 5.10

[Niko Tyni]

tag 467318 patch
thanks

On Sun, Feb 24, 2008 at 06:57:35PM +0200, Niko Tyni wrote:
> Package: libxml-autowriter-perl
> Version: 0.38-1
> Severity: important
> User: [EMAIL PROTECTED]
> Usertags: perl-5.10-ftbfs
> 
> This package uses pseudo hashes, which have been deprecated for a long
> time and finally removed in perl 5.10 (currently in experimental.)

Apparently upstream 0.38 removed most of the pseudo hashes but missed
one. The attached trivial patch fixes this.

Cheers,
-- 
Niko Tyni   [EMAIL PROTECTED]

diff --git a/lib/XML/ValidWriter.pm b/lib/XML/ValidWriter.pm
index 281ea05..f24b30c 100644
--- a/lib/XML/ValidWriter.pm
+++ b/lib/XML/ValidWriter.pm
@@ -302,11 +302,7 @@ sub new {
    my $class = shift ;
    $class = ref $class || $class ;
 
-   my XML::VWElement $self ;
-   {
-      no strict 'refs' ;
-      $self = bless [ \%{"$class\::FIELDS"} ], $class ;
-   }
+   my XML::VWElement $self = fields::new($class);
 
    my ( $elt_decl ) = @_ ;