From 886253fb90810e512cacf4f02694645ead7a22e0 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Thu, 21 Mar 2002 23:06:36 +0000
Subject: [PATCH] Source 'tag' in abs-file

---
 recctrl/recgrs.c |   10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/recctrl/recgrs.c b/recctrl/recgrs.c
index 57b144b..ea2dff0 100644
--- a/recctrl/recgrs.c
+++ b/recctrl/recgrs.c
@@ -3,7 +3,10 @@
  * All rights reserved.
  *
  * $Log: recgrs.c,v $
- * Revision 1.42  2002-02-20 17:30:01  adam
+ * Revision 1.43  2002-03-21 23:06:36  adam
+ * Source 'tag' in abs-file
+ *
+ * Revision 1.42  2002/02/20 17:30:01  adam
  * Work on new API. Locking system re-implemented
  *
  * Revision 1.41  2001/05/22 21:01:47  adam
@@ -348,6 +351,11 @@ static void index_tag (data1_node *par, data1_node *n,
 	    wrd->string = n->u.data.data;
 	    wrd->length = n->u.data.len;
 	}
+	else if (!strcmp (tlist->source, "tag") && n->which == DATA1N_tag)
+        {
+	    wrd->string = n->u.tag.tag;
+	    wrd->length = strlen(n->u.tag.tag);
+	}
 	else if (sscanf (tlist->source, "attr(%511[^)])", xattr) == 1 &&
 	    n->which == DATA1N_tag)
 	{
-- 
1.7.10.4