Index: openacs-4/packages/calendar/tcl/calendar-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/calendar-procs.tcl,v
diff -u -r1.24 -r1.24.2.1
--- openacs-4/packages/calendar/tcl/calendar-procs.tcl	25 Feb 2004 13:07:07 -0000	1.24
+++ openacs-4/packages/calendar/tcl/calendar-procs.tcl	3 May 2004 10:59:16 -0000	1.24.2.1
@@ -152,7 +152,7 @@
 ad_proc -public calendar::have_private_p { 
     {-return_id 0} 
     {-calendar_id_list {}}
-    party_id 
+    {-party_id party_id }
 } {
     check to see if ther user have a private calendar
     if -return_id is 1, then proc will return the calendar_id