Mercurial > pub > Impl

comparison Lib/IMPL/AppException.pm @ 266:89179bb8c388

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*corrected TTView to handle plain (and undefined) values *added URL generating methods to Application::Action *fixed the compare validatior for schemas
author cin
date Mon, 14 Jan 2013 03:10:06 +0400
parents 93963ec449c5
children 4ddb27ff4a0b
comparison
equal deleted inserted replaced
265:6b6d4b2275a1 266:89179bb8c388
14 messageFormat => "Application exception" 14 messageFormat => "Application exception"
15 }; 15 };
16 16
17 use IMPL::declare { 17 use IMPL::declare {
18 base => [ 18 base => [
19 'IMPL::Object' => '@_' 19 'IMPL::Object' => undef
20 ], 20 ],
21 props => [ 21 props => [
22 source => PROP_RO, 22 source => PROP_RO,
23 callStack => PROP_RO, 23 callStack => PROP_RO,
24 _cachedMessage => PROP_RW 24 _cachedMessage => PROP_RW
27 27
28 sub new { 28 sub new {
29 my $self = shift; 29 my $self = shift;
30 30
31 my $instance = $self->next::method(@_); 31 my $instance = $self->next::method(@_);
32 32
33 $instance->callStack(longmess); 33 $instance->source(shortmess);
34 $instance->source(shortmess); 34 $instance->callStack(longmess);
35 35
36 return $instance; 36 return $instance;
37 } 37 }
38 38
39 39