Monotone-Parent: cb5283601b9539bb382aa64a739bf758b9e2ac7f

Monotone-Revision: e064a5558d641325b03001de47cede6db61eed32

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2011-10-03T20:55:02
Monotone-Branch: ca.inverse.sogo

OpenChange/MAPIStoreDraftsMessage.m

@@ -33,6 +33,7 @@
 #import <NGObjWeb/WOContext+SoObjects.h>
 
 #import "MAPIStoreContext.h"
+#import "MAPIStoreMapping.h"
 #import "MAPIStoreTypes.h"
 #import "NSData+MAPIStore.h"
 #import "NSObject+MAPIStore.h"
@@ -572,6 +573,7 @@ e)
 {
   NSString *msgClass;
   NSException *error;
+  MAPIStoreMapping *mapping;
 
   msgClass = [newProperties
                    objectForKey: MAPIPropertyKey (PR_MESSAGE_CLASS_UNICODE)];
@@ -584,6 +586,9 @@ e)
     }
   else
     [self logWithFormat: @"ignored scheduling message"];
+
+  mapping = [[self context] mapping];
+  [mapping unregisterURLWithID: [self objectId]];
 }
 
 - (int) submitWithFlags: (enum SubmitFlags) flags