diff options
Diffstat (limited to 'rt/lib/RT/Action/CreateTickets.pm')
-rw-r--r-- | rt/lib/RT/Action/CreateTickets.pm | 23 |
1 files changed, 21 insertions, 2 deletions
diff --git a/rt/lib/RT/Action/CreateTickets.pm b/rt/lib/RT/Action/CreateTickets.pm index 08763d531..5a1693569 100644 --- a/rt/lib/RT/Action/CreateTickets.pm +++ b/rt/lib/RT/Action/CreateTickets.pm @@ -723,7 +723,7 @@ sub ParseLines { } } - foreach my $date (qw(due starts started resolved)) { + foreach my $date qw(due starts started resolved) { my $dateobj = RT::Date->new( $self->CurrentUser ); next unless $args{$date}; if ( $args{$date} =~ /^\d+$/ ) { @@ -763,6 +763,7 @@ sub ParseLines { FinalPriority => $args{'finalpriority'} || 0, SquelchMailTo => $args{'squelchmailto'}, Type => $args{'type'}, + $self->Rules ); if ( $args{content} ) { @@ -1080,7 +1081,7 @@ sub UpdateWatchers { my @results; - foreach my $type (qw(Requestor Cc AdminCc)) { + foreach my $type qw(Requestor Cc AdminCc) { my $method = $type . 'Addresses'; my $oldaddr = $ticket->$method; @@ -1239,6 +1240,24 @@ sub PostProcess { } +sub Options { + my $self = shift; + my $queues = RT::Queues->new($self->CurrentUser); + $queues->UnLimit; + my @names; + while (my $queue = $queues->Next) { + push @names, $queue->Id, $queue->Name; + } + return ( + { + 'name' => 'Queue', + 'label' => 'In queue', + 'type' => 'select', + 'options' => \@names + } + ) +} + RT::Base->_ImportOverlays(); 1; |