Ticket #20896: portutil.tcl.diff

src/port1.0/portutil.tcl

@@ -893 +893 @@
             return -code error "reinplace permissions failed"
         }
 
-        if {[catch {file copy -force $tmpfile $file} error]} {
+        if {[catch {exec cp $tmpfile $file} error]} {
             global errorInfo
             ui_debug "$errorInfo"
             ui_error "reinplace: $error"