Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -N -r1.234.2.9 -r1.234.2.10
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	24 Nov 2020 15:36:42 -0000	1.234.2.9
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	24 Nov 2020 15:40:11 -0000	1.234.2.10
@@ -1258,7 +1258,7 @@
     } {
         set validation [dotlrn_community::validate_community_key \
                             -community_key $community_key \
-                            -parent_id $parent_id]
+                            -parent_community_id $parent_community_id]
         set valid_p [dict get $validation valid_p]
         if {$complain_if_invalid_p && !$valid_p} {
             set errmsg [dict get $validation errmsg]