diff options
Diffstat (limited to 'src/client')
| -rw-r--r-- | src/client/Main.elm | 4 | ||||
| -rw-r--r-- | src/client/View/Page.elm | 8 |
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)) ] |