Update David Dyck's e-mail address.

[perl5.git] / Porting / checkAUTHORS.pl

diff --git a/Porting/checkAUTHORS.pl b/Porting/checkAUTHORS.pl
index 20c6e4d..7b67d08 100644 (file)
--- a/Porting/checkAUTHORS.pl
+++ b/Porting/checkAUTHORS.pl
@@ -107,6 +107,7 @@ my %map = reverse (
                   "paul.green\100stratus.com"
                   => "paul_greenvos\100vos.stratus.com",
                   "alian\100cpan.org" => "alian\100alianwebserver.com",
+                  "david.dyck\100fluke.com" => "dcd\100tc.fluke.com",
                   # Maybe we should special case this to get real names out?
                   "perlbug\100perl.org" => "perlbug-followup\100perl.org",
                  );