Changes in the reading of qualifier(s). New function: ccl_qual_fitem.

[egate.git] / ccl / cclqual.c

diff --git a/ccl/cclqual.c b/ccl/cclqual.c
index 117702d..857a17c 100644 (file)
--- a/ccl/cclqual.c
+++ b/ccl/cclqual.c
@@ -2,7 +2,12 @@
  * Europagate, 1995
  *
  * $Log: cclqual.c,v $
- * Revision 1.7  1995/04/17 09:31:46  adam
+ * Revision 1.8  1995/05/11 14:03:57  adam
+ * Changes in the reading of qualifier(s). New function: ccl_qual_fitem.
+ * New variable ccl_case_sensitive, which controls whether reserved
+ * words and field names are case sensitive or not.
+ *
+ * Revision 1.7  1995/04/17  09:31:46  adam
  * Improved handling of qualifiers. Aliases or reserved words.
  *
  * Revision 1.6  1995/02/23  08:32:00  adam
@@ -138,8 +143,17 @@ struct ccl_rpn_attr *ccl_qual_search (CCL_bibset b, const char *name, int len)
 
     assert (b);
     for (q = b->list; q; q = q->next)
-        if (strlen(q->name) == len && !memcmp (name, q->name, len))
-            return q->attr_list;
+        if (strlen(q->name) == len)
+            if (ccl_case_sensitive)
+            {
+                if (!memcmp (name, q->name, len))
+                    return q->attr_list;
+            }
+            else
+            {
+                if (!ccl_memicmp (name, q->name, len))
+                    return q->attr_list;
+            }
     return NULL;
 }