From 89dd4de13896f8e37d1bf133080eb881ab42b292 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Sat, 18 Jul 2015 15:19:48 +0200
Subject: Adding login/logout functions thanks to a client session

---
 src/client/Main.elm      | 4 ++++
 src/client/View/Page.elm | 8 ++++----
 2 files changed, 8 insertions(+), 4 deletions(-)

(limited to 'src/client')

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))
     ]
-- 
cgit v1.2.3