<%INIT>
return unless RT::IR->OurQueue( $QueueObj );

if ( grep !/^(id|results|Queue)$/, keys %$ARGSRef ) {
    # for something complex use subexec
    $m->subexec( '/RTIR/Create.html', %$ARGSRef, Queue => $QueueObj->Name );
    $m->abort;
}

my $url = RT->Config->Get('WebURL') .'RTIR/Create.html?'
    . $m->comp('/Elements/QueryString', %$ARGSRef, Queue => $QueueObj->Name )
;
RT::Interface::Web::Redirect( $url );
</%INIT>
<%ARGS>
$QueueObj => undef
$ARGSRef  => {}
</%ARGS>
