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 -N -r1.8 -r1.9 --- openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 29 Aug 2008 17:25:01 -0000 1.8 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 29 Jan 2009 00:37:20 -0000 1.9 @@ -253,7 +253,7 @@ {-node_id ""} } { Starting with the node at with given id, or at given url, - climb up the site map and return the group_id of the first + climb up the site map and return the node of the first non null application group Will ignore itself and only return true ancestors @@ -264,7 +264,7 @@ @param node_id The id of the node to start from. Takes precedence over any provided url. - @return The id of the application group + @return The node of the first non-null application group in array get format. @author Peter Marklund, Dave Bauer } { @@ -308,4 +308,4 @@ } } return $group_list -} \ No newline at end of file +}