X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FWebService%2FStrike%2FTorrent.pm;h=33d4b515f9f747759204d6ed9f9da3dfe565639a;hb=refs%2Ftags%2F0.002;hp=b8520005327fb96263ed8070fa12d0a7bf020fd5;hpb=57a92368ec29dcc77fafe5b46b960919fbed7d81;p=webservice-strike.git

diff --git a/lib/WebService/Strike/Torrent.pm b/lib/WebService/Strike/Torrent.pm
index b852000..33d4b51 100644
--- a/lib/WebService/Strike/Torrent.pm
+++ b/lib/WebService/Strike/Torrent.pm
@@ -5,7 +5,7 @@ use strict;
 use warnings;
 use parent qw/Class::Accessor::Fast/;
 
-our $VERSION = '0.001002';
+our $VERSION = '0.002';
 
 use Date::Parse qw/str2time/;
 use JSON::MaybeXS qw/decode_json/;
@@ -30,8 +30,10 @@ sub new{
 	$self = $self->SUPER::new(@args);
 	$self->{torrent_hash} = uc $self->hash;
 	$self->{upload_date} = str2time $self->date, 'UTC';
-	$self->{file_names} = $self->file_info->[0]->{file_names};
-	$self->{file_lengths} = $self->file_info->[0]->{file_lengths};
+	if ($self->file_info) {
+		$self->{file_names} = $self->file_info->[0]->{file_names};
+		$self->{file_lengths} = $self->file_info->[0]->{file_lengths};
+	}
 	$self
 }