Lines Matching refs:subsystem

47 my $subsystem = 0;
193 		'subsystem!' => \$subsystem,
232     $subsystem = 0;
237     my $selections = $email + $scm + $status + $subsystem + $web;
461 my @subsystem = ();
483 if ($subsystem) {
484     @subsystem = uniq(@subsystem);
485     output(@subsystem);
539     @subsystem = ();
906     my $subsystem = $typevalue[$start];
907     if (length($subsystem) > 20) {
908 	$subsystem = substr($subsystem, 0, 17);
909 	$subsystem =~ s/\s*$//;
910 	$subsystem =~ s/[()]//g;
911 	$subsystem = $subsystem . "...";
913     return $subsystem;
924     my $subsystem = get_subsystem_name($index);
952     return $role . ":" . $subsystem;
958     my $subsystem = get_subsystem_name($index);
960     if ($subsystem eq "THE REST") {
961 	$subsystem = "";
964     return $subsystem;
974     push(@subsystem, $typevalue[$start]);
1046 		    my $subsystem = get_subsystem_name($i);
1047 		    push_email_addresses($pvalue, "reviewer:$subsystem");