Index: openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 22 Apr 2018 19:22:23 -0000 1.18 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 30 Apr 2018 08:51:11 -0000 1.19 @@ -249,7 +249,7 @@ @author Peter Marklund, Dave Bauer } { - # Make sure we have a url to work with + # Make sure we have a URL to work with if { $url eq "" } { if { $node_id eq "" } { set url "/" Index: openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl,v diff -u -r1.53 -r1.54 --- openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl 25 Apr 2018 19:23:26 -0000 1.53 +++ openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl 30 Apr 2018 08:51:11 -0000 1.54 @@ -333,7 +333,7 @@ object_type package_key package_id name pattern_p instance_name node_id parent_id url object_id - @param notrailing If true and the element requested is a url, + @param notrailing If true and the element requested is a URL, then strip any trailing slash ('/'). This means the empty string is returned for the root. Index: openacs-4/packages/acs-subsite/www/admin/relations/add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/relations/add.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/acs-subsite/www/admin/relations/add.tcl 7 Aug 2017 23:47:58 -0000 1.16 +++ openacs-4/packages/acs-subsite/www/admin/relations/add.tcl 30 Apr 2018 08:51:11 -0000 1.17 @@ -87,20 +87,20 @@ -widget hidden } -# Build a url used to create a new party of type object_type_two +# Build a URL used to create a new party of type object_type_two set party_type $object_type_two set party_type_exact_p f set add_to_group_id $group_id set add_with_rel_type $rel_type set add_party_url [export_vars -base [ad_conn package_url]admin/parties/new {add_to_group_id add_with_rel_type party_type party_type_exact_p return_url}] -# Build a url used to select an existing party from the system (as opposed +# Build a URL used to select an existing party from the system (as opposed # to limiting the selection to parties on the current subsite). set saved_allow_out_of_scope_p $allow_out_of_scope_p set allow_out_of_scope_p t set add_out_of_scope_url [export_vars -base [ad_conn url] $export_var_list] -# Build a url used to select an existing party from the current subsite +# Build a URL used to select an existing party from the current subsite set allow_out_of_scope_p f set add_in_scope_url [export_vars -base [ad_conn url] $export_var_list]