X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=Equinox-Migration%2Flib%2FEquinox%2FMigration%2FMapDrivenMARCXMLProc.pm;fp=Equinox-Migration%2Flib%2FEquinox%2FMigration%2FMapDrivenMARCXMLProc.pm;h=ca82ca7e6328c6a17b48de26f1216a791a64cd30;hp=dc45bafce752f4517aa998a2647aa0a5f26b9959;hb=d1d70c501f6592ae84fc351e4325e5a5f9a67376;hpb=7aa7dfc0b3a13d24379e3e7bc407a29714b3a04f diff --git a/Equinox-Migration/lib/Equinox/Migration/MapDrivenMARCXMLProc.pm b/Equinox-Migration/lib/Equinox/Migration/MapDrivenMARCXMLProc.pm index dc45baf..ca82ca7 100644 --- a/Equinox-Migration/lib/Equinox/Migration/MapDrivenMARCXMLProc.pm +++ b/Equinox-Migration/lib/Equinox/Migration/MapDrivenMARCXMLProc.pm @@ -4,7 +4,6 @@ use warnings; use strict; use XML::Twig; -use DBM::Deep; use Equinox::Migration::SubfieldMapper 1.004; @@ -63,13 +62,6 @@ sub new { mods => \@mods ); # initialize datastore - #die "Datastore file 'EMMXSSTORAGE.dbmd' already exists. Exiting.\n" - # if (-e "EMMXSSTORAGE.dbmd"); - #$dstore = DBM::Deep->new( file => "EMMXSSTORAGE.dbmd", - # max_buckets => 64, - # #data_sector_size => 256, - # autoflush => 0, - # ); $dstore = {}; $reccount = 0; # next record ptr $dstore->{tags} = $sfmap->tags; # list of all tags