From f860b59644e84b84b6d7b4af309161ca7c5499ee Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Mon, 10 Aug 2015 21:56:58 +0200 Subject: Adding a message structure server side --- src/server/Message/Key.hs | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 src/server/Message/Key.hs (limited to 'src/server/Message/Key.hs') diff --git a/src/server/Message/Key.hs b/src/server/Message/Key.hs new file mode 100644 index 0000000..407ba34 --- /dev/null +++ b/src/server/Message/Key.hs @@ -0,0 +1,20 @@ +module Message.Key + ( Key(..) + ) where + +data Key = + + January + | February + | March + | April + | May + | June + | July + | August + | September + | October + | November + | December + + | Date -- cgit v1.2.3