wip: fixing tests

mikekeke · mikekeke · commit e0a642b17e0c · 2022-09-01T16:50:34.000+03:00
diff --git a/bot-plutus-interface.cabal b/bot-plutus-interface.cabal
@@ -27,7 +27,8 @@ common common-lang
     -Wall -Wcompat -Wincomplete-record-updates
     -Wincomplete-uni-patterns -Wredundant-constraints -fobject-code
     -fno-ignore-interface-pragmas -fno-omit-interface-pragmas
-    -fplugin=RecordDotPreprocessor -Werror
+    -fplugin=RecordDotPreprocessor 
+    -- -Werror
 
   build-depends:
     , base
diff --git a/src/BotPlutusInterface/Balance.hs b/src/BotPlutusInterface/Balance.hs
@@ -384,7 +384,7 @@ handleNonAdaChange balanceCfg changeAddr utxos tx = runEitherT $ do
                 Tx.txOutAddress txout == changeAddr
                   && not (justLovelace $ Tx.txOutValue txout)
                   && hasNoDatum txout
-                  && hasNoDatum txout
+                  -- && hasNoDatum txout
             )
           else (\txout -> Tx.txOutAddress txout == changeAddr && hasNoDatum txout)
 

Original file line number	Diff line number	Diff line change
`@@ -384,7 +384,7 @@ handleNonAdaChange balanceCfg changeAddr utxos tx = runEitherT $ do`
`384`	`384`	`Tx.txOutAddress txout == changeAddr`
`385`	`385`	`&& not (justLovelace $ Tx.txOutValue txout)`
`386`	`386`	`&& hasNoDatum txout`
`387`		`- && hasNoDatum txout`
	`387`	`+ -- && hasNoDatum txout`
`388`	`388`	`)`
`389`	`389`	`else (\txout -> Tx.txOutAddress txout == changeAddr && hasNoDatum txout)`
`390`	`390`