Create new function for all tickets in Outreachy round.

This commit is contained in:
Bradley M. Kuhn 2018-07-25 14:01:36 -07:00
parent 0263c49c77
commit cc60ef0326

View file

@ -22,6 +22,21 @@ sub Outreachy_FindUniqueTicket(@) {
return $ticketSpec;
}
###############################################################################
sub Outreachy_FindMainTicketsInRound($) {
my($round) = @_;
open(my $rtLsFH, "-|", "$RT_CMD", "ls", "-i", 'Queue = outreachy-interns ' .
"AND Subject LIKE '" . $ROUND);
my @ticketSpecs;
while (my $lsLine = <$rtLsFH>) {
chomp $lsLine;
if ($lsLine =~ /ticket/) {
push(@ticketSpecs, $lsLine);
}
}
close $rtLsFH;
return @ticketSpecs;
}
###############################################################################
sub GetStatusFromTicket($) {
my($ticketSpec) = @_;
my $status;