Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	28 Nov 2001 22:55:31 -0000	1.9
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	30 Nov 2001 18:18:01 -0000	1.10
@@ -43,8 +43,16 @@
     ad_proc -public add_applet {
 	community_id
     } {
-	Add the fs applet
+	Used for one-time init 
     } {
+	return
+    }
+
+    ad_proc -public add_applet_to_community {
+	community_id
+    } {
+	Add the fs applet to a specifc dotlrn community
+    } {
 	set user_id [ad_conn user_id]
 	set ip [ns_conn peeraddr]
 
@@ -117,8 +125,17 @@
 	community_id
 	user_id
     } {
-	Add a user to a community
+	One time user-specfic init
     } {
+	return
+    }
+
+    ad_proc -public add_user_to_community {
+	community_id
+	user_id
+    } {
+	Add a user to a to a specifc dotlrn community
+    } {
 	# Get the page_id by callback
 	set page_id [dotlrn_community::get_page_id $community_id $user_id]