Update David Dyck's e-mail address.

p4raw-id: //depot/perl@27393

diff --git a/AUTHORS b/AUTHORS
index d7dcc2d..1996b2d 100644 (file)
--- a/AUTHORS
+++ b/AUTHORS
@@ -199,7 +199,7 @@ David Cantrell                      <david@cantrell.org.uk>
 David Couture
 David D. Kilzer                        <ddkilzer@lubricants-oil.com>
 David Denholm                  <denholm@conmat.phys.soton.ac.uk>
-David Dyck                     <dcd@tc.fluke.com>
+David Dyck                     <david.dyck@fluke.com>
 David Cannings                 <lists@edeca.net>
 David F. Haertig               <dfh@dwroll.lucent.com>
 David Favor                    <david@davidfavor.com>

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",
                  );