Bump version and update Changes

[www-search-torrentz.git] / lib / WWW / Search / Torrentz / Result.pm

diff --git a/lib/WWW/Search/Torrentz/Result.pm b/lib/WWW/Search/Torrentz/Result.pm
index 6ab9955661d0f730f5d39b68cada984f0cea01ce..86ec00c1ab816252f2325f96f2605d51900eed48 100644 (file)
--- a/lib/WWW/Search/Torrentz/Result.pm
+++ b/lib/WWW/Search/Torrentz/Result.pm
@@ -5,7 +5,7 @@ use strict;
 use warnings;
 use parent qw/WWW::SearchResult/;
 
-our $VERSION = '0.001002';
+our $VERSION = '0.002';
 
 use HTML::TreeBuilder;
 use URI::Escape qw/uri_escape/;
@@ -49,7 +49,7 @@ sub parse_page {
        my $trackers = $tree->look_down(class => 'trackers');
        $self->{trackers} //= [];
        for my $tracker ($trackers->find('dl')) {
-               push $self->{trackers}, $tracker->find('a')->as_text;
+               push @{$self->{trackers}}, $tracker->find('a')->as_text;
        }
 
        my $files = $tree->look_down(class => 'files');
@@ -78,7 +78,7 @@ sub parse_directory{
                } else {
                        $child->objectify_text;
                        my ($filename, $size) = $child->find('~text');
-                       push $self->{files}, +{
+                       push @{$self->{files}}, +{
                                path => $prefix.$filename->attr('text'),
                                size => $size->attr('text')
                        }
@@ -113,7 +113,7 @@ __END__
 
 =head1 NAME
 
-WWW::Search::Torrentz::Result - a result of a WWW::Search::Torrentz search
+WWW::Search::Torrentz::Result - [DEPRECATED] a result of a WWW::Search::Torrentz search
 
 =head1 SYNOPSIS