Index: openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.xql,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.xql	17 Feb 2003 20:56:16 -0000	1.1
+++ openacs-4/packages/dotlrn-homework/tcl/dotlrn-homework-procs.xql	13 Jan 2005 13:57:29 -0000	1.2
@@ -18,6 +18,17 @@
    </querytext>
 </fullquery>
 
+<fullquery name="dotlrn_homework::new.live_version_title">      
+   <querytext>
+
+     select r.title
+     from cr_revisions r, cr_items i
+     where i.item_id = :file_id
+       and i.content_type = 'file_storage_object'
+       and r.revision_id = i.live_revision
+            
+   </querytext>
+</fullquery>
  
 <fullquery name="dotlrn_homework::new.fs_content_size">      
    <querytext>