view Lib/Engine/Security/AccessDeniedException.pm @ 32:56cef8e3cda6

+1
author Sergey
date Mon, 09 Nov 2009 01:39:31 +0300
parents 03e58a454b20
children 16ada169ca75
line wrap: on
line source

package Engine::Security::AccessDeniedException;
use strict;
use Common;
our @ISA = qw(Exception);

sub CTOR {
    my ($this,$message,@args) = @_;
    
    $this->SUPER::CTOR($message ? $message : 'Access denied',@args);
}


1;