diff --git a/ChangeLog b/ChangeLog
index ee5067074..e13604e09 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2006-10-27  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* UI/Templates/SchedulerUI/UIxCalMainView.wox: specify the type
+	argument (event or task) to newEvent in the appointmentListMenu.
+	Make the appointmentsListView display the appointmentsListMenu.
+
 	* UI/SOGoUI/SOGoAptFormatter.m: enlarge the text size limit from
 	12 to 50 before displaying "...".
 	([SOGoAptFormatter -fullDetailsForApt::]): display location only
diff --git a/UI/Templates/SchedulerUI/UIxCalMainView.wox b/UI/Templates/SchedulerUI/UIxCalMainView.wox
index 9fa47ad2d..57f8d1174 100644
--- a/UI/Templates/SchedulerUI/UIxCalMainView.wox
+++ b/UI/Templates/SchedulerUI/UIxCalMainView.wox
@@ -35,11 +35,11 @@
       <ul>
         <li
           onmousedown="return false;"
-          onmouseup="newEvent(this);"><var:string label:value="New Event..."/></li>
+          onmouseup="newEvent(this, 'event');"><var:string label:value="New Event..."/></li>
         <li class="separator"></li>
         <li
           onmousedown="return false;"
-          onmouseup="newTask(this);"><var:string label:value="New Task..."/></li>
+          onmouseup="newEvent(this, 'task');"><var:string label:value="New Task..."/></li>
         <li
           onmousedown="return false;"
           onmouseup="editEvent();"
@@ -100,6 +100,7 @@
       <var:component className="UIxCalFilterPanel" />
 
       <div id="appointmentsListView"
+        oncontextmenu="return onAppointmentContextMenu(event, this);"
         ><var:component className="UIxCalAptListView"
           /></div>