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.12.2.8 -r1.12.2.9
--- openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	15 Apr 2005 17:00:42 -0000	1.12.2.8
+++ openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	15 Apr 2005 17:13:34 -0000	1.12.2.9
@@ -254,19 +254,8 @@
                 db_dml set_file_content ""
             }
             lob {
-                # mmagerl: rename file, because Oracle cannot handle UTF chararacters
-                set tmp_newname [uni_procs::masquerade_name -name $tmp_filename -masqslash "f"]
-                ns_log Debug "mmagerl: Renaming $tmp_filename to $tmp_newname"
-                if {![string eq $tmp_filename $tmp_newname]} {
-                  file rename $tmp_filename $tmp_newname
-                }
-                db_dml set_lob_content "" -blob_files [list $tmp_newname]
+                db_dml set_lob_content "" -blob_files [list $tmp_filename]
                 db_dml set_lob_size ""
-                ns_log Debug "mmagerl: Chaning $tmp_newname back to $tmp_filename"
-                if {![string eq $tmp_filename $tmp_newname]} {
-                  file rename $tmp_newname $tmp_filename
-                }
-                # mmagerl: end
             }
         }