From 6b2fb16e4b525c318b37a603e6544c34e56b5dd8 Mon Sep 17 00:00:00 2001
From: Dale Henrichs <dale.henrichs@gemtalksystems.com>
Date: Thu, 20 Jun 2019 13:25:18 -0700
Subject: [PATCH] Issue #504 ... remove #close send in
 MCGitBasedNetworkRepository class >> projectDirectoryFrom:version:

---
 .../class/projectDirectoryFrom.version..st                 | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/repository/Metacello-GitBasedRepository.package/MCGitBasedNetworkRepository.class/class/projectDirectoryFrom.version..st b/repository/Metacello-GitBasedRepository.package/MCGitBasedNetworkRepository.class/class/projectDirectoryFrom.version..st
index f6da25600..f9482d6ad 100644
--- a/repository/Metacello-GitBasedRepository.package/MCGitBasedNetworkRepository.class/class/projectDirectoryFrom.version..st
+++ b/repository/Metacello-GitBasedRepository.package/MCGitBasedNetworkRepository.class/class/projectDirectoryFrom.version..st
@@ -34,7 +34,10 @@ projectDirectoryFrom: projectPath version: versionString
 			directory := mcPlatform
 				directoryFromPath: (cachePath := archive members first fileName)
 				relativeTo: theCacheDirectory.
-			archive close.
+			false
+				ifTrue: [
+					"temporary patch for https://github.com/Metacello/metacello/issues/504"
+					archive close ].
 			directory exists
 				ifTrue: [ mcPlatform deleteFileNamed: zipFileName ]
 				ifFalse: [ mcPlatform
@@ -44,4 +47,4 @@ projectDirectoryFrom: projectPath version: versionString
 			projectDirectory := mcPlatform
 				directoryFromPath: cachePath
 				relativeTo: theCacheDirectory ].
-	^ projectDirectory
\ No newline at end of file
+	^ projectDirectory