Index: openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql,v
diff -u -r1.19.2.2 -r1.19.2.3
--- openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql	7 Mar 2003 00:11:52 -0000	1.19.2.2
+++ openacs-4/packages/file-storage/tcl/file-storage-procs-oracle.xql	28 Mar 2003 01:16:21 -0000	1.19.2.3
@@ -145,7 +145,7 @@
         <querytext>
             select content
             from cr_revisions
-            where revision_id = :live_revision
+            where revision_id = $live_revision
         </querytext>
     </fullquery>
 
Index: openacs-4/packages/file-storage/tcl/file-storage-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-procs.tcl,v
diff -u -r1.25.2.4 -r1.25.2.5
--- openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	20 Mar 2003 22:13:59 -0000	1.25.2.4
+++ openacs-4/packages/file-storage/tcl/file-storage-procs.tcl	28 Mar 2003 01:16:21 -0000	1.25.2.5
@@ -492,7 +492,15 @@
 
         switch $storage_type {
             lob {
+
                 # FIXME: db_blob_get_file is failing when i use bind variables
+
+                # DRB: you're out of luck - the driver doesn't support them and while it should
+                # be fixed it will be a long time before we'll want to require an updated
+                # driver.  I'm substituting the Tcl variable value directly in the query due to
+                # this.  It's safe because we've pulled the value ourselves from the database,
+                # don't need to worry about SQL smuggling etc.
+
                 db_blob_get_file select_object_content {} -file [file join ${path} ${file_name}]
             }
             text {