Lines Matching refs:role

998     my $role = "unknown";
1007 		$role = $pvalue;
1012     $role = lc($role);
1013     if      ($role eq "supported") {
1014 	$role = "supporter";
1015     } elsif ($role eq "maintained") {
1016 	$role = "maintainer";
1017     } elsif ($role eq "odd fixes") {
1018 	$role = "odd fixer";
1019     } elsif ($role eq "orphan") {
1020 	$role = "orphan minder";
1021     } elsif ($role eq "obsolete") {
1022 	$role = "obsolete minder";
1023     } elsif ($role eq "buried alive in reporters") {
1024 	$role = "chief penguin";
1027     return $role . ":" . $subsystem;
1104 		    my $role = get_maintainer_role($i);
1105 		    push_email_addresses($pvalue, $role);
1146     my ($line, $role) = @_;
1155 	push(@email_to, [format_email($name, $address, $email_usename), $role]);
1157 	push(@email_to, [format_email($name, $address, $email_usename), $role]);
1166     my ($address, $role) = @_;
1171 	push_email_address($address, $role);
1175 	    push_email_address($entry, $role);
1178 	if (!push_email_address($address, $role)) {
1185     my ($line, $role) = @_;
1194 		&& ($role eq "" || !($entry->[1] =~ m/$role/))
1197 		    $entry->[1] = "$role";
1199 		    $entry->[1] = "$entry->[1],$role";
1204 		&& ($role eq "" || !($entry->[1] =~ m/$role/))
1207 		    $entry->[1] = "$role";
1209 		    $entry->[1] = "$entry->[1],$role";
1526 		my $role = $entry->[1];
1538 		printf STDERR "\n     %s\n", $role;
1881     my ($role, $divisor, @lines) = @_;
1916 	    add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
1918 	    add_role($line, $role);
2190 	my ($address, $role) = @$_;
2193 		push(@lines, "$address ($role)");