From: Adam Dickmeiss <adam@indexdata.dk>
Date: Wed, 2 Feb 2005 20:26:44 +0000 (+0000)
Subject: Fixed bug #262: spaces in control fields in MARC returned
X-Git-Tag: ZEBRA.1.3.24~4
X-Git-Url: http://git.indexdata.com/?a=commitdiff_plain;h=f23860f1b4a89fc886b235fef218773787a173af;p=idzebra-moved-to-github.git

Fixed bug #262: spaces in control fields in MARC returned
---

diff --git a/data1/d1_marc.c b/data1/d1_marc.c
index 5117cfd..db83f2d 100644
--- a/data1/d1_marc.c
+++ b/data1/d1_marc.c
@@ -1,4 +1,4 @@
-/* $Id: d1_marc.c,v 1.6.2.3 2005-02-02 08:03:40 adam Exp $
+/* $Id: d1_marc.c,v 1.6.2.4 2005-02-02 20:26:44 adam Exp $
    Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003
    Index Data Aps
 
@@ -317,7 +317,7 @@ static int nodetomarc(data1_handle dh,
         {
             if (!control_field)
                 len += p->identifier_length;
-	    get_data(subf, &dlen, 1);
+	    get_data(subf, &dlen, control_field ? 0 : 1);
             len += dlen;
         }
     }
@@ -434,7 +434,7 @@ static int nodetomarc(data1_handle dh,
                 memcpy (op + data_p+1, identifier, p->identifier_length-1);
                 data_p += p->identifier_length;
             }
-	    data = get_data(subf, &dlen, 1);
+	    data = get_data(subf, &dlen, control_field ? 0 : 1);
             memcpy (op + data_p, data, dlen);
             data_p += dlen;
         }