--- a/mercurial/HGPackageWorkingCopy.st	Tue Aug 25 09:03:57 2015 +0100
+++ b/mercurial/HGPackageWorkingCopy.st	Tue Aug 25 17:13:18 2015 +0100
@@ -214,7 +214,9 @@
     tmpPath := self temporaryWorkingCopyPath.
     tmpPath exists ifTrue:[
         tmpRepo := HGRepository on:tmpPath.
-        tmpRepo pull.
+	tmpRepo isShared ifFalse:[
+            tmpRepo pull.
+        ]
     ] ifFalse:[
         UserPreferences current hgUseSharedRepositories ifTrue:[ 
             tmpRepo := repository shareTo:tmpPath update:false.