elm-pages 3.0.0-beta.18 → 3.0.0-beta.19

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (37) hide show
  1. package/codegen/{elm-pages-codegen.js → elm-pages-codegen.cjs} +0 -0
  2. package/generator/dead-code-review/elm-stuff/tests-0.19.1/elm-stuff/0.19.1/d.dat +0 -0
  3. package/generator/dead-code-review/elm-stuff/tests-0.19.1/js/node_runner.js +1 -1
  4. package/generator/dead-code-review/elm-stuff/tests-0.19.1/js/node_supervisor.js +1 -1
  5. package/generator/review/elm-stuff/tests-0.19.1/elm-stuff/0.19.1/d.dat +0 -0
  6. package/generator/review/elm-stuff/tests-0.19.1/js/node_runner.js +1 -1
  7. package/generator/review/elm-stuff/tests-0.19.1/js/node_supervisor.js +1 -1
  8. package/generator/src/basepath-middleware.js +3 -3
  9. package/generator/src/build.js +36 -30
  10. package/generator/src/cli.js +30 -23
  11. package/generator/src/codegen.js +19 -18
  12. package/generator/src/compatibility-key.js +1 -1
  13. package/generator/src/compile-elm.js +20 -22
  14. package/generator/src/config.js +2 -4
  15. package/generator/src/dev-server.js +47 -30
  16. package/generator/src/dir-helpers.js +9 -25
  17. package/generator/src/elm-codegen.js +2 -4
  18. package/generator/src/elm-file-constants.js +2 -3
  19. package/generator/src/error-formatter.js +5 -5
  20. package/generator/src/file-helpers.js +3 -4
  21. package/generator/src/generate-template-module-connector.js +14 -15
  22. package/generator/src/init.js +8 -7
  23. package/generator/src/pre-render-html.js +11 -12
  24. package/generator/src/render-worker.js +21 -26
  25. package/generator/src/render.js +29 -40
  26. package/generator/src/request-cache.js +13 -8
  27. package/generator/src/rewrite-client-elm-json.js +5 -5
  28. package/generator/src/rewrite-elm-json.js +5 -5
  29. package/generator/src/route-codegen-helpers.js +16 -31
  30. package/generator/src/seo-renderer.js +1 -3
  31. package/generator/src/vite-utils.js +1 -2
  32. package/package.json +9 -8
  33. package/src/BackendTask/File.elm +1 -1
  34. package/src/Form.elm +26 -47
  35. package/src/Pages/Generate.elm +42 -13
  36. package/src/Pages/Internal/Form.elm +14 -1
  37. package/src/Server/Request.elm +21 -13
package/src/Server/Request.elm CHANGED
@@ -903,7 +903,7 @@ formDataWithServerValidation formParsers =
903
903
  case ( maybeParsed, errors2 |> Dict.toList |> List.filter (\( _, value ) -> value |> List.isEmpty |> not) |> List.NonEmpty.fromList ) of
904
904
  ( Just decodedFinal, Nothing ) ->
905
905
  Ok
906
- ( Form.Response
906
+ ( Pages.Internal.Form.Response
907
907
  { fields = rawFormData_
908
908
  , errors = Dict.empty
909
909
  }
@@ -912,7 +912,7 @@ formDataWithServerValidation formParsers =
912
912
 
913
913
  ( _, maybeErrors ) ->
914
914
  Err
915
- (Form.Response
915
+ (Pages.Internal.Form.Response
916
916
  { fields = rawFormData_
917
917
  , errors =
918
918
  maybeErrors
@@ -926,7 +926,7 @@ formDataWithServerValidation formParsers =
926
926
 
927
927
  ( _, maybeErrors ) ->
928
928
  Err
929
- (Form.Response
929
+ (Pages.Internal.Form.Response
930
930
  { fields = rawFormData_
931
931
  , errors =
932
932
  maybeErrors
@@ -943,7 +943,7 @@ formDataWithServerValidation formParsers =
943
943
  {-| -}
944
944
  formData :
945
945
  Form.ServerForms error combined
946
- -> Parser (Result { fields : List ( String, String ), errors : Dict String (List error) } combined)
946
+ -> Parser ( Form.Response error, Result { fields : List ( String, String ), errors : Dict String (List error) } combined )
947
947
  formData formParsers =
948
948
  rawFormData
949
949
  |> andThen
@@ -956,18 +956,26 @@ formData formParsers =
956
956
  in
957
957
  case ( maybeDecoded, errors |> Dict.toList |> List.filter (\( _, value ) -> value |> List.isEmpty |> not) |> List.NonEmpty.fromList ) of
958
958
  ( Just decoded, Nothing ) ->
959
- Ok decoded
959
+ ( Pages.Internal.Form.Response { fields = [], errors = Dict.empty }
960
+ , Ok decoded
961
+ )
960
962
  |> succeed
961
963
 
962
964
  ( _, maybeErrors ) ->
963
- Err
964
- { fields = rawFormData_
965
- , errors =
966
- maybeErrors
967
- |> Maybe.map List.NonEmpty.toList
968
- |> Maybe.withDefault []
969
- |> Dict.fromList
970
- }
965
+ let
966
+ record : { fields : List ( String, String ), errors : Dict String (List error) }
967
+ record =
968
+ { fields = rawFormData_
969
+ , errors =
970
+ maybeErrors
971
+ |> Maybe.map List.NonEmpty.toList
972
+ |> Maybe.withDefault []
973
+ |> Dict.fromList
974
+ }
975
+ in
976
+ ( Pages.Internal.Form.Response record
977
+ , Err record
978
+ )
971
979
  |> succeed
972
980
  )
973
981