From 762314698091dc145a332bf70c8406a9c6930d9d Mon Sep 17 00:00:00 2001
From: Shawn Boyette <sboyette@esilibrary.com>
Date: Sat, 6 Dec 2008 00:11:47 +0000
Subject: [PATCH] marc-cleanup: commented out xml prologue and <collection> wrapper

---
 marc-cleanup |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/marc-cleanup b/marc-cleanup
index 22c834c..cb4fda1 100755
--- a/marc-cleanup
+++ b/marc-cleanup
@@ -22,8 +22,8 @@ open MARC, '<:utf8', (shift || 'incoming.marc.xml');
 open my $NUMARC, '>:utf8', $conf->{output};
 open my $OLD2NEW, '>', 'old2new.map'
   if ($conf->{'renumber-from'} and $conf->{'original-subfield'});
-print $NUMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
-print $NUMARC '<collection xmlns="http://www.loc.gov/MARC21/slim">',"\n";
+#print $NUMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
+#print $NUMARC '<collection xmlns="http://www.loc.gov/MARC21/slim">',"\n";
 
 my @record  = (); # current record storage
 my %recmeta = (); # metadata about current record
@@ -97,7 +97,7 @@ while ( buildrecord() ) {
     }
     write_record($NUMARC);
 }
-print $NUMARC "</collection>\n";
+#print $NUMARC "</collection>\n";
 print $OUT "\nDone.               \n";
 
 
-- 
1.7.2.5