Monotone-Parent: cbe26077e3038a934e225a1903e28b89cf90c61d

Monotone-Revision: cbef49b9665bb4860d576825ae411fd212ee0d08

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2012-03-20T18:47:05
Monotone-Branch: ca.inverse.sogo

OpenChange/NSDate+MAPIStore.m

@@ -114,4 +114,17 @@ _setupRefDate ()
   return timeValue;
 }
 
+- (BOOL) isNever /* occurs on 4500-12-31 */
+{
+  NSCalendarDate *calDate;
+
+  if ([self isKindOfClass: [NSCalendarDate class]])
+    calDate = (NSCalendarDate *) self;
+  else
+    calDate = [NSCalendarDate dateWithTimeIntervalSince1970:
+                                [self timeIntervalSince1970]];
+
+  return [calDate yearOfCommonEra] == 4500;
+}
+
 @end