package SL::X;

use strict;

use Exception::Lite qw(declareExceptionClass);

declareExceptionClass('SL::X::FormError');
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;