Lines Matching refs:role

1287     my $role = "unknown";
1296 		$role = $pvalue;
1301     $role = lc($role);
1302     if      ($role eq "supported") {
1303 	$role = "supporter";
1304     } elsif ($role eq "maintained") {
1305 	$role = "maintainer";
1306     } elsif ($role eq "odd fixes") {
1307 	$role = "odd fixer";
1308     } elsif ($role eq "orphan") {
1309 	$role = "orphan minder";
1310     } elsif ($role eq "obsolete") {
1311 	$role = "obsolete minder";
1312     } elsif ($role eq "buried alive in reporters") {
1313 	$role = "chief penguin";
1316     return $role . ":" . $subsystem;
1384 		    my $role = get_maintainer_role($i);
1385 		    push_email_addresses($pvalue, $role . $suffix);
1416     my ($line, $role) = @_;
1425 	push(@email_to, [format_email($name, $address, $email_usename), $role]);
1427 	push(@email_to, [format_email($name, $address, $email_usename), $role]);
1436     my ($address, $role) = @_;
1441 	push_email_address($address, $role);
1445 	    push_email_address($entry, $role);
1448 	if (!push_email_address($address, $role)) {
1455     my ($line, $role) = @_;
1464 		&& ($role eq "" || !($entry->[1] =~ m/$role/))
1467 		    $entry->[1] = "$role";
1469 		    $entry->[1] = "$entry->[1],$role";
1474 		&& ($role eq "" || !($entry->[1] =~ m/$role/))
1477 		    $entry->[1] = "$role";
1479 		    $entry->[1] = "$entry->[1],$role";
1822 		my $role = $entry->[1];
1834 		printf STDERR "\n     %s\n", $role;
2177     my ($role, $divisor, @lines) = @_;
2212 	    add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
2214 	    add_role($line, $role);
2525 	my ($address, $role) = @$_;
2528 		push(@lines, "$address ($role)");