X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=dict%2Fdelete.c;h=d65efaa07fa8e71584c22420d87bbe12cd53d8b5;hb=6c820cde24f590dcb4d88842af0f4a246a9e7c71;hp=4ede1137ca6c89a8ca238ecca4f33eafca0374b0;hpb=e39158d4c6147865c129d2524f1b910e4e7921ed;p=idzebra-moved-to-github.git

diff --git a/dict/delete.c b/dict/delete.c
index 4ede113..d65efaa 100644
--- a/dict/delete.c
+++ b/dict/delete.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: delete.c,v $
- * Revision 1.1  1995-12-06 14:52:21  adam
+ * Revision 1.2  1995-12-06 17:48:30  adam
+ * Bug fix: delete didn't work.
+ *
+ * Revision 1.1  1995/12/06  14:52:21  adam
  * New function: dict_delete.
  *
  */
@@ -41,6 +44,7 @@ static int dict_del (Dict dict, const Dict_char *str)
             cmp = dict_strcmp((Dict_char*) info, str);
             if (!cmp)
             {
+                hi = DICT_nodir(p)-1;
                 while (mid < hi)
                 {
                     indxp[-mid] = indxp[-mid-1];