Index: openacs-4/packages/dotlrn-homework/www/file-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-delete.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/dotlrn-homework/www/file-delete.tcl	20 Apr 2004 21:13:31 -0000	1.3
+++ openacs-4/packages/dotlrn-homework/www/file-delete.tcl	13 Jan 2005 13:57:29 -0000	1.4
@@ -61,10 +61,7 @@
 } else {
     # they need to confirm that they really want to delete the file
 
-    db_1row file_name "
-    	select name as title
-    	from   cr_items
-    	where  item_id = :file_id"
+    db_1row file_name {}
 
     set title [dotlrn_homework::decode_name $title]