From 3f750fb4bdfa157bf8874c557d9f33c6224f79f6 Mon Sep 17 00:00:00 2001
From: Vladimir Kalnitsky <vladimir@mlabs.city>
Date: Mon, 8 Aug 2022 13:29:12 +0400
Subject: [PATCH] Apply suggestions

---
 test/Plutip.purs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/Plutip.purs b/test/Plutip.purs
index 3b5a13ad30..508f6d48d4 100644
--- a/test/Plutip.purs
+++ b/test/Plutip.purs
@@ -167,8 +167,8 @@ suite = do
               [ TransactionUnspentOutput
                   { output: TransactionOutput { amount } }
               ] -> do
-              when (amount /= lovelaceValueOf (BigInt.fromInt 1_000_000_000)) do
-                throw "Wrong UTxO selected as collateral"
+              unless (amount == lovelaceValueOf (BigInt.fromInt 1_000_000_000))
+                $ throw "Wrong UTxO selected as collateral"
             Just _ -> do
               -- not a bug, but unexpected
               throw "More than one UTxO in collateral"