Index: openacs-4/packages/dotlrn/tcl/applets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/applets-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/dotlrn/tcl/applets-procs.tcl	23 Jan 2002 00:15:43 -0000	1.2
+++ openacs-4/packages/dotlrn/tcl/applets-procs.tcl	24 Jan 2002 22:32:30 -0000	1.3
@@ -52,4 +52,11 @@
 	return [nsv_get dotlrn applets]
     }
 
+    ad_proc -public applet_exists_p {
+        {-applet_key:required}
+    } {
+        check whether "applet_key" is a real dotLRN applet
+    } {
+        return [db_string select_applet_exists_p {}]
+    }
 }