fix delegatee auth check
This commit is contained in:
parent
5f9e6f57b2
commit
53753fb8d5
1 changed files with 9 additions and 6 deletions
|
|
@ -414,13 +414,16 @@ mkStakeValidator impl sstSymbol pstClass gtClass =
|
||||||
# firstStakeInputDatumF.owner
|
# firstStakeInputDatumF.owner
|
||||||
|
|
||||||
delegateSignsTransaction =
|
delegateSignsTransaction =
|
||||||
( authCheckHelperF.allOwnByOrDelegatedToTheFirstOwner
|
( authCheckHelperF.allOwnByOrDelegatedToTheFirstDelegatee
|
||||||
#|| authCheckHelperF.allOwnByOrDelegatedToTheFirstDelegatee
|
#&& pmaybeData
|
||||||
|
# pconstant False
|
||||||
|
# plam ((authorizedBy #) . pfromData)
|
||||||
|
# pfromData firstStakeInputDatumF.delegatedTo
|
||||||
)
|
)
|
||||||
#&& pmaybeData
|
#|| ( authCheckHelperF.allOwnByOrDelegatedToTheFirstOwner
|
||||||
# pconstant False
|
#&& authorizedBy
|
||||||
# plam ((authorizedBy #) . pfromData)
|
# firstStakeInputDatumF.owner
|
||||||
# pfromData firstStakeInputDatumF.delegatedTo
|
)
|
||||||
|
|
||||||
signedBy =
|
signedBy =
|
||||||
pif
|
pif
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue