From c57579973c091d2c5437f152baa003ed0cc0c85a Mon Sep 17 00:00:00 2001
From: Shawn Boyette <sboyette@esilibrary.com>
Date: Mon, 22 Sep 2008 19:39:56 +0000
Subject: [PATCH] bad line-kill detection fixed

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

diff --git a/yaz-cleanup b/yaz-cleanup
index 2214564..d44e4cf 100755
--- a/yaz-cleanup
+++ b/yaz-cleanup
@@ -99,7 +99,7 @@ sub edit {
             my $term = $commands{$line}->($line_in);
             last if $term;
         } else {
-            if ($context[3] eq " [LINE KILLED\n]") {
+            if ($context[3] eq " [LINE KILLED]\n") {
                 push @record, "$line\n"
             } else {
                 $record[-1] = "$line\n";
-- 
1.7.2.5