From c90dcba1a78dbf3afd698031da6f99546ee82a1a Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Tue, 2 Feb 2021 18:12:01 +0100 Subject: [PATCH] chore(profiling): remove all cost centres to hopefully fix build --- src/Model/Types/TH/JSON.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/src/Model/Types/TH/JSON.hs b/src/Model/Types/TH/JSON.hs index d545df3eb..2e6720a44 100644 --- a/src/Model/Types/TH/JSON.hs +++ b/src/Model/Types/TH/JSON.hs @@ -28,7 +28,6 @@ fromPersistValueJSON = \case PersistText text -> decodeBS $ Text.encodeUtf8 text x -> Left $ fromPersistValueErrorSql (Proxy @a) x where decodeBS = first pack . JSON.eitherDecodeStrict' -{-# SCC fromPersistValueJSON #-} sqlTypeJSON :: SqlType sqlTypeJSON = SqlOther "jsonb"