%#
%# COPYRIGHT:
%#
-%# This software is Copyright (c) 1996-2013 Best Practical Solutions, LLC
+%# This software is Copyright (c) 1996-2017 Best Practical Solutions, LLC
%# <sales@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
<& /Elements/Header, Title => $title &>
<& /Elements/Tabs &>
+% $m->callback(CallbackName => 'BeforeActionList', Actions => \@results, ARGSRef => \%ARGS, Ticket => $ticket);
+
<& /Elements/ListActions, actions => \@results &>
<& Elements/ShowGraph, %ARGS, Ticket => $ticket &>
<form action="<% RT->Config->Get('WebPath') . $m->request_comp->path %>">
+% $m->callback( CallbackName => 'FormStart', ARGSRef => \%ARGS );
<input type="hidden" class="hidden" name="id" value="<% $id %>" />
<& Elements/EditGraphProperties, %ARGS, Ticket => $ticket &>
&>
</form>
+% $m->callback(CallbackName => 'AfterForm', ARGSRef => \%ARGS, Ticket => $ticket);
+
<%ARGS>
</%ARGS>
<%INIT>
use RT::Graph::Tickets;
+
+my $id = $ARGS{'id'};
+my $ticket = LoadTicket( $id );
+$ARGS{'id'} = $id = $ticket->id;
+
+$m->callback( TicketObj => $ticket, ARGSRef => \%ARGS );
+
my @results;
my @save_arguments = qw(id Direction LeadingLink ShowLinks MaxDepth FillUsing ShowLinkDescriptions);
SearchFields => \@save_arguments,
);
-my $id = $ARGS{'id'};
-my $ticket = LoadTicket( $id );
-$ARGS{'id'} = $id = $ticket->id;
-
$ARGS{'LeadingLink'} ||= 'Members';
if ( $ARGS{'ShowLinks'} && !ref $ARGS{'ShowLinks'} ) {
$ARGS{'ShowLinks'} = [$ARGS{'ShowLinks'}];