From e5f562b91b9dadd24b88450c7710e16b20166ed6 Mon Sep 17 00:00:00 2001
From: Shawn Boyette <sboyette@esilibrary.com>
Date: Mon, 22 Sep 2008 19:30:39 +0000
Subject: [PATCH] xml element in exception file

---
 yaz-cleanup |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/yaz-cleanup b/yaz-cleanup
index 1450fc3..c8f6766 100755
--- a/yaz-cleanup
+++ b/yaz-cleanup
@@ -23,6 +23,7 @@ open MARC, '<', 'incoming.marc.xml';
 open my $NUMARC, '>', 'incoming.clean.marc.xml';
 print $NUMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
 open my $EXMARC, '>', 'incoming.exceptions.marc.xml';
+print $EXMARC '<?xml version="1.0" encoding="UTF-8"?>',"\n";
 open MARC2, '<', 'incoming.marc.xml';
 <MARC2>;
 
@@ -81,6 +82,7 @@ while (my $line = getline()) {
 
 }
 print $NUMARC "</xml>\n";
+print $EXMARC "</xml>\n";
 
 =head2 edit
 
-- 
1.7.2.5