From 8937a62f98cfbce4ab5470f292c340a04835efbb Mon Sep 17 00:00:00 2001
From: Shawn Boyette <sboyette@esilibrary.com>
Date: Tue, 23 Sep 2008 06:32:11 +0000
Subject: [PATCH] </record> was, brilliantly, NOT being appended to records

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

diff --git a/yaz-cleanup b/yaz-cleanup
index f2e3442..f4b2452 100755
--- a/yaz-cleanup
+++ b/yaz-cleanup
@@ -137,6 +137,7 @@ sub getline {
             %reccontext = ();
             $reccount++;
         } elsif ($l =~ m|</record>|) {
+            push @record, $l;
             write_record($NUMARC) if $reccount;
         } else {
             push @record, $l;
-- 
1.7.2.5