ob deploy push: Do not unpack deployment src
This was redundant
commit1fdadecfa8e680df69f8b44f2b65eeb6422d6494
authorLuigy Leon <luigy@outlook.com>
dateMon 14 May 2018, 18:08 (8 years ago)
parent0efcae2
lib/command/src/Obelisk/Command/Deploy.hs+2−4
@@ -56,10 +56,8 @@ deployPush deployPath = do
5656 }
5757 return $ listToMaybe $ lines $ buildOutput
5858 result <- readThunk srcPath >>= \case
59− Right (ThunkData_Packed _) -> do
60− unpackThunk srcPath
61− result <- build `finally` packThunk srcPath "origin" -- get upstream
62− return result
59+ Right (ThunkData_Packed _) ->
60+ build
6361 Right (ThunkData_Checkout _) -> do
6462 checkGitCleanStatus srcPath >>= \case
6563 True -> do