Disable X-Path indexing for explain records (in the case where
[idzebra-moved-to-github.git] / data1 / d1_read.c
index 706907b..c9d92b6 100644 (file)
@@ -1,4 +1,4 @@
-/* $Id: d1_read.c,v 1.16 2005-04-23 16:30:58 adam Exp $
+/* $Id: d1_read.c,v 1.19 2006-06-13 12:02:02 adam Exp $
    Copyright (C) 1995-2005
    Index Data ApS
 
@@ -188,7 +188,7 @@ void data1_free_tree (data1_handle dh, data1_node *t)
 
 data1_node *data1_mk_root (data1_handle dh, NMEM nmem, const char *name)
 {
-    data1_absyn *absyn = data1_get_absyn (dh, name);
+    data1_absyn *absyn = data1_get_absyn(dh, name, 1);
     data1_node *res;
     if (!absyn)
     {
@@ -205,7 +205,8 @@ data1_node *data1_mk_root (data1_handle dh, NMEM nmem, const char *name)
 void data1_set_root(data1_handle dh, data1_node *res,
                     NMEM nmem, const char *name)
 {
-    data1_absyn *absyn = data1_get_absyn (dh, name);
+    data1_absyn *absyn = data1_get_absyn(
+        dh, name, DATA1_XPATH_INDEXING_ENABLE);
 
     res->u.root.type = data1_insert_string (dh, res, nmem, name);
     res->u.root.absyn = absyn;
@@ -865,7 +866,6 @@ data1_node *data1_read_nodex (data1_handle dh, NMEM m,
                const char *type = xattr->next->name;
                const char *value = xattr->next->name;
                data1_vartype *tp;
-               int val_offset;
                
                yaz_log(YLOG_LOG, "Variant class=%s type=%s value=%s",
                        tclass, type, value);
@@ -1179,3 +1179,11 @@ void data1_concat_text(data1_handle dh, NMEM m, data1_node *n)
         data1_concat_text(dh, m, n->child);
     }
 }
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+