dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-12-29 14:56:36 +03:00
Code Issues Packages Projects Releases Wiki Activity

Don't call a route's init when staying on the same path.

Browse Source
This commit is contained in:
Dillon Kearns 2022-10-19 15:14:57 -07:00
parent 5ccf361985
commit 98736e0a39
1 changed files with 31 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
src/Pages/Internal/Platform.elm
View File

@ -423,9 +423,7 @@ update config appMsg model =
)
else
( { model
| url = url
}
( model
, NoEffect
)
-- TODO is it reasonable to always re-fetch route data if you re-navigate to the current route? Might be a good
@ -605,27 +603,32 @@ update config appMsg model =
, actionData = newActionData
}
( userModel, _ ) =
( userModel, userEffect ) =
-- TODO if urlWithoutRedirectResolution is different from the url with redirect resolution, then
-- instead of calling update, call pushUrl (I think?)
-- TODO include user Cmd
config.update model.pageFormState
(model.inFlightFetchers |> toFetcherState)
(model.transition |> Maybe.map Tuple.second)
newSharedData
newPageData
model.key
(config.onPageChange
{ protocol = model.url.protocol
, host = model.url.host
, port_ = model.url.port_
, path = urlPathToPath urlWithoutRedirectResolution
, query = urlWithoutRedirectResolution.query
, fragment = urlWithoutRedirectResolution.fragment
, metadata = config.urlToRoute urlWithoutRedirectResolution
}
)
previousPageData.userModel
if stayingOnSamePath then
( previousPageData.userModel, NoEffect )
else
config.update model.pageFormState
(model.inFlightFetchers |> toFetcherState)
(model.transition |> Maybe.map Tuple.second)
newSharedData
newPageData
model.key
(config.onPageChange
{ protocol = model.url.protocol
, host = model.url.host
, port_ = model.url.port_
, path = urlPathToPath urlWithoutRedirectResolution
, query = urlWithoutRedirectResolution.query
, fragment = urlWithoutRedirectResolution.fragment
, metadata = config.urlToRoute urlWithoutRedirectResolution
}
)
previousPageData.userModel
|> Tuple.mapSecond UserCmd
updatedModel : Model userModel pageData actionData sharedData
updatedModel =
@ -656,10 +659,13 @@ update config appMsg model =
, currentPath = newUrl.path
}
, if not stayingOnSamePath && scrollToTopWhenDone then
ScrollToTop
Batch
[ ScrollToTop
, userEffect
]
else
NoEffect
userEffect
)
|> (case maybeUserMsg of
Just userMsg ->
@ -1392,7 +1398,8 @@ loadDataAndUpdateUrl ( newPageData, newSharedData, newActionData ) maybeUserMsg
, actionData = newActionData
}
( userModel, _ ) =
-- TODO use userEffect here?
( userModel, userEffect ) =
-- TODO if urlWithoutRedirectResolution is different from the url with redirect resolution, then
-- instead of calling update, call pushUrl (I think?)
-- TODO include user Cmd