diff options
| -rw-r--r-- | rt/share/html/Elements/LoginRedirectWarning | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/rt/share/html/Elements/LoginRedirectWarning b/rt/share/html/Elements/LoginRedirectWarning new file mode 100644 index 000000000..891e38114 --- /dev/null +++ b/rt/share/html/Elements/LoginRedirectWarning @@ -0,0 +1,20 @@ +<%args> +$next => undef +</%args> +<%init> +return unless $next; + +my $destination = RT::Interface::Web::FetchNextPage($next); +return unless ref $destination and $destination->{'HasSideEffects'}; + +my $consequence = RT::Interface::Web::PotentialPageAction($destination->{'url'}) || loc("perform actions"); + $consequence = $m->interp->apply_escapes($consequence => "h"); +</%init> +<div class="redirect-warning"> + <p> + <&|/l&>After logging in you'll be sent to your original destination:</&> + <tt title="<% $destination->{'url'} %>"><% $destination->{'url'} %></tt> + <&|/l_unsafe, "<strong>$consequence</strong>" &>which may [_1] on your behalf.</&> + </p> + <p><&|/l&>If this is not what you expect, leave this page now without logging in.</&></p> +</div> |