File: [Development] / xfs-cmds / xfsmisc / Attic / developers.pl (download)
Revision 1.5, Thu Aug 18 06:02:43 2005 UTC (12 years, 2 months ago) by nathans.longdrop.melbourne.sgi.com
Branch: MAIN
Changes since 1.4: +3 -3
lines
Update list of developers for merges.
Merge of master-melb:xfs-cmds:23538a by kenmcd.
|
package developers;
use strict;
# Username to real name mapping for people who are to blame^W^W
# checking XFS mods into the xfs-kern/xfs-cmds/dmapi ptools trees.
my %names = (
'arunr', 'Arun Ramakrishnan',
'alkirkco', 'Mandy Kirkconnell',
'bobo', 'Bob Kierski',
'cattelan', 'Russell Cattelan',
'dgc', 'David Chinner',
'felixb', 'Felix Blyakher',
'gnb', 'Greg Banks',
'gwehrman', 'Geoffrey Wehrman',
'hankins', 'Ryan Hankins',
'hch', 'Christoph Hellwig',
'kfr', 'Kevan Rehm',
'nathans', 'Nathan Scott',
'overby', 'Glen Overby',
'sandeen', 'Eric Sandeen',
'tes', 'Tim Shimmin',
'wkendall', 'Bill Kendall',
'yingping', 'Yingping Lu',
);
sub developer_check {
my $username = shift @_;
if (!defined($names{$username})) {
die "unknown developer: $username";
}
}
sub developer {
my $username = shift @_;
developer_check($username);
$names{$username} . ' <' . $username. '@sgi.com>';
}
sub developer_name {
my $username = shift @_;
developer_check($username);
$names{$username};
}
sub developer_email {
my $username = shift @_;
developer_check($username);
$username . '@sgi.com';
}
1;