Formatting

Author: samuelWilliams99

test/Spec/BotPlutusInterface/Contract.hs

@@ -903,9 +903,10 @@ assertCommandEqual err expected actual
   | commandEqual expected actual = return ()
   | otherwise = assertFailure $ err ++ "\nExpected:\n" ++ show expected ++ "\nGot:\n" ++ show actual
 
--- | Checks if a command matches an expected command pattern
--- Where a command pattern may use new lines in place of spaces, and use the wildcard `?` to match up to the next space
--- E.g. `commandEqual "123\n456 ? 0" "123 456 789 0"` == `True`
+{- | Checks if a command matches an expected command pattern
+ Where a command pattern may use new lines in place of spaces, and use the wildcard `?` to match up to the next space
+ E.g. `commandEqual "123\n456 ? 0" "123 456 789 0"` == `True`
+-}
 commandEqual :: Text -> Text -> Bool
 commandEqual "" "" = True
 commandEqual "" _ = False