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"