Monotone-Parent: e925d76ce1929b1801949335cf3b1290dc53eb6d

Monotone-Revision: 80a7086535e9b75220e60a4b2b107111c3997ffb

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-08-15T20:34:11
Monotone-Branch: ca.inverse.sogo

UI/MailerUI/UIxMailView.m

@@ -187,6 +187,11 @@ static NSString *mailETag = nil;
   return NO;
 }
 
+- (BOOL) mailIsDraft
+{
+  return [[self clientObject] isInDraftsFolder];
+}
+
 - (id) redirectToParentFolder
 {
   id url;