Use translated month in stat page

1 files changed, 4 insertions, 0 deletions

diff --git a/src/client/elm/LoggedIn/View/Date.elm b/src/client/elm/LoggedIn/View/Date.elm
index f9528d4..c9d44ab 100644
--- a/src/client/elm/LoggedIn/View/Date.elm
+++ b/src/client/elm/LoggedIn/View/Date.elm
@@ -1,6 +1,7 @@
 module LoggedIn.View.Date
   ( renderShortDate
   , renderLongDate
+  , renderMonth
   ) where
 
 import Date exposing (..)
@@ -27,6 +28,9 @@ renderLongDate date translations =
         ]
   in  getParamMessage params "LongDate" translations
 
+renderMonth : Translations -> Month -> String
+renderMonth translations month = getMessage (getMonthKey month) translations
+
 getMonthKey : Month -> String
 getMonthKey month =
   case month of