diff options
| author | Joris | 2016-06-04 10:04:05 +0200 |
|---|---|---|
| committer | Joris | 2016-06-04 10:04:05 +0200 |
| commit | 9dfa7a7e2c6fac564a456b11623c04d0b26fbce5 (patch) | |
| tree | dfde96063dac54be4cfbadf8715c7e8b844457cc /src/server/Model | |
| parent | 6ebd46c4913695210bd46179817bcc166a225ed8 (diff) | |
Add search on payments and use inline font awesome from elm
Diffstat (limited to 'src/server/Model')
| -rw-r--r-- | src/server/Model/Message/Key.hs | 1 | ||||
| -rw-r--r-- | src/server/Model/Message/Translations.hs | 5 |
2 files changed, 6 insertions, 0 deletions
diff --git a/src/server/Model/Message/Key.hs b/src/server/Model/Message/Key.hs index dea1a03..7c48e71 100644 --- a/src/server/Model/Message/Key.hs +++ b/src/server/Model/Message/Key.hs @@ -64,6 +64,7 @@ data Key = | PaymentsTitle | Payment | Payments + | Search -- Statistics diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs index 7bde74f..f593c49 100644 --- a/src/server/Model/Message/Translations.hs +++ b/src/server/Model/Message/Translations.hs @@ -245,6 +245,11 @@ m l Payment = English -> "payment" French -> "paiement" +m l Search = + case l of + English -> "Search" + French -> "Recherche" + m l Payments = case l of English -> "payments" |