diff --git a/lib/WebGUI/Account.pm b/lib/WebGUI/Account.pm index 5727469bd..622283d37 100644 --- a/lib/WebGUI/Account.pm +++ b/lib/WebGUI/Account.pm @@ -172,6 +172,12 @@ sub callMethod { ); return undef; } + + unless ($self->canView) { + my $session = $self->session; + $session->output->print($session->privilege->insufficient); + return undef; + } #Try to call the method my $output = eval { $self->$method(@{$args}) };