%INIT> if ( $session{CurrentUser}->HasRight( Right => 'SuperUser', Object => $RT::System) or $session{CurrentUser}->HasRight( Right => 'BecomeUser', Object => $RT::System ) ){ # refuse to become super users my $u = RT::CurrentUser->new(RT->SystemUser); $u->Load($id); if ($u->HasRight(Right => 'SuperUser', Object => $RT::System)){ $m->out("
you don't have the right to become other users
"); } %INIT> home <%ARGS> $id => undef %ARGS>