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.7 -r1.8
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	9 Oct 2001 14:35:58 -0000	1.7
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	9 Oct 2001 15:49:17 -0000	1.8
@@ -232,6 +232,15 @@
     } {
 	return [db_string select_package_id {} -default ""]
     }
+
+    ad_proc -public get_applet_package_id {
+	community_id
+	applet_key
+    } {
+	get the package ID for a particular community
+    } {
+	return [db_string select_package_id {} -default ""]
+    }
     
     ad_proc -public add_applet {
 	community_id