- die SL::X::DBHookError->new(
- hook => (ref($sub) eq 'CODE' ? '<anonymous sub>' : $sub),
- when => $when,
- object => $object,
- ) if !$result;
+ die SL::X::DBHookError->new(when => $when,
+ hook => (ref($sub) eq 'CODE' ? '<anonymous sub>' : $sub),
+ object => $object,
+ object_type => ref($object))
+ if !$result;