Index: openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	11 Feb 2002 02:39:43 -0000	1.23
+++ openacs-4/packages/dotlrn-calendar/tcl/dotlrn-calendar-procs.tcl	11 Feb 2002 02:46:51 -0000	1.24
@@ -24,6 +24,10 @@
 	return "calendar"
     }
 
+    ad_proc -public applet_key {
+        return "dotlrn_calendar"
+    }
+
     ad_proc -public get_url {
     } {
 	get the package_key this applet deals with
@@ -68,7 +72,7 @@
         # register/activate self with dotlrn
         # our service contract is in the db, but we must tell dotlrn
         # that we exist and want to be active
-        dotlrn_community::add_applet_to_dotlrn -applet_key "dotlrn_calendar"
+        dotlrn_community::add_applet_to_dotlrn -applet_key [applet_key]
     }
 
     ad_proc -public add_applet_to_community {
Index: openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl	11 Feb 2002 02:39:49 -0000	1.17
+++ openacs-4/packages/dotlrn-faq/tcl/dotlrn-faq-procs.tcl	11 Feb 2002 02:46:46 -0000	1.18
@@ -26,6 +26,10 @@
 	return "dotLRN Frequently Asked Questions"
     }
 
+    ad_proc -public applet_key {
+        return "dotlrn_faq"
+    }
+
     ad_proc -public package_key {
     } {
 	get the package_key this applet deals with
@@ -44,7 +48,7 @@
     } {
 	Add the faq applet to dotlrn - one time init - must be repeatable!
     } {
-        dotlrn_community::add_applet_to_dotlrn -applet_key "dotlrn_faq"
+        dotlrn_community::add_applet_to_dotlrn -applet_key [applet_key]
     }
 
     ad_proc -public add_applet_to_community {