Index: openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl 11 Dec 2018 14:14:41 -0000 1.12 +++ openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl 24 Jun 2019 07:27:58 -0000 1.13 @@ -44,8 +44,8 @@
Example:
- # create a new group of type user_discount_class - set group_type [group_type::new -group_type $group_type \ + # create a new group type user_discount_class + set group_type [group_type::new -group_type user_discount_class \ -supertype group \ "User Discount Class" "User Discount Classes"]