Equinox-Migration/t/03-MapDrivenMARCXMLProc.t

   1 #!perl -T
   2
   3 #use Test::More tests => 39;
   4 use Test::More qw(no_plan);
   5 use Equinox::Migration::MapDrivenXMLProc;
   6
   7 # baseline object creation
   8 my $sm = Equinox::Migration::MapDrivenXMLProc->new();
   9 is(ref $sm, "Equinox::Migration::MapDrivenXMLProc", "self is self");
  10