X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=ccl%2Fcclqfile.c;h=f8b2438f711cf545daa16729bf5758d65fd417a7;hp=9e0957a311fead959f5dd38b4bc0fc585ef7771c;hb=33a6eab614ca84eef817f675843e6de820d13708;hpb=45f8f517ebe10930067907c19a56557afd779826

diff --git a/ccl/cclqfile.c b/ccl/cclqfile.c
index 9e0957a..f8b2438 100644
--- a/ccl/cclqfile.c
+++ b/ccl/cclqfile.c
@@ -45,7 +45,10 @@
  * Europagate, 1995
  *
  * $Log: cclqfile.c,v $
- * Revision 1.4  2000-01-31 13:15:21  adam
+ * Revision 1.5  2000-10-17 19:50:28  adam
+ * Implemented and-list and or-list for CCL module.
+ *
+ * Revision 1.4  2000/01/31 13:15:21  adam
  * Removed uses of assert(3). Cleanup of ODR. CCL parser update so
  * that some characters are not surrounded by spaces in resulting term.
  * ILL-code updates.
@@ -127,6 +130,10 @@ void ccl_qual_fitem (CCL_bibset bibset, const char *cp, const char *qual_name)
                 type = CCL_BIB1_STR;
                 if (!ccl_stricmp (qual_value, "pw"))
                     value = CCL_BIB1_STR_WP;
+                if (!ccl_stricmp (qual_value, "al"))
+                    value = CCL_BIB1_STR_AND_LIST;
+                if (!ccl_stricmp (qual_value, "ol"))
+                    value = CCL_BIB1_STR_OR_LIST;
                 break;                
             case 't':
             case 'T':
@@ -143,7 +150,7 @@ void ccl_qual_fitem (CCL_bibset bibset, const char *cp, const char *qual_name)
             case 'c':
             case 'C':
                 type = CCL_BIB1_COM;
-                break;                
+                break;
             default:
                 type = atoi (qual_type);
             }