handle plutus correctly

Author: Cmdv

Diff for: cardano-db-sync/src/Cardano/DbSync/Config.hs

@@ -100,6 +100,8 @@ plutusWhitelistCheckTxOut :: SyncEnv -> [Generic.TxOut] -> Bool
 plutusWhitelistCheckTxOut syncEnv txOuts = do
   let iopts = soptInsertOptions $ envOptions syncEnv
   case ioPlutusExtra iopts of
+    PlutusEnable -> True
+    PlutusDisable -> False
     PlutusWhitelistScripts whitelist -> do
       -- we map over our txOuts and check if txOutAddress OR txOutScript are in the whitelist
       let whitelistCheck =
@@ -117,4 +119,3 @@ plutusWhitelistCheckTxOut syncEnv txOuts = do
             )
               <$> txOuts
       any isJust whitelistCheck
-    _ -> False