Skip to content

Commit 82b5f66

Browse files
committed
Remove debugging, no need for extra temp dir
1 parent af69b4b commit 82b5f66

File tree

1 file changed

+13
-19
lines changed

1 file changed

+13
-19
lines changed

etc/scripts/release.hs

Lines changed: 13 additions & 19 deletions
Original file line numberDiff line numberDiff line change
@@ -200,25 +200,19 @@ rules global@Global{..} args = do
200200
Stdout dirty <- cmd "git status --porcelain"
201201
when (not gAllowDirty && not (null (trim dirty))) $
202202
error ("Working tree is dirty. Use --" ++ allowDirtyOptName ++ " option to continue anyway.")
203-
withTempDir $ \tmpDir -> do
204-
() <- cmd
205-
[gProjectRoot </> releaseBinDir </> binaryName </> stackExeFileName]
206-
(stackArgs global)
207-
["--local-bin-path", tmpDir]
208-
["install"]
209-
gBuildArgs
210-
integrationTestFlagArgs
211-
["--pedantic", "--no-haddock-deps", "--test"]
212-
["--haddock" | gTestHaddocks]
213-
["stack"]
214-
liftIO $ System.Directory.getDirectoryContents tmpDir >>= \x -> print ("tmpDir", tmpDir, x)
215-
() <- cmd ["find", tmpDir]
216-
() <- cmd ["find", gProjectRoot </> releaseBinDir]
217-
() <- cmd
218-
[gProjectRoot </> releaseBinDir </> binaryName </> stackExeFileName]
219-
["exec"]
220-
[gProjectRoot </> releaseBinDir </> binaryName </> "stack-integration-test"]
221-
return ()
203+
() <- cmd
204+
[gProjectRoot </> releaseBinDir </> binaryName </> stackExeFileName]
205+
(stackArgs global)
206+
["build"]
207+
gBuildArgs
208+
integrationTestFlagArgs
209+
["--pedantic", "--no-haddock-deps", "--test"]
210+
["--haddock" | gTestHaddocks]
211+
["stack"]
212+
() <- cmd
213+
[gProjectRoot </> releaseBinDir </> binaryName </> stackExeFileName]
214+
["exec"]
215+
[gProjectRoot </> releaseBinDir </> binaryName </> "stack-integration-test"]
222216
copyFileChanged (releaseBinDir </> binaryName </> stackExeFileName) out
223217

224218
unless gUploadOnly $ releaseDir </> binaryPkgZipFileName %> \out -> do

0 commit comments

Comments
 (0)