view Lib/Engine/Security/AccessDeniedException.pm @ 159:f8de52d3c112

IMPL::Test::Unit minor changes
author wizard
date Mon, 27 Dec 2010 01:37:44 +0300
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;