Index: openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl 29 May 2002 23:00:25 -0000 1.11 +++ openacs-4/packages/dotlrn-dotlrn/tcl/dotlrn-members-staff-procs.tcl 13 Jul 2002 00:13:09 -0000 1.12 @@ -45,11 +45,25 @@ return "dotLRN Staff List Info" } + ad_proc -public my_package_key { + } { + What's my package key? + } { + return "dotlrn-dotlrn" + } + + ad_proc -public applet_key { + } { + What's my package key? + } { + return dotlrn_members_staff + } + ad_proc -public add_applet { } { Add the dotlrn applet to dotlrn - one time init - must be repeatable! } { - dotlrn_applet::add_applet_to_dotlrn -applet_key "dotlrn_members_staff" + dotlrn_applet::add_applet_to_dotlrn -applet_key [applet_key] -package_key [my_package_key] } ad_proc -public add_applet_to_community {