Index: openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl,v
diff -u -r1.7 -r1.7.2.1
--- openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	14 Jun 2002 18:23:46 -0000	1.7
+++ openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	6 Dec 2002 12:29:14 -0000	1.7.2.1
@@ -67,17 +67,19 @@
         ad_return -code error "Storage type '$storage_type' is invalid."
     }
 
-    ReturnHeaders $mime_type
 
     switch $storage_type {
         text { 
+            ReturnHeaders $mime_type
             ns_write [db_string write_text_content ""]
         }
         file {
             set path [cr_fs_path $storage_area_key]
-            db_write_blob write_file_content ""         
+            set filename [db_string write_file_content ""]
+            ns_returnfile 200 $mime_type $filename
         }
         lob  {
+            ReturnHeaders $mime_type
             db_write_blob write_lob_content ""
         }
     }