git.iko.soy/elk
on master help sign in
add wildcard for BuildID when destructuring details

Relevant to https://github.com/elm/compiler/issues/1956

commitfa1971bf72b4798111e67a66dd56cbade6bbb19a authorEvan Czaplicki <evancz@users.noreply.github.com> dateWed 24 Jul 2019, 10:41 (7 years ago) parent884ea20
3 files changed+4−4
compare with master
unifiedsplit
terminal/src/Develop/Generate/Index.hs+1−1 terminal/src/Make.hs+1−1 terminal/src/Publish.hs+2−2
terminal/src/Develop/Generate/Index.hs+1−1
@@ -174,7 +174,7 @@ getExactDeps maybeOutline =
174174 Left _ ->
175175 return Map.empty
176176
177− Right (Details.Details _ validOutline _ _ _) ->
177+ Right (Details.Details _ validOutline _ _ _ _) ->
178178 case validOutline of
179179 Details.ValidApp _ ->
180180 return Map.empty
terminal/src/Make.hs+1−1
@@ -139,7 +139,7 @@ getMode debug optimize =
139139
140140
141141getExposed :: Details.Details -> Task (NE.List ModuleName.Raw)
142−getExposed (Details.Details _ validOutline _ _ _) =
142+getExposed (Details.Details _ validOutline _ _ _ _) =
143143 case validOutline of
144144 Details.ValidApp _ ->
145145 Task.throw Exit.MakeAppNeedsFileNames
terminal/src/Publish.hs+2−2
@@ -173,7 +173,7 @@ verifyBuild :: FilePath -> Task.Task Exit.Publish Docs.Documentation
173173verifyBuild root =
174174 reportBuildCheck $ BW.withScope $ \scope ->
175175 Task.run $
176− do details@(Details.Details _ outline _ _ _) <-
176+ do details@(Details.Details _ outline _ _ _ _) <-
177177 Task.eio Exit.PublishBadDetails $
178178 Details.load Reporting.silent scope root
179179
@@ -309,7 +309,7 @@ withPrepublishDir root callback =
309309verifyZipBuild :: FilePath -> IO (Either Exit.Publish ())
310310verifyZipBuild root =
311311 BW.withScope $ \scope -> Task.run $
312− do details@(Details.Details _ outline _ _ _) <-
312+ do details@(Details.Details _ outline _ _ _ _) <-
313313 Task.eio Exit.PublishZipBadDetails $
314314 Details.load Reporting.silent scope root
315315