X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FWWW%2FBackpackTF.pm;h=015d9fa3a810121009503f7de23cc33c2b0200e6;hb=refs%2Ftags%2F0.000_003;hp=5e33b57d67e0055394290ac18fd4d5d7e83003ce;hpb=72f329fe90d7d3aaee7400d639a332d55b30179f;p=www-backpacktf.git diff --git a/lib/WWW/BackpackTF.pm b/lib/WWW/BackpackTF.pm index 5e33b57..015d9fa 100644 --- a/lib/WWW/BackpackTF.pm +++ b/lib/WWW/BackpackTF.pm @@ -4,7 +4,7 @@ use 5.014000; use strict; use warnings; use parent qw/Exporter/; -our $VERSION = '0.000_002'; +our $VERSION = '0.000_003'; our @EXPORT_OK = qw/TF2 DOTA2/; use constant +{ @@ -31,7 +31,7 @@ use WWW::BackpackTF::User; sub request { my ($self, $url, %params) = @_; - $params{key} = $self->{key}; + $params{key} = $self->{key} if $self->{key}; $url = $self->{base} . $url; $url .= "&$_=$params{$_}" for keys %params; my $response = decode_json(get $url)->{response};