Squash an uninitialized value warning on a GET that will return 301.

metacpan · May 13, 2017 · d876070 · d876070
1 parent 9404533
commit d876070
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/lib/MetaCPAN/Web/Model/API/Contributors.pm b/lib/MetaCPAN/Web/Model/API/Contributors.pm
@@ -27,6 +27,9 @@ sub get {
     my ( $self, $author, $release ) = @_;
     my $cv = $self->cv;
 
+    # If there's no release, we'll just redirect
+    $release //= {};
+
     $self->request( '/release/contributors/' . $author . '/' . $release, )
         ->cb(
         sub {