Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.166 -r1.167
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	3 Sep 2007 21:07:53 -0000	1.166
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	12 Sep 2007 11:10:03 -0000	1.167
@@ -968,6 +968,9 @@
       regexp {^(.*):(.*)$} $name _ _t stripped_name
     } else {
       set stripped_name $fn
+      # Internet explorer seems to transmit the full path of the
+      # filename. Just use the last part in such cases as name.
+      regexp {[/\\]([^/\\]+)$} $stripped_name _ stripped_name
     }
     return ${type}:[::$package_id normalize_name $stripped_name]
   }