The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<%init>
$m->comp('/Elements/DoAuth',%ARGS);

# 3.8.9 doesn't redirect to the specified page if request has one.
if (   $m->request_comp->path eq '/NoAuth/Login.html'
    && RT::Interface::Web::_UserLoggedIn()
    && $ARGS{next} )
{
    my $next = delete $session{'NextPage'}->{ $ARGS{'next'} };
       $next = $next->{'url'} if ref $next;
    RT::Interface::Web::Redirect( $next || RT->Config->Get('WebURL') );
}
</%init>