dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-12-01 15:55:35 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fix failing test.

Browse Source
This commit is contained in:
Dillon Kearns 2019-11-02 07:40:35 -07:00
parent 3d4c487add
commit 77c3ef6d6f
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Pages/Internal/Platform/Cli.elm
View File

@ -824,16 +824,16 @@ sendStaticResponsesIfDone secrets allRawResponses errors staticResponses manifes
of
Ok urlsToPerform ->
let
unmaskedUrls =
maskedUrls =
urlsToPerform
|> List.map Tuple.first
|> List.map Tuple.second
|> Set.fromList
newThing =
allRawResponses
|> Dict.keys
|> Set.fromList
|> Set.diff unmaskedUrls
|> Set.diff maskedUrls
|> Set.toList
-- TODO this should pass the masked url as the first argument
|> List.map (\unmaskedUrl -> FetchHttp unmaskedUrl unmaskedUrl)