X.pm

   1 package SL::X;
   2
   3 use strict;
   4
   5 use Exception::Lite qw(declareExceptionClass);
   6
   7 declareExceptionClass('SL::X::FormError');
   8 declareExceptionClass('SL::X::DBHookError', [ '%s hook \'%s\' failed', qw(when hook object) ]);
   9
  10 1;