From 8a4ae2667c1cfc7b9f3ef5dfbae1a62573c7ab90 Mon Sep 17 00:00:00 2001
From: Sebastian Hammer <quinn@indexdata.com>
Date: Mon, 25 Mar 1996 10:18:03 +0000
Subject: [PATCH] Removed trailing whitespace from data elements

---
 retrieval/d1_marc.c |    8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/retrieval/d1_marc.c b/retrieval/d1_marc.c
index 67329ed..4957bfb 100644
--- a/retrieval/d1_marc.c
+++ b/retrieval/d1_marc.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: d1_marc.c,v $
- * Revision 1.3  1995-11-01 16:34:57  quinn
+ * Revision 1.4  1996-03-25 10:18:03  quinn
+ * Removed trailing whitespace from data elements
+ *
+ * Revision 1.3  1995/11/01  16:34:57  quinn
  * Making data1 look for tables in data1_tabpath
  *
  * Revision 1.2  1995/11/01  13:54:48  quinn
@@ -20,6 +23,7 @@
 #include <assert.h>
 #include <stdlib.h>
 #include <string.h>
+#include <ctype.h>
 
 #include <oid.h>
 #include <log.h>
@@ -145,6 +149,8 @@ static char *get_data(data1_node *n, int *len)
     }
 
     *len = n->u.data.len;
+    while (*len && isspace(n->u.data.data[*len - 1]))
+	(*len)--;
     return n->u.data.data;
 }
 
-- 
1.7.10.4