mercurial/HGPackageWorkingCopy.st
changeset 562 e694ffae649b
parent 556 4a087ba803b7
child 563 6104cd9f44f1
--- a/mercurial/HGPackageWorkingCopy.st	Mon Aug 24 16:23:15 2015 +0100
+++ b/mercurial/HGPackageWorkingCopy.st	Tue Aug 25 09:03:57 2015 +0100
@@ -205,8 +205,6 @@
 !HGPackageWorkingCopy methodsFor:'utils'!
 
 ensureTemporaryWorkingCopy
-    "raise an error: must be redefined in concrete subclass(es)"
-    
     | rev  tmpPath  tmpRepo  tmpWc |
 
     rev := self revision.
@@ -218,7 +216,11 @@
         tmpRepo := HGRepository on:tmpPath.
         tmpRepo pull.
     ] ifFalse:[
-        tmpRepo := repository cloneTo:tmpPath update:false.
+        UserPreferences current hgUseSharedRepositories ifTrue:[ 
+            tmpRepo := repository shareTo:tmpPath update:false.            
+        ] ifFalse:[ 
+            tmpRepo := repository cloneTo:tmpPath update:false.
+        ].
     ].
     tmpWc := tmpRepo workingCopy.
 
@@ -235,7 +237,7 @@
     ].
 
     "Created: / 14-11-2012 / 00:16:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 11-06-2013 / 00:48:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 25-08-2015 / 02:00:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 ensureTemporaryWorkingCopyAtRevision:rev