Fix
authorSebastian Hammer <quinn@indexdata.com>
Tue, 4 Jun 1996 14:56:12 +0000 (14:56 +0000)
committerSebastian Hammer <quinn@indexdata.com>
Tue, 4 Jun 1996 14:56:12 +0000 (14:56 +0000)
index/kdump.c
tab/nwi.flt

index e83f88a..cd094bc 100644 (file)
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: kdump.c,v $
- * Revision 1.9  1996-06-04 14:18:53  quinn
+ * Revision 1.10  1996-06-04 14:56:12  quinn
+ * Fix
+ *
+ * Revision 1.9  1996/06/04  14:18:53  quinn
  * Charmap work
  *
  * Revision 1.8  1996/06/04  10:18:59  adam
@@ -118,7 +121,7 @@ int main (int argc, char **argv)
     prevk.seqno = 0;
 
     prog = *argv;
-    while ((ret = options ("v:", argv, argc, &arg)) != -2)
+    while ((ret = options ("m:v:", argv, argc, &arg)) != -2)
     {
         if (ret == 0)
         {
@@ -166,7 +169,7 @@ int main (int argc, char **argv)
 
            while (*from)
            {
-               char *res = (char*)map->output[(unsigned char) *from];
+               char *res = (char*)map->output[(unsigned char) *(from++)];
                while (*res)
                    *(to++) = *(res++);
            }
@@ -175,7 +178,7 @@ int main (int argc, char **argv)
        else
            strcpy(keybuf, key_string);
         printf ("%7d op=%d s=%-5d %s\n", k.sysno, op, k.seqno,
-                key_string);
+                keybuf);
     }
     if (fclose (inf))
     {
index fdb9fd2..eb3952d 100644 (file)
@@ -1,7 +1,7 @@
 #
 # Input-filter for the Nordic Web Index record syntax. Output is 'gils-like'.
 #
-# $Id: nwi.flt,v 1.2 1996-04-24 13:34:19 quinn Exp $
+# $Id: nwi.flt,v 1.3 1996-06-04 14:56:15 quinn Exp $
 #
 
 BEGIN                            { begin record gils }
@@ -30,12 +30,15 @@ BEGIN                            { begin record gils }
 # Don't want to have <ip> inside of LocalSubjectIndex
 # Since we end localsubjectindex, we consume the end-tag for that as well.
 
-/<ip>[ \n]*/ BODY /<\/ip>[ \n]*<\/lsi>/  {
-                                   end element;
-                                   data -element sampleText $1
-                                }
+#/<ip>[ \n]*/ BODY /<\/ip>[ \n]*<\/lsi>/  {
+#                                  end element;
+#                                  data -element sampleText $1
+#                               }
 
-/<ip>[ \n]*/ BODY /<\/ip>/       { data -element sampleText $1 }
+/<ip>[ \n]*/ BODY /<\/ip>/       {
+                                  end element;
+                                   data -element sampleText $1
+                                }
 
 /<cr>/                           { begin element crossReference }
 /<li> */ BODY /$/                  { data -element linkage $1 }