From 1e9fab6004a4d35d41314ce4cf059e5427b2b4b6 Mon Sep 17 00:00:00 2001
From: Jason Etheridge <jason@esilibrary.com>
Date: Thu, 30 Oct 2008 17:03:07 +0000
Subject: [PATCH] big cut/paste-o

---
 transform_unicorn_flat_charges.pl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/transform_unicorn_flat_charges.pl b/transform_unicorn_flat_charges.pl
index bcd5cd2..9f53e87 100755
--- a/transform_unicorn_flat_charges.pl
+++ b/transform_unicorn_flat_charges.pl
@@ -43,7 +43,7 @@ while (my $line = <>) {
     if ($line =~ /\.CHRG_DATEDUE\..+\|a(.+)/) {
         $records{ $count }{'CHRG_DATEDUE'} = $1;
     }
-    if ($line =~ /\.CHRG_DATEDUE\..+\|a(.+)/) {
+    if ($line =~ /\.CHRG_DATE_CLMRET\..+\|a(.+)/) {
         $records{ $count }{'CHRG_DATE_CLMRET'} = $1;
     }
 }
-- 
1.7.2.5