Index: openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl 12 Dec 2003 15:40:32 -0000 1.3
+++ openacs-4/contrib/packages/simulation/www/siminst/simulation-casting-2.tcl 15 Dec 2003 10:40:49 -0000 1.4
@@ -8,6 +8,7 @@
set context [list [list "." "SimInst"] $page_title]
set package_id [ad_conn package_id]
+
# TODO: only one aplication group per package - need different solution
set group_id [application_group::group_id_from_package_id -package_id $package_id]
set group_name [group::get_element -group_id $group_id -element group_name]
@@ -55,6 +56,8 @@
{user_group:integer(checkbox),multiple,optional
{label "Invite all users in these groups"}
{options $group_options}
+ #TODO: this link should use a function to find the subsite path
+ {help_text {Use Group Administration to add groups}}
}
} -on_submit {
# Convert dates to ANSI format
Index: openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/www/siminst/Attic/simulation-casting-2.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl 12 Dec 2003 15:40:32 -0000 1.3
+++ openacs-4/packages/simulation/www/siminst/simulation-casting-2.tcl 15 Dec 2003 10:40:49 -0000 1.4
@@ -8,6 +8,7 @@
set context [list [list "." "SimInst"] $page_title]
set package_id [ad_conn package_id]
+
# TODO: only one aplication group per package - need different solution
set group_id [application_group::group_id_from_package_id -package_id $package_id]
set group_name [group::get_element -group_id $group_id -element group_name]
@@ -55,6 +56,8 @@
{user_group:integer(checkbox),multiple,optional
{label "Invite all users in these groups"}
{options $group_options}
+ #TODO: this link should use a function to find the subsite path
+ {help_text {Use Group Administration to add groups}}
}
} -on_submit {
# Convert dates to ANSI format