From: Zdeněk Salvet <salvet@ics.muni.cz>
Date: Fri, 17 Feb 2006 12:28:14 +0000 (+0000)
Subject: Do not purge job from LB proxy prematurely while cancelling.
X-Git-Tag: glite-lb-server_R_1_3_6~7
X-Git-Url: http://scientific.zcu.cz/git/?a=commitdiff_plain;h=902f78ae953867838bd669728f0d8d0cd6ac0aae;p=jra1mw.git

Do not purge job from LB proxy prematurely while cancelling.
---

diff --git a/org.glite.lb.server/src/db_store.c b/org.glite.lb.server/src/db_store.c
index e021ba3..13a56fd 100644
--- a/org.glite.lb.server/src/db_store.c
+++ b/org.glite.lb.server/src/db_store.c
@@ -89,9 +89,12 @@ db_store(edg_wll_Context ctx,char *ucs, char *event)
 	switch ( ev->any.type ) {
 	case EDG_WLL_EVENT_CLEAR:
 	case EDG_WLL_EVENT_ABORT:
-	case EDG_WLL_EVENT_CANCEL:
 		edg_wll_PurgeServerProxy(ctx, ev->any.jobId);
 		break;
+	case EDG_WLL_EVENT_CANCEL:
+		if (ev->cancel.status_code == EDG_WLL_CANCEL_DONE) 
+			edg_wll_PurgeServerProxy(ctx, ev->any.jobId);
+		break;
 	default: break;
 	}
   } else {