1 files changed, 2 insertions, 1 deletions
diff --git a/src/server/Model/Message.hs b/src/server/Model/Message.hs
index 6b4287e..d84aaa9 100644
--- a/src/server/Model/Message.hs
+++ b/src/server/Model/Message.hs
@@ -5,10 +5,11 @@ module Model.Message
   ) where
 
 import Data.Aeson
+import Data.Text (Text)
 import GHC.Generics
 
 data Message = Message
-  { message :: String
+  { message :: Text
   } deriving (Show, Generic)
 
 instance FromJSON Message