X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=kernel%2Fpersist.c;h=bea7f4b3f73196c3979d990a135f20950fe5b4f4;hb=7b58e36bc4c5a57dec46408bbfb3707638dd967a;hp=8daeaca592c77f504631df40e1ce5dff6e9e70ad;hpb=aa975e8f85af258357639e3407ce40090f4a4998;p=egate.git

diff --git a/kernel/persist.c b/kernel/persist.c
index 8daeaca..bea7f4b 100644
--- a/kernel/persist.c
+++ b/kernel/persist.c
@@ -45,7 +45,10 @@
  * Europagate, 1995
  *
  * $Log: persist.c,v $
- * Revision 1.9  1995/05/19 13:26:00  adam
+ * Revision 1.10  1995/07/20 08:16:38  adam
+ * Bug fix in persist.c: Double referenced result-sets weren't recovered.
+ *
+ * Revision 1.9  1995/05/19  13:26:00  adam
  * Bug fixes. Better command line options.
  *
  * Revision 1.8  1995/05/16  09:40:43  adam
@@ -105,7 +108,8 @@ static int set_change;
 static int obtain_set (ZASS zass, struct gw_user_set *set)
 {
     const struct zass_searchent *p;
-
+    
+    gw_log (GW_LOG_DEBUG, KERNEL_LOG, "Set %s must be obtained", set->name);
     p = zass_search (zass, set->rpn, set->name, set->database, NULL);
     if (!p)
         return 2;
@@ -151,6 +155,7 @@ static int obtain_sets (ZASS zass, struct ccl_rpn_node *rpn,
 	    return 0;
         }
     }
+    obtain_sets (zass, set->rpn, sets);
     return obtain_set (zass, set);
 }