view Lib/Engine/Security/AccessDeniedException.pm @ 133:a07a66fd8d5c

Added IMPL::Class::MethodInfo IMPL::Class::Property::Base optimizations
author wizard
date Fri, 18 Jun 2010 16:27:28 +0400
parents 16ada169ca75
children
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;