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 -N -r1.39.2.12 -r1.39.2.13
--- openacs-4/packages/acs-subsite/tcl/group-procs.tcl	26 Apr 2017 17:01:18 -0000	1.39.2.12
+++ openacs-4/packages/acs-subsite/tcl/group-procs.tcl	12 May 2017 15:50:57 -0000	1.39.2.13
@@ -242,9 +242,11 @@
 
     @return the first group_id of the groups found for that group_name.
 
-    @error
 } {
-    return [util_memoize [list group::get_id_not_cached -group_name $group_name -subsite_id $subsite_id -application_group_id ""]]
+    return [util_memoize [list group::get_id_not_cached \
+                              -group_name $group_name \
+                              -subsite_id $subsite_id \
+                              -application_group_id $application_group_id]]
 }
 
 ad_proc -private group::get_id_not_cached {