From ebd304d97b612d0ac4ea276b1c29ba8ecc0b7998 Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 3 Sep 2015 21:56:17 +0200
Subject: Adapting design to smaller screens

---
 src/server/Model/Message/Translations.hs | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'src/server/Model/Message/Translations.hs')

diff --git a/src/server/Model/Message/Translations.hs b/src/server/Model/Message/Translations.hs
index 93d264f..9b9aafd 100644
--- a/src/server/Model/Message/Translations.hs
+++ b/src/server/Model/Message/Translations.hs
@@ -156,7 +156,12 @@ m l December =
     English -> "December"
     French  -> "Décembre"
 
-m l Date =
+m l ShortDate =
+  case l of
+    English -> "{3}-{2}-{1}"
+    French  -> "{1}/{2}/{3}"
+
+m l LongDate =
   case l of
     English -> "{2} {1}, {3}"
     French  -> "{1} {2} {3}"
-- 
cgit v1.2.3