blob: 965d00b255be878a27fd8e16f06756479be6347b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
<%doc>
When the user tries to change a ticket's status to "resolved" through
the Update interface, check mandatory fields. If they aren't all set,
redirect to Ticket Basics instead of updating. Note that this will
lose any comments/time/other information the user has entered.
</%doc>
<%init>
my $oldStatus = $TicketObj->Status();
my $newStatus = $ARGSRef->{'Status'} || $ARGSRef->{'DefaultStatus'} || '';
if( $oldStatus ne 'resolved' and
$newStatus eq 'resolved' and
$m->comp('/Ticket/Elements/CheckMandatoryFields',
Ticket => $TicketObj
) ) {
$m->clear_buffer;
RT::Interface::Web::Redirect(
RT->Config->Get('WebURL')."Ticket/Modify.html?id=".$TicketObj->Id."&resolve=1"
);
$m->abort;
}
</%init>
<%args>
$ARGSRef => {}
$checks_failure => undef
$results => []
$TicketObj => undef
</%args>
|
