Index: openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl	23 Jan 2002 05:09:37 -0000	1.2
+++ openacs-4/packages/calendar-portlet/tcl/calendar-admin-portlet-procs.tcl	25 Feb 2002 19:51:38 -0000	1.3
@@ -81,7 +81,7 @@
 			[portal::get_element_param $element_id "calendar_id"]
 		
 		set g_cal_id \
-			[portal::get_element_param $element_id "group_calendar_id"]
+			[portal::get_element_param $element_id "calendar_id"]
 
 		# don't delete the public calendar!
 		if {[calendar_public_p $calendar_id] == "f"} {