X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9687d2ce94190d858260e10dea0a882b77d3a9b6..refs/heads/debian:/SL/X.pm diff --git a/SL/X.pm b/SL/X.pm index 4acd3bbab..e1707cd0e 100644 --- a/SL/X.pm +++ b/SL/X.pm @@ -5,6 +5,11 @@ use warnings; use SL::X::Base; + +# note! the default fields "message", "error" and "show_trace" are created by +# Exception::Class if message or error are given, they are used for +# stringification, so don't use them in error_templates +# use Exception::Class ( 'SL::X::FormError' => { isa => 'SL::X::Base', @@ -32,13 +37,11 @@ use Exception::Class ( }, 'SL::X::Inventory' => { isa => 'SL::X::Base', - fields => [ qw(msg error) ], - defaults => { error_template => [ '%s: %s', qw(msg error) ] }, + fields => [ qw(code) ], }, 'SL::X::Inventory::Allocation' => { isa => 'SL::X::Base', - fields => [ qw(msg error) ], - defaults => { error_template => [ '%s: %s', qw(msg error) ] }, + fields => [ qw(code) ], }, );