From ccadb31c21e5fee9712dfc5933c93747e2fe30f6 Mon Sep 17 00:00:00 2001
From: Galen Charlton <gmcharlt@gmail.com>
Date: Wed, 29 Sep 2010 18:18:16 -0400
Subject: [PATCH] bug 4084: remove \r from header line for sake of consistency

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
---
 offline_circ/process_koc.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/offline_circ/process_koc.pl b/offline_circ/process_koc.pl
index 5655f0c570..7da7c9d480 100755
--- a/offline_circ/process_koc.pl
+++ b/offline_circ/process_koc.pl
@@ -176,6 +176,7 @@ returns a hashref containing the information from the header.
 sub parse_header_line {
     my $header_line = shift;
     chomp($header_line);
+    $header_line =~ s/\r//g;
 
     my @fields = split( /\t/, $header_line );
     my %header_info = map { split( /=/, $_ ) } @fields;
-- 
2.39.5