diff options
| author | Joris | 2017-04-02 17:51:12 +0200 |
|---|---|---|
| committer | Joris | 2017-04-02 21:07:08 +0200 |
| commit | 5c110716cfda6e616a795edd12f2012b132dca9f (patch) | |
| tree | 71c3d04780302edf0648bec1cd914757cdbb2883 /src/client/View/Date.elm | |
| parent | 64ff4707fdcd81c27c6be9903c3c82bc543ef016 (diff) | |
Add a chart on payments by month by categories
Diffstat (limited to 'src/client/View/Date.elm')
| -rw-r--r-- | src/client/View/Date.elm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/client/View/Date.elm b/src/client/View/Date.elm index 35806ba..6df971b 100644 --- a/src/client/View/Date.elm +++ b/src/client/View/Date.elm @@ -1,5 +1,6 @@ module View.Date exposing - ( shortView + ( shortMonthAndYear + , shortView , longView , monthView ) @@ -10,6 +11,14 @@ import String import Model.Translations exposing (..) +shortMonthAndYear : Month -> Int -> Translations -> String +shortMonthAndYear month year translations = + let params = + [ String.pad 2 '0' (toString (Date.monthToInt month)) + , toString year + ] + in getParamMessage params translations "ShortMonthAndYear" + shortView : Date -> Translations -> String shortView date translations = let params = |