view Lib/IMPL/TargetException.pm @ 271:56364d0c4b4f

+IMPL::SQL::Schema::MySQL: added basic support for MySQL
author cin
date Mon, 28 Jan 2013 02:43:14 +0400
parents 89179bb8c388
children 68d905f8dc43
line wrap: on
line source

package IMPL::TargetException;
use strict;

use IMPL::Const qw(:prop);
use IMPL::declare {
    base => [
        'IMPL::AppException' => undef,
    ],
    props => [
        innerException => PROP_RO
    ]
};

sub CTOR {
    my ($this,%args) = @_;
    
    $this->innerException($args{innerException});
}

use IMPL::Resources::Strings {
    messageFormat => "An invocation target throws an exception '%innerException.message%' \n%innerException.callStack%\n__END_OF_INNER_EXCEPTION__\n"
};

1;