Index: openacs-4/packages/lorsm/www/delivery2/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery2/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lorsm/www/delivery2/index.tcl	17 May 2005 17:03:41 -0000	1.3
+++ openacs-4/packages/lorsm/www/delivery2/index.tcl	14 Feb 2009 22:33:21 -0000	1.4
@@ -25,9 +25,9 @@
 # other instances of file-storages of other classes.  See
 # documentation for further details.
 
-set community_id [dotlrn_community::get_community_id]
+set community_id [lors::get_community_id]
 set fs_local_package_id [site_node_apm_integration::get_child_package_id \
-		       -package_id [dotlrn_community::get_package_id $community_id] \
+		       -package_id [lors::get_community_package_id] \
 		       -package_key "file-storage"\
 		      ]
 
@@ -78,7 +78,6 @@
 
     # Student tracking
     set package_id [ad_conn package_id]
-    set community_id [dotlrn_community::get_community_id]
     set user_id [ad_conn user_id]
 
     if {[lorsm::track::istrackable -course_id $man_id -package_id $package_id]} {
@@ -219,4 +218,4 @@
 set jsfile [concat $jsfile "var nCols = [expr $maxcols + 1];"]
 
 
-#ns_write $jsfile
\ No newline at end of file
+#ns_write $jsfile