From 37f2d5dfd36004976971507f14104f3030774814 Mon Sep 17 00:00:00 2001
From: wolfgang <wolfgang@d1b88da0-ebda-0310-925b-ed51d893ca5b>
Date: Sun, 4 Nov 2007 17:31:49 +0000
Subject: [PATCH] git-svn-id:
 http://svn.opengroupware.org/SOGo/inverse/trunk@1228
 d1b88da0-ebda-0310-925b-ed51d893ca5b

---
 ChangeLog                           | 5 +++++
 UI/Scheduler/UIxAppointmentEditor.m | 6 ++++++
 2 files changed, 11 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index b865d14f..e4391795 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-03  Ludovic Marcotte  <ludovic@inverse.ca>
+
+	* UI/Scheduler/UIxAppointmentEditor.m
+	Fixed monthly recurrences support. 
+
 2007-11-01  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* SoObjects/Appointments/SOGoAppointmentObject.m
diff --git a/UI/Scheduler/UIxAppointmentEditor.m b/UI/Scheduler/UIxAppointmentEditor.m
index de4e0c47..17860371 100644
--- a/UI/Scheduler/UIxAppointmentEditor.m
+++ b/UI/Scheduler/UIxAppointmentEditor.m
@@ -426,6 +426,12 @@
 			       |iCalWeekDayFriday)];
 	  [rule setFrequency: iCalRecurrenceFrequenceDaily];
 	}
+      else if ([repeat caseInsensitiveCompare: @"MONTHLY"] == NSOrderedSame)
+	{
+	  [rule setNamedValue: @"bymonthday"
+		to: [NSString stringWithFormat: @"%d", [aptStartDate dayOfMonth]]];
+	  [rule setFrequency: iCalRecurrenceFrequenceMonthly];
+	}
       else
 	[rule setFrequency:
 		(iCalRecurrenceFrequency) [rule valueForFrequency: repeat]];
-- 
2.39.5