Merge remote-tracking branch 'origin/flexible-job-queue' into dev
[gargantext.git] / src / Gargantext / Database / Types.hs
index 8b64053cd971c5dfdab820bd1d91ac9f9918e33e..769a71aaa0001294d48b720509831a00981bca9f 100644 (file)
@@ -15,6 +15,7 @@ Portability : POSIX
 module Gargantext.Database.Types
   where
 
+import Data.Text (Text)
 import Data.Hashable (Hashable)
 import Gargantext.Core.Text (HasText(..))
 import Gargantext.Database.Schema.Prelude
@@ -57,3 +58,7 @@ instance DefaultFromField SqlFloat8            (Maybe Double) where
 instance DefaultFromField SqlInt4              (Maybe Int)    where
     defaultFromField = fromPGSFromField
 
+instance DefaultFromField (Nullable SqlText)  Text  where
+    defaultFromField = fromPGSFromField
+
+