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 (file)
--- 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 {