Sulkta-Coop/agora
2
0
Fork 0
Code Issues 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 5216987dac
commit 657031508e
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
mint = txInfo.mint
gatAmountMinted :: Term s PInteger
gatAmountMinted = passetClassValueOf # (pconstant cs) # (pconstant tn) # mint
gatAmountMinted = passetClassValueOf # pconstant cs # pconstant tn # mint
pif
(gatAmountMinted #== -1) -- If the amount of GATS burned is not one, ...