Index: openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl	27 Oct 2014 16:39:09 -0000	1.8
+++ openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl	2 Jan 2016 14:31:29 -0000	1.8.2.1
@@ -26,7 +26,7 @@
 } {
     db_transaction {
         # subselect makes sure there isn't a parent revision still lying around
-        db_foreach fetch_paths { *SQL* } {
+        db_foreach fetch_paths {} {
             set file [cr_fs_path $storage_area_key]/$path
             if {[regexp {^[0-9/]+$} $path]} {
                 # the filename looks valid, delete the file from filesystem
@@ -37,7 +37,7 @@
             }
         }
         # now that all scheduled files deleted, clear table
-        db_dml delete_files { *SQL* }
+        db_dml delete_files {}
     }
 
     #