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

Applied linting suggestions

Browse source
This commit is contained in:
Jack Hodgkinson 2022-03-04 13:09:05 +00:00
parent 3626f4295a
commit 20651235f8
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Agora/Treasury.hs
View file

@ -50,7 +50,7 @@ treasuryV cs tn = plam $ \_d r ctx' -> P.do
let mint :: Term s PValue let mint :: Term s PValue
mint = txInfo.mint mint = txInfo.mint
gatAmountMinted :: Term s PInteger gatAmountMinted :: Term s PInteger
gatAmountMinted = passetClassValueOf # (pconstant cs) # (pconstant tn) # mint gatAmountMinted = passetClassValueOf # pconstant cs # pconstant tn # mint
pif pif
(gatAmountMinted #== -1) -- If the amount of GATS burned is not one, ... (gatAmountMinted #== -1) -- If the amount of GATS burned is not one, ...