Lines Matching refs:role
948 my $role = "unknown";
962 $role = $pvalue;
967 $role = lc($role);
968 if ($role eq "supported") {
969 $role = "supporter";
970 } elsif ($role eq "maintained") {
971 $role = "maintainer";
972 } elsif ($role eq "odd fixes") {
973 $role = "odd fixer";
974 } elsif ($role eq "orphan") {
975 $role = "orphan minder";
976 } elsif ($role eq "obsolete") {
977 $role = "obsolete minder";
978 } elsif ($role eq "buried alive in reporters") {
979 $role = "chief penguin";
982 return $role . ":" . $subsystem;
1068 my $role = get_maintainer_role($i);
1069 push_email_addresses($pvalue, $role);
1109 my ($line, $role) = @_;
1118 push(@email_to, [format_email($name, $address, $email_usename), $role]);
1120 push(@email_to, [format_email($name, $address, $email_usename), $role]);
1129 my ($address, $role) = @_;
1134 push_email_address($address, $role);
1138 push_email_address($entry, $role);
1141 if (!push_email_address($address, $role)) {
1148 my ($line, $role) = @_;
1157 && ($role eq "" || !($entry->[1] =~ m/$role/))
1160 $entry->[1] = "$role";
1162 $entry->[1] = "$entry->[1],$role";
1167 && ($role eq "" || !($entry->[1] =~ m/$role/))
1170 $entry->[1] = "$role";
1172 $entry->[1] = "$entry->[1],$role";
1489 my $role = $entry->[1];
1501 printf STDERR "\n %s\n", $role;
1844 my ($role, $divisor, @lines) = @_;
1878 add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
1880 add_role($line, $role);
2152 my ($address, $role) = @$_;
2155 push(@lines, "$address ($role)");