From 75804df1cb231033f94183e41cdf79d36d8f6710 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 21 Aug 2016 14:30:40 +0200
Subject: Show a message if there is an error during a server request

---
 src/client/elm/View/Date.elm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'src/client/elm/View/Date.elm')

diff --git a/src/client/elm/View/Date.elm b/src/client/elm/View/Date.elm
index 21bbfc4..35806ba 100644
--- a/src/client/elm/View/Date.elm
+++ b/src/client/elm/View/Date.elm
@@ -17,19 +17,19 @@ shortView date translations =
         , String.pad 2 '0' (toString (Date.monthToInt (Date.month date)))
         , toString (Date.year date)
         ]
-  in  getParamMessage params "ShortDate" translations
+  in  getParamMessage params translations "ShortDate"
 
 longView : Date -> Translations -> String
 longView date translations =
   let params =
         [ toString (Date.day date)
-        , (getMessage (getMonthKey (Date.month date)) translations)
+        , (getMessage translations (getMonthKey (Date.month date)))
         , toString (Date.year date)
         ]
-  in  getParamMessage params "LongDate" translations
+  in  getParamMessage params translations "LongDate"
 
 monthView : Translations -> Month -> String
-monthView translations month = getMessage (getMonthKey month) translations
+monthView translations month = getMessage translations (getMonthKey month)
 
 getMonthKey : Month -> String
 getMonthKey month =
-- 
cgit v1.2.3