Lines Matching refs:role
1052 my $role = "unknown";
1061 $role = $pvalue;
1066 $role = lc($role);
1067 if ($role eq "supported") {
1068 $role = "supporter";
1069 } elsif ($role eq "maintained") {
1070 $role = "maintainer";
1071 } elsif ($role eq "odd fixes") {
1072 $role = "odd fixer";
1073 } elsif ($role eq "orphan") {
1074 $role = "orphan minder";
1075 } elsif ($role eq "obsolete") {
1076 $role = "obsolete minder";
1077 } elsif ($role eq "buried alive in reporters") {
1078 $role = "chief penguin";
1081 return $role . ":" . $subsystem;
1158 my $role = get_maintainer_role($i);
1159 push_email_addresses($pvalue, $role);
1200 my ($line, $role) = @_;
1209 push(@email_to, [format_email($name, $address, $email_usename), $role]);
1211 push(@email_to, [format_email($name, $address, $email_usename), $role]);
1220 my ($address, $role) = @_;
1225 push_email_address($address, $role);
1229 push_email_address($entry, $role);
1232 if (!push_email_address($address, $role)) {
1239 my ($line, $role) = @_;
1248 && ($role eq "" || !($entry->[1] =~ m/$role/))
1251 $entry->[1] = "$role";
1253 $entry->[1] = "$entry->[1],$role";
1258 && ($role eq "" || !($entry->[1] =~ m/$role/))
1261 $entry->[1] = "$role";
1263 $entry->[1] = "$entry->[1],$role";
1580 my $role = $entry->[1];
1592 printf STDERR "\n %s\n", $role;
1935 my ($role, $divisor, @lines) = @_;
1970 add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
1972 add_role($line, $role);
2262 my ($address, $role) = @$_;
2265 push(@lines, "$address ($role)");