Index: openacs-4/packages/lorsm/tcl/lorsm-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-procs.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/lorsm/tcl/lorsm-procs.xql	4 Sep 2004 14:51:20 -0000	1.1
+++ openacs-4/packages/lorsm/tcl/lorsm-procs.xql	17 May 2005 17:03:39 -0000	1.2
@@ -4,7 +4,7 @@
 <fullquery name="lorsm::get_content.get_revision">      
       <querytext>
 
-        select live_revision from cr_items where item_id = :item_id
+        select live_revision from cr_items where item_id = :ims_item_id
 
       </querytext>
 </fullquery>
@@ -64,7 +64,7 @@
 <fullquery name="lorsm::init.get_live_revision">      
       <querytext>
 
-    select live_revision from cr_items where item_id = :item_id
+    select live_revision from cr_items where item_id = :ims_item_id
 
       </querytext>
 </fullquery>
@@ -77,4 +77,10 @@
       </querytext>
 </fullquery>
 
-</queryset>
+<fullquery name="lorsm::get_root_folder_id.get_root_folder">      
+      <querytext>
+         select folder_id from cr_folders where label = 'LORSM Root Folder'
+      </querytext>
+</fullquery>
+
+</queryset>
\ No newline at end of file