projects
/
migration-tools.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
removing DBMD, phase I
[migration-tools.git]
/
Equinox-Migration
/
t
/
04-MARCXMLSampler.t
diff --git
a/Equinox-Migration/t/04-MARCXMLSampler.t
b/Equinox-Migration/t/04-MARCXMLSampler.t
index
1b3e0a4
..
0d4a40e
100644
(file)
--- a/
Equinox-Migration/t/04-MARCXMLSampler.t
+++ b/
Equinox-Migration/t/04-MARCXMLSampler.t
@@
-18,7
+18,6
@@
is(ref $mp, "Equinox::Migration::MARCXMLSampler", "self is self");
$mp = Equinox::Migration::MARCXMLSampler->new( marcfile => 't/corpus/mdmp-0.txt',
mapstring => '999',
);
-$mp->parse_records;
my $sample = $mp->{data}{samp};
is (defined $sample->{999}, 1);
is (defined $sample->{999}{x}, 1);