Sulkta-OSS/agora
3
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

hlint happiness prevents building..

Browse source
This commit is contained in:
Riley Kilgore 2022-03-05 05:57:27 -08:00
parent 7b327911d2
commit de6e186ec1
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/Agora/MultiSig.hs
View file

@ -46,7 +46,7 @@ multiSigValidator params =
let signatories = pfield @"signatories" # ctx.txInfo let signatories = pfield @"signatories" # ctx.txInfo
passert "The amount of required signatures is not met." passert "The amount of required signatures is not met."
((fromInteger params.minSigs) #<= (plength #$ pfilter ((fromInteger params.minSigs) #<= (plength #$ pfilter
# (plam \a -> # (plam $ \a ->
pelem # pdata a # pfromData signatories) (pelem # pdata a # pfromData signatories))
# pcon params.keys)) # pcon params.keys))
(pconstant ()) (pconstant ())