X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FAcme-CPANAuthors-You-re_using.git;a=blobdiff_plain;f=lib%2FAcme%2FCPANAuthors%2FYou%2Fre_using.pm;fp=lib%2FAcme%2FCPANAuthors%2FYou%2Fre_using.pm;h=c50cd8f9f7abeb13e0647b1c432eeb0023478242;hp=efc35bf3e4eca354c30c8f5682924a2fab1b64a8;hb=52e56d88c70bfa7af4574164ac732ceaed6053ab;hpb=7225e18d270e791b2136c58830da5d7207e7e9ea diff --git a/lib/Acme/CPANAuthors/You/re_using.pm b/lib/Acme/CPANAuthors/You/re_using.pm index efc35bf..c50cd8f 100644 --- a/lib/Acme/CPANAuthors/You/re_using.pm +++ b/lib/Acme/CPANAuthors/You/re_using.pm @@ -87,7 +87,7 @@ sub register { my $name; $name = $auth->name if defined $auth; - + $authors{$cpanid} = defined $name ? $name : $cpanid; }