From 0c88a5e1fc983f0bb653e26a6eac72dadf35db57 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Wed, 13 Mar 2002 11:47:23 +0000
Subject: [PATCH] *** empty log message ***

---
 CHANGELOG     |    2 ++
 ccl/cclfind.c |    4 ++--
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/CHANGELOG b/CHANGELOG
index edc9267..eb62b20 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -2,6 +2,8 @@ Possible compatibility problems with earlier versions marked with '*'.
 
 --- 1.8.6 2002/MM/DD
 
+Fix bug in CCL parser when form "field = - <number>" was used.
+
 Added function yaz_marc_decode that decodes MARC for line mode
 display or XML.
 
diff --git a/ccl/cclfind.c b/ccl/cclfind.c
index a7d19b5..0708319 100644
--- a/ccl/cclfind.c
+++ b/ccl/cclfind.c
@@ -44,7 +44,7 @@
 /* CCL find (to rpn conversion)
  * Europagate, 1995
  *
- * $Id: cclfind.c,v 1.27 2001-11-27 22:38:50 adam Exp $
+ * $Id: cclfind.c,v 1.28 2002-03-13 11:47:23 adam Exp $
  *
  * Old Europagate log:
  *
@@ -592,7 +592,7 @@ static struct ccl_rpn_node *qualifiers2 (CCL_parser cclp,
             }
         }
         else if (cclp->look_token->len == 1 &&
-                 cclp->look_token->name[0] == '"')   /* = - term  ? */
+                 cclp->look_token->name[0] == '-')   /* = - term  ? */
         {
             ADVANCE;
             if (!(p = search_term (cclp, ap)))
-- 
1.7.10.4