Monotone-Parent: 844f1f631a8e5c8bd991267dca0d6ec51a256f21

Monotone-Revision: 98c8c424b0d9a989a81434f86821544066552105

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2006-08-30T22:59:03
Monotone-Branch: ca.inverse.sogo

UI/Scheduler/UIxCalDayTable.m

@@ -161,6 +161,14 @@
   return currentTableDay;
 }
 
+- (NSString *) currentAppointmentDay
+{
+  return [NSString stringWithFormat: @"%d%.2d%.2d",
+                   [currentTableDay yearOfCommonEra],
+                   [currentTableDay monthOfYear],
+                   [currentTableDay dayOfMonth]];
+}
+
 - (void) setCurrentTableHour: (NSString *) aTableHour
 {
   currentTableHour = aTableHour;
@@ -171,6 +179,11 @@
   return currentTableHour;
 }
 
+- (NSString *) currentAppointmentHour
+{
+  return [NSString stringWithFormat: @"%.2d00", [currentTableHour intValue]];
+}
+
 - (NSString *) labelForDay
 {
   return [NSString stringWithFormat: @"%@ %@",