mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

move showOutput into compute remote

Browse source
This commit is contained in:
Joey Hess 2025-03-04 10:02:33 -04:00
parent 52f51d065a
commit b395bd4f56
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Command/AddComputed.hs
View file

@ -97,7 +97,6 @@ perform o r = do
, Remote.Compute.computeReproducible = False , Remote.Compute.computeReproducible = False
} }
fast <- Annex.getRead Annex.fast fast <- Annex.getRead Annex.fast
showOutput
Remote.Compute.runComputeProgram program state Remote.Compute.runComputeProgram program state
(Remote.Compute.ImmutableState False) (Remote.Compute.ImmutableState False)
(getInputContent fast) (getInputContent fast)

1
Remote/Compute.hs
View file

@ -374,6 +374,7 @@ runComputeProgram (ComputeProgram program) state (ImmutableState immutablestate)
, std_out = CreatePipe , std_out = CreatePipe
, env = Just environ , env = Just environ
} }
showOutput
starttime <- liftIO currentMonotonicTimestamp starttime <- liftIO currentMonotonicTimestamp
state' <- bracket state' <- bracket
(liftIO $ createProcess pr) (liftIO $ createProcess pr)