Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.63 -r1.64
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	18 Dec 2003 15:44:07 -0000	1.63
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	29 Dec 2003 20:08:52 -0000	1.64
@@ -3528,7 +3528,7 @@
         }
     }
 
-    set boundary [ns_sha1 [list [clock clicks] [clock seconds]]]
+    set boundary [ns_sha1 [list [clock clicks -milliseconds] [clock seconds]]]
     set payload {}
 
     if {[info exists data] && [string length $data]} {