X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a23454bb1b039a31b7f77710ff663fa9152d530c..f03134bc436d7969247da0986809afc1567ae21b:/SL/X.pm

diff --git a/SL/X.pm b/SL/X.pm
index 552e5ef29..4ecfc7dfa 100644
--- a/SL/X.pm
+++ b/SL/X.pm
@@ -5,6 +5,9 @@ use strict;
 use Exception::Lite qw(declareExceptionClass);
 
 declareExceptionClass('SL::X::FormError');
-declareExceptionClass('SL::X::DBHookError', [ '%s hook \'%s\' for object type \'%s\' failed', qw(when hook object_type object) ]);
+declareExceptionClass('SL::X::DBError',                        [ '%s %s', qw(error msg) ]);
+declareExceptionClass('SL::X::DBHookError',  'SL::X::DBError', [ '%s hook \'%s\' for object type \'%s\' failed', qw(when hook object_type object) ]);
+declareExceptionClass('SL::X::DBRoseError',  'SL::X::DBError', [ '\'%s\' in object of type \'%s\' occured', qw(error class) ]);
+declareExceptionClass('SL::X::DBUtilsError', 'SL::X::DBError', [ '%s: %s', qw(msg error) ]);
 
 1;