See ChangeLog

Monotone-Parent: c4a5b31204ccd4c09e85262d9b5609b788a8380a
Monotone-Revision: 9057f51730136ddbcf1d8e64c8029ea9a4e6c991

Monotone-Author: flachapelle@inverse.ca
Monotone-Date: 2009-04-22T21:02:11
Monotone-Branch: ca.inverse.sogo

UI/Scheduler/UIxAppointmentEditor.m

@@ -34,9 +34,11 @@
 #import <NGObjWeb/NSException+HTTP.h>
 #import <NGExtensions/NSCalendarDate+misc.h>
 
+#import <NGCards/iCalAlarm.h>
 #import <NGCards/iCalCalendar.h>
 #import <NGCards/iCalEvent.h>
 #import <NGCards/iCalPerson.h>
+#import <NGCards/iCalTrigger.h>
 #import <NGCards/iCalRecurrenceRule.h>
 
 #import <SoObjects/SOGo/NSDictionary+Utilities.h>
@@ -394,6 +396,7 @@
   SOGoUser *user;
   SOGoCalendarComponent *co;
   iCalEvent *master;
+  BOOL resetAlarm;
   signed int daylightOffset;
 
   [self event];
@@ -406,6 +409,19 @@
   [eventDate setTimeZone: timeZone];
   co = [self clientObject];
   
+  resetAlarm = [[[context request] formValueForKey: @"resetAlarm"] boolValue];
+  if (resetAlarm && [event hasAlarms] && ![event hasRecurrenceRules])
+    {
+      iCalAlarm *anAlarm;
+      iCalTrigger *aTrigger;
+
+      anAlarm = [[event alarms] objectAtIndex: 0];
+      aTrigger = [anAlarm trigger];
+      [aTrigger setValue: 0 ofAttribute: @"x-webstatus" to: @"triggered"];
+
+      [co saveComponent: event];
+    }
+
   if ([co isNew] && [co isKindOfClass: [SOGoAppointmentOccurence class]])
     {
       // This is a new exception in a recurrent event -- compute the daylight
@@ -421,6 +437,7 @@
 	}
     }
   data = [NSDictionary dictionaryWithObjectsAndKeys:
+		       [event tag], @"component",
 		       [dateFormatter formattedDate: eventDate], @"startDate",
 		       [dateFormatter formattedTime: eventDate], @"startTime",
 		       ([event hasRecurrenceRules]? @"1": @"0"), @"isReccurent",