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.3 -r1.4
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	9 Oct 2001 09:09:02 -0000	1.3
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	17 Oct 2001 19:53:25 -0000	1.4
@@ -87,7 +87,7 @@
 	set page_id [dotlrn_community::get_page_id $community_id $user_id]
 	
 	# Get the package_id by callback
-	set package_id [dotlrn_community::get_package_id $community_id]
+	set package_id [dotlrn_community::get_applet_package_id $community_id dotlrn_fs]
 
 	# Allow user to see the fs folders
 	# nothing for now