aboutsummaryrefslogtreecommitdiff
path: root/src/client
diff options
context:
space:
mode:
Diffstat (limited to 'src/client')
-rw-r--r--src/client/Main.elm4
-rw-r--r--src/client/View/Page.elm8
2 files changed, 8 insertions, 4 deletions
diff --git a/src/client/Main.elm b/src/client/Main.elm
index 18a4aba..e112144 100644
--- a/src/client/Main.elm
+++ b/src/client/Main.elm
@@ -2,6 +2,8 @@ module Main
( main
) where
+{-| @docs main -}
+
import Graphics.Element exposing (..)
import Html exposing (Html)
@@ -16,6 +18,8 @@ import Update exposing (Action(..), actions, updateModel)
import View.Page exposing (renderPage)
+{-| main -}
+
main : Signal Html
main = Signal.map renderPage model
diff --git a/src/client/View/Page.elm b/src/client/View/Page.elm
index ca8efc9..73afed9 100644
--- a/src/client/View/Page.elm
+++ b/src/client/View/Page.elm
@@ -27,10 +27,10 @@ renderPage model =
[]
([ tr
[]
- [ td [] [ text "Utilisateur" ]
- , td [] [ text "Nom" ]
- , td [] [ text "Prix" ]
- , td [] [ text "Date" ]
+ [ th [] [ text "Utilisateur" ]
+ , th [] [ text "Nom" ]
+ , th [] [ text "Prix" ]
+ , th [] [ text "Date" ]
]
] ++ (List.map renderPayment model.payments))
]