X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Porting%2FcheckAUTHORS.pl;h=9e3f26437a9c0274dcc398517e93ed237b62442e;hb=102b13d314016f7ec14c00406088a88475fe52db;hp=4774c602a2d746bc33696afc4ef5c78b59540108;hpb=2b0ba25f0d6d021046bdee174d0cd9d6e42ab48a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl
index 4774c60..9e3f264 100644
--- a/Porting/checkAUTHORS.pl
+++ b/Porting/checkAUTHORS.pl
@@ -124,7 +124,7 @@ my %map = reverse (
 
 $map{"autrijus\100egb.elixus.org"} = $map{"autrijus\100geb.elixus.org"}
   = $map{"autrijus\100gmail.com"} = $map{"autrijus\100ossf.iis.sinica.edu.tw"}
-  = "autrijus\100autrijus.org";
+  = $map{"autrijus\100autrijus.org"} = "cpan\100audreyt.org";
 $map{"ilya\100math.ohio-state.edu"} = $map{"ilya\100math.berkeley.edu"}
   = $map{"ilya\100math.berkeley.edu"} = "nospam-abuse\100ilyaz.org";
 $map{"philip.newton\100gmx.net"} = $map{"philip.newton\100datenrevision.de"}
@@ -180,6 +180,7 @@ $map{"beau\100beaucox.com"} = "?";
 
 $map{"rgarciasuarez\100mandrakesoft.com"}
   = $map{"rgarciasuarez\100mandriva.com"}
+  = $map{"rgarciasuarez\100gmail.com"}
   = $map{"raphel.garcia-suarez\100hexaflux.com"} = "rgs";
 $map{"jhietaniemi\100gmail.com"} = $map{"jhi\100kosh.hut.fi"}
   = $map{"jhi\100cc.hut.fi"} = $map{"jarkko.hietaniemi\100nokia.com"} = "jhi";
@@ -198,6 +199,7 @@ $map{"h.m.brand\100hccnet.nl"} = $map{"merijn\100l1.procura.nl"} = "merijn";
 $map{"nik\100tiuk.ti.com"} = $map{"nick.ing-simmons\100elixent.com"} = "nick";
 $map{"hv\100crypt.org"} = "hv";
 $map{"gisle\100aas.no"} = "gisle";
+$map{"gsar\100cpan.org"} = "gsar";
 
 if (@authors) {
   my %raw;