X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=recctrl%2Fmarcread.c;h=dac48d09e8e435fb90774cacefd5094761194bbe;hb=221024eb6b10e45d6479bb4154dd7de7fca1d477;hp=2efa90df26342d64ced0a6271d187cf1ebd45915;hpb=572c7a6871dba771a900949b612762442abe46ff;p=idzebra-moved-to-github.git

diff --git a/recctrl/marcread.c b/recctrl/marcread.c
index 2efa90d..dac48d0 100644
--- a/recctrl/marcread.c
+++ b/recctrl/marcread.c
@@ -4,7 +4,13 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: marcread.c,v $
- * Revision 1.3  1997-09-24 13:36:51  adam
+ * Revision 1.5  1997-11-18 10:03:24  adam
+ * Member num_children removed from data1_node.
+ *
+ * Revision 1.4  1997/10/27 14:34:26  adam
+ * Fixed bug - data1 root node wasn't tagged at all!
+ *
+ * Revision 1.3  1997/09/24 13:36:51  adam
  * *** empty log message ***
  *
  * Revision 1.2  1997/09/17 12:19:21  adam
@@ -39,7 +45,6 @@ data1_node *data1_mk_node_wp (data1_handle dh, NMEM mem, data1_node *parent)
             parent->child = parent->last_child = res;
         else
             parent->last_child->next = res;
-        parent->num_children++;
         parent->last_child = res;
     }
     return res;
@@ -158,6 +163,7 @@ data1_node *grs_read_marc (struct grs_read_info *p)
         return NULL;
     }
     res_root = data1_mk_node_wp (p->dh, p->mem, NULL);
+    res_root->which = DATA1N_root;
     res_root->u.root.type = nmem_malloc (p->mem, strlen(absynName)+1);
     strcpy (res_root->u.root.type, absynName);
     res_root->u.root.absyn = absyn;