comparison lib/IMPL/AppException.pm @ 422:b0481c071bea ref20150831

IMPL::Config::Container tests, YAMLConfiguration now works and tested
author cin
date Sun, 20 Aug 2017 00:20:41 +0300
parents c6e90e02dd17
children
comparison
equal deleted inserted replaced
421:7798345304bc 422:b0481c071bea
29 29
30 my $instance = $self->next::method(@_); 30 my $instance = $self->next::method(@_);
31 31
32 $instance->source(shortmess); 32 $instance->source(shortmess);
33 $instance->callStack(longmess); 33 $instance->callStack(longmess);
34 34
35 return $instance; 35 return $instance;
36 } 36 }
37 37
38 sub ToString { 38 sub ToString {
39 my ($this) = @_; 39 my ($this) = @_;
42 } 42 }
43 43
44 sub throw { 44 sub throw {
45 my $self = shift; 45 my $self = shift;
46 46
47 die $self->new(@_); 47 die ref $self ? $self : $self->new(@_);
48 } 48 }
49 49
50 1; 50 1;
51 51
52 __END__ 52 __END__