Index: openacs-4/packages/acs-subsite/tcl/group-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-procs.tcl,v diff -u -r1.60.2.9 -r1.60.2.10 --- openacs-4/packages/acs-subsite/tcl/group-procs.tcl 25 Aug 2020 13:38:12 -0000 1.60.2.9 +++ openacs-4/packages/acs-subsite/tcl/group-procs.tcl 28 Aug 2020 16:45:59 -0000 1.60.2.10 @@ -138,6 +138,12 @@ if {$pretty_name ne ""} { db_dml title_update "update acs_objects set title = :pretty_name where object_id = :group_id" } + + # Make sure the resolving of group id by name has a chance to + # include this new group + util_memoize_flush_pattern [list group::get_id_not_cached \ + -group_name $group_name]* + return $group_id }