script/tickets: add missing name field value

metacpan · Nov 19, 2016 · b51dabd · b51dabd
1 parent 113300e
commit b51dabd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/MetaCPAN/Script/Tickets.pm b/lib/MetaCPAN/Script/Tickets.pm
@@ -127,7 +127,7 @@ sub check_all_distributions {
     while ( my $release = $scroll->next ) {
         my $distribution = $release->{'fields'}{'distribution'}[0];
         $distribution or next;
-        $dists->{$distribution} = {};
+        $dists->{$distribution} = { name => $distribution };
     }
 
     $self->_bulk_update($dists);