aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/LoggedIn/View/Date.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/LoggedIn/View/Date.elm')
-rw-r--r--src/client/elm/LoggedIn/View/Date.elm4
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