Fix in HGPackageWorkingCopyRegistry>>flush: on Windows, just give up if temporary working copy could not be removed
authorJan Vrany <jan.vrany@fit.cvut.cz>
Tue, 01 Mar 2016 19:55:28 +0000
changeset 605 96fd9746c9ed
parent 602 007e9ad04dca
child 615 e954b1a2ee2c
child 655 d16442a5751c
Fix in HGPackageWorkingCopyRegistry>>flush: on Windows, just give up if temporary working copy could not be removed ...this happen on heavily loaded windows for one reason or another. The file locking on Windows is broken, so don't bother. MS should fix this...
mercurial/HGPackageWorkingCopyRegistry.st
--- a/mercurial/HGPackageWorkingCopyRegistry.st	Sun Feb 07 08:49:11 2016 +0000
+++ b/mercurial/HGPackageWorkingCopyRegistry.st	Tue Mar 01 19:55:28 2016 +0000
@@ -18,6 +18,8 @@
 "
 "{ Package: 'stx:libscm/mercurial' }"
 
+"{ NameSpace: Smalltalk }"
+
 SCMAbstractPackageWorkingCopyRegistry subclass:#HGPackageWorkingCopyRegistry
 	instanceVariableNames:''
 	classVariableNames:''
@@ -176,7 +178,9 @@
             [ wcdir recursiveRemove ] on: Error do:[
                 OperatingSystem isMSWINDOWSlike ifTrue:[
                     Delay waitForSeconds: 1.
-                    wcdir recursiveRemove.
+                    [ wcdir recursiveRemove ] on: Error do:[
+                        "/ Sigh, just give up on this stupid system.
+                    ]
                 ].
             ].
         ].
@@ -184,8 +188,8 @@
     ].
 
     "Created: / 16-11-2012 / 19:40:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-11-2012 / 16:03:07 / jv"
     "Modified: / 05-02-2013 / 09:28:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 01-03-2016 / 19:52:09 / jv"
 ! !
 
 !HGPackageWorkingCopyRegistry class methodsFor:'documentation'!