Update interface for Request with Parser removed.

This commit is contained in:
Dillon Kearns 2023-05-27 20:39:19 -07:00
parent 7a1bf102c0
commit d5f8005cb3
6 changed files with 161 additions and 778 deletions

File diff suppressed because one or more lines are too long

View File

@ -8,7 +8,7 @@ import Html.Styled exposing (text)
import Pages.PageUrl exposing (PageUrl)
import PagesMsg exposing (PagesMsg)
import RouteBuilder exposing (App, StatefulRoute, StatelessRoute)
import Server.Request as Request exposing (Parser, Request)
import Server.Request as Request exposing (Request)
import Server.Response as Response exposing (Response)
import Shared
import View exposing (View)

View File

@ -9,7 +9,7 @@ import Html.Styled exposing (div, text)
import Pages.PageUrl exposing (PageUrl)
import PagesMsg exposing (PagesMsg)
import RouteBuilder exposing (App, StatefulRoute, StatelessRoute)
import Server.Request as Request exposing (Parser, Request)
import Server.Request as Request exposing (Request)
import Server.Response as Response exposing (Response)
import Shared
import View exposing (View)

View File

@ -2,15 +2,13 @@ module Route.Test.ResponseHeaders exposing (ActionData, Data, Model, Msg, route)
import BackendTask exposing (BackendTask)
import BackendTask.File
import BuildError exposing (BuildError)
import ErrorPage exposing (ErrorPage)
import FatalError exposing (FatalError)
import Head
import Html.Styled exposing (div, text)
import Pages.PageUrl exposing (PageUrl)
import PagesMsg exposing (PagesMsg)
import RouteBuilder exposing (App, StatefulRoute, StatelessRoute)
import Server.Request as Request exposing (Parser, Request)
import Server.Request exposing (Request)
import Server.Response as Response exposing (Response)
import Shared
import View exposing (View)

View File

@ -1,4 +1,4 @@
module Internal.Request exposing (Parser(..), Request(..), RequestRecord, fakeRequest, toRequest)
module Internal.Request exposing (Request(..), RequestRecord, fakeRequest, toRequest)
import CookieParser
import Dict exposing (Dict)
@ -6,10 +6,6 @@ import Json.Decode as Decode
import Time
type Parser decodesTo validationError
= Parser (Decode.Decoder ( Result validationError decodesTo, List validationError ))
type Request
= Request RequestRecord

File diff suppressed because it is too large Load Diff