X-Git-Url: http://git.ieval.ro/?p=www-backpacktf.git;a=blobdiff_plain;f=lib%2FWWW%2FBackpackTF.pm;h=0b6ac12490f1d5277451789ce20f4cd1ef5bbe88;hp=5e33b57d67e0055394290ac18fd4d5d7e83003ce;hb=af9ae5ee3646f52e141353e3f70e3b3d38d76090;hpb=72f329fe90d7d3aaee7400d639a332d55b30179f diff --git a/lib/WWW/BackpackTF.pm b/lib/WWW/BackpackTF.pm index 5e33b57..0b6ac12 100644 --- a/lib/WWW/BackpackTF.pm +++ b/lib/WWW/BackpackTF.pm @@ -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};