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.7 -r1.8
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	27 Nov 2001 21:17:07 -0000	1.7
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	29 Nov 2001 04:46:01 -0000	1.8
@@ -48,7 +48,7 @@
 	set package_id [dotlrn::instantiate_and_mount $community_id $package_key]
 
 	# first get the community name from dotlrn
-	set community_name "The [dotlrn_community::get_community_name] Calendar"
+	set community_name "The [dotlrn_community::get_community_name $community_id] Calendar"
 	
 	# create a community calendar, the "f" is for a public calendar
 	set group_calendar_id \
@@ -97,7 +97,7 @@
 
 	# create a private calendar for the user
 	set community_name \
-		"Your Calendar for [dotlrn_community::get_community_name]"
+		"Your Calendar for [dotlrn_community::get_community_name $community_id]"
 
 	# temporary hack by ben to make calendar unique (FIXME)
 	set calendar_id [calendar_create $user_id "t" "$community_name-$user_id"]