Index: openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl,v
diff -u -r1.31 -r1.32
--- openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	5 Nov 2003 18:03:10 -0000	1.31
+++ openacs-4/packages/calendar-portlet/www/calendar-full-portlet.tcl	18 Feb 2004 23:26:07 -0000	1.32
@@ -57,7 +57,7 @@
 }
 
 if {[llength $list_of_calendar_ids] > 1} {
-    set force_calendar_id [calendar_have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
+    set force_calendar_id [calendar::have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
 } else {
     set force_calendar_id [lindex $list_of_calendar_ids 0]
 }
Index: openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl	5 Nov 2003 18:03:10 -0000	1.6
+++ openacs-4/packages/calendar-portlet/www/calendar-list-portlet.tcl	18 Feb 2004 23:26:07 -0000	1.7
@@ -55,7 +55,7 @@
 }
 
 if {[llength $list_of_calendar_ids] > 1} {
-    set force_calendar_id [calendar_have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
+    set force_calendar_id [calendar::have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
 } else {
     set force_calendar_id [lindex $list_of_calendar_ids 0]
 }
Index: openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl	5 Nov 2003 18:03:10 -0000	1.26
+++ openacs-4/packages/calendar-portlet/www/calendar-portlet.tcl	18 Feb 2004 23:26:07 -0000	1.27
@@ -54,7 +54,7 @@
 }
 
 if {[llength $list_of_calendar_ids] > 1} {
-    set force_calendar_id [calendar_have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
+    set force_calendar_id [calendar::have_private_p -return_id 1 -calendar_id_list $list_of_calendar_ids [ad_conn user_id]]
 } else {
     set force_calendar_id [lindex $list_of_calendar_ids 0]
 }
Index: openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl,v
diff -u -r1.71 -r1.72
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	27 Nov 2003 10:32:05 -0000	1.71
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	18 Feb 2004 23:26:54 -0000	1.72
@@ -272,7 +272,7 @@
         user if they don't have one, and add both calendar portlets
         to the user's portal
     } {
-        set calendar_id [calendar_have_private_p -return_id 1 $user_id]
+        set calendar_id [calendar::have_private_p -return_id 1 $user_id]
         
         if {$calendar_id == 0} {
             # HERE we need to find the package ID for the calendar instance at the top level