X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=retrieval%2Fd1_marc.c;h=bb054acefbba743dd7643a9715508f4aa1546f76;hp=fc0127ae35fb89c790570886b0626cab489ed2c4;hb=0edfdd01ae95aa2770f2e122bdea25208494acbd;hpb=a0ff2572c63e4be9254b12d08b0166b6232477de

diff --git a/retrieval/d1_marc.c b/retrieval/d1_marc.c
index fc0127a..bb054ac 100644
--- a/retrieval/d1_marc.c
+++ b/retrieval/d1_marc.c
@@ -3,7 +3,7 @@
  * See the file LICENSE for details.
  * Sebastian Hammer, Adam Dickmeiss
  *
- * $Id: d1_marc.c,v 1.20 2002-07-03 14:09:34 adam Exp $
+ * $Id: d1_marc.c,v 1.21 2002-07-25 12:52:53 adam Exp $
  */
 
 
@@ -144,6 +144,7 @@ data1_marctab *data1_read_marctab (data1_handle dh, const char *file)
     return res;
 }
 
+
 /*
  * Locate some data under this node. This routine should handle variants
  * prettily.
@@ -151,21 +152,30 @@ data1_marctab *data1_read_marctab (data1_handle dh, const char *file)
 static char *get_data(data1_node *n, int *len)
 {
     char *r;
+    data1_node *np = 0;
 
-    while (n->which != DATA1N_data && n->child)
-	n = n->child;
-    if (n->which != DATA1N_data || 
-	(n->u.data.what != DATA1I_text && n->u.data.what != DATA1I_num))
+    while (n)
     {
-	r = "[Structured/included data]";
-	*len = strlen(r);
-	return r;
+        if (n->which == DATA1N_data)
+        {
+            *len = n->u.data.len;
+            while (*len && d1_isspace(n->u.data.data[*len - 1]))
+                (*len)--;
+            if (*len != 0)
+                return n->u.data.data;
+        }
+        if (n->which == DATA1N_tag)
+            np = n->child;
+        n = n->next;
+        if (!n)
+        {
+            n = np;
+            np = 0;
+        }
     }
-
-    *len = n->u.data.len;
-    while (*len && d1_isspace(n->u.data.data[*len - 1]))
-	(*len)--;
-    return n->u.data.data;
+    r = "";
+    *len = strlen(r);
+    return r;
 }
 
 static void memint (char *p, int val, int len)