Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -r1.169.2.2 -r1.169.2.3 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 20 Mar 2003 10:33:22 -0000 1.169.2.2 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 20 Mar 2003 11:27:21 -0000 1.169.2.3 @@ -145,7 +145,7 @@ } { get the type's package_id } { - db_string select_package_id {} + return [db_string select_package_id {}] } ad_proc -public get_type_node_id { Index: openacs-4/packages/dotlrn/tcl/community-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v diff -u -r1.78.2.1 -r1.78.2.2 --- openacs-4/packages/dotlrn/tcl/community-procs.xql 17 Oct 2002 12:23:12 -0000 1.78.2.1 +++ openacs-4/packages/dotlrn/tcl/community-procs.xql 20 Mar 2003 11:27:22 -0000 1.78.2.2 @@ -579,4 +579,12 @@ + + + select package_id + from dotlrn_community_types + where community_type = :community_type + + +