diff lib/IMPL/TargetException.pm @ 407:c6e90e02dd17 ref20150831

renamed Lib->lib
author cin
date Fri, 04 Sep 2015 19:40:23 +0300
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/lib/IMPL/TargetException.pm	Fri Sep 04 19:40:23 2015 +0300
@@ -0,0 +1,24 @@
+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 {
+    message => "An invocation target throws an exception '%innerException.message%' \n%innerException.callStack%\n__END_OF_INNER_EXCEPTION__\n"
+};
+
+1;
\ No newline at end of file