diff options
Diffstat (limited to 'frontend/src/Main.elm')
-rw-r--r-- | frontend/src/Main.elm | 31 |
1 files changed, 16 insertions, 15 deletions
diff --git a/frontend/src/Main.elm b/frontend/src/Main.elm index 09a851d..07b029d 100644 --- a/frontend/src/Main.elm +++ b/frontend/src/Main.elm | |||
@@ -315,23 +315,24 @@ view model = | |||
315 | HomePage -> | 315 | HomePage -> |
316 | { title = "Login" | 316 | { title = "Login" |
317 | , body = | 317 | , body = |
318 | -- model.loginModel | 318 | model.loginModel |
319 | -- |> Login.view | 319 | |> Login.view |
320 | -- |> Html.Styled.map LoginMessage | 320 | |> Html.Styled.map LoginMessage |
321 | -- |> toUnstyled | ||
322 | -- |> List.singleton | ||
323 | div [] | ||
324 | [ ul [] | ||
325 | (List.map | ||
326 | (\l -> | ||
327 | li [] | ||
328 | [ a [ href l ] [ text l ] ] | ||
329 | ) | ||
330 | [ "/login", "/catalog", "/cart" ] | ||
331 | ) | ||
332 | ] | ||
333 | |> toUnstyled | 321 | |> toUnstyled |
334 | |> List.singleton | 322 | |> List.singleton |
323 | |||
324 | --div [] | ||
325 | -- [ ul [] | ||
326 | -- (List.map | ||
327 | -- (\l -> | ||
328 | -- li [] | ||
329 | -- [ a [ href l ] [ text l ] ] | ||
330 | -- ) | ||
331 | -- [ "/login", "/catalog", "/cart" ] | ||
332 | -- ) | ||
333 | -- ] | ||
334 | -- |> toUnstyled | ||
335 | -- |> List.singleton | ||
335 | } | 336 | } |
336 | 337 | ||
337 | LoginPage -> | 338 | LoginPage -> |