The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Test::Smart::Interface::Mock - Mock interface for testing Test::Smart

SYNOPSIS

  use Test::Smart;

  initialize('Test::Smart::Interface::Mock',
              answer  => 'always do this',
              comment => 'saying this about it',
              skip    => 'or skip because of this',
              error   => 'or give this error');

  # do some testing here to make sure Test::Smart
  # reacts properly.

DESCRIPTION

This is for internal testing. If you're re-implementing Test::Smart you might find it useful yourself.

AUTHOR

Edgar A. Bering, <trizor@gmail.com>

COPYRIGHT AND LICENSE

Copyright (C) 2007 by Edgar A. Bering

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.