Changeset 1467

Timestamp:

2000-08-28T16:11:00+12:00 (24 years ago)

Author:

dmm9

Message:

pre-Christian date support

Location:

trunk/gsdl

Files:

• perllib/DateExtract.pm (modified) (1 diff)
• src/recpt/querytools.cpp (modified) (3 diffs)

trunk/gsdl/perllib/DateExtract.pm

@@ -153 +153 @@
     foreach $date (@datelist)
     {
-        $doc->add_metadata($cursection,"Coverage",$date);
+        if($date>0){
+        $doc->add_metadata($cursection,"Coverage",$date);}
+        else{
+        $doc->add_metadata($cursection,"Coverage","bc".(-1*$date));}
+        
     }
     }

trunk/gsdl/src/recpt/querytools.cpp

@@ -263 +263 @@
      {
        querystring.appendcstr(" [");
-       querystring.appendint(startdate);
+       if(startdate<0)
+         {
+           querystring.appendcstr("bc");
+           querystring.appendint((startdate*-1));
+         }
+       else 
+         querystring.appendint(startdate);
        querystring.appendcstr("]:Coverage");
      }
@@ -273 +279 @@
          if(nextdate!=0)
            {
-          querystring.appendcstr(" [");
-          querystring.appendint(nextdate);
-          querystring.appendcstr("]:Coverage");
+         querystring.appendcstr(" [");
+         if(nextdate<0)
+           {
+             querystring.appendcstr("bc");
+             querystring.appendint((nextdate*-1));
+           }
+         else 
+           querystring.appendint(nextdate);
+         querystring.appendcstr("]:Coverage");
            }
          nextdate++;
@@ -282 +294 @@
        }
     }
-}
+
+}
+
 void get_phrases (const text_t &querystring, text_tarray &phrases) {