diff --git a/review/src/ReviewConfig.elm b/review/src/ReviewConfig.elm index 0649fc0a..fca2a81e 100644 --- a/review/src/ReviewConfig.elm +++ b/review/src/ReviewConfig.elm @@ -50,5 +50,7 @@ config = |> Rule.ignoreErrorsForFiles [ "src/Pages/Internal/Platform/Effect.elm" , "src/Pages/Internal/Platform.elm" + , "src/Pages/Internal/Platform/Cli.elm" + , "src/SecretsDict.elm" ] ) diff --git a/src/Pages/ContentCache.elm b/src/Pages/ContentCache.elm index 323a2eb4..759cf88e 100644 --- a/src/Pages/ContentCache.elm +++ b/src/Pages/ContentCache.elm @@ -5,7 +5,6 @@ module Pages.ContentCache exposing , init , is404 , lazyLoad - , lookupMetadata , pathForUrl ) @@ -15,7 +14,6 @@ import Html exposing (Html) import Http import Json.Decode as Decode import Pages.Internal.String as String -import Pages.PagePath as PagePath exposing (PagePath) import RequestsAndPending exposing (RequestsAndPending) import Task exposing (Task) import Url exposing (Url) @@ -204,23 +202,6 @@ pathForUrl { currentUrl, baseUrl } = |> List.filter ((/=) "") -lookup : - ContentCache - -> { currentUrl : Url, baseUrl : Url } - -> Maybe ( PagePath, Entry ) -lookup dict urls = - let - path = - pathForUrl urls - in - dict - |> Dict.get path - |> Maybe.map - (\entry -> - ( PagePath.build path, entry ) - ) - - is404 : ContentCache -> { currentUrl : Url, baseUrl : Url } @@ -238,21 +219,3 @@ is404 dict urls = True ) |> Maybe.withDefault True - - -lookupMetadata : - ContentCache - -> { currentUrl : Url, baseUrl : Url } - -> Maybe PagePath -lookupMetadata content urls = - urls - |> lookup content - |> Maybe.map - (\( pagePath, entry ) -> - case entry of - NeedContent -> - pagePath - - Parsed _ -> - pagePath - )