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.1 -r1.2
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	26 Oct 2001 16:20:55 -0000	1.1
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	26 Oct 2001 17:26:52 -0000	1.2
@@ -95,7 +95,7 @@
 	set community_name "Your Calendar for "
 	append community_name [db_exec_plsql get_community_name "
 	begin
-	:1 := dotlrn_community.name(:node_id);
+	:1 := dotlrn_community.name(:community_id);
 	end;"]
 
 	set calendar_id [calendar_create $user_id "t" $community_name]