Remove unused fns
This commit is contained in:
parent
9b762c6527
commit
3e4a76175c
|
@ -191,30 +191,6 @@
|
||||||
[tla (token-balance bounty-addr tla)]))) addrs)))
|
[tla (token-balance bounty-addr tla)]))) addrs)))
|
||||||
{})))
|
{})))
|
||||||
|
|
||||||
(defn transfer-tokens
|
|
||||||
"Transfer mount of given ERC20 token from from-addr to
|
|
||||||
to-addr. Connected geth needs to have keys for the account and
|
|
||||||
passphrase needs to be supplied. Returns transaction ID."
|
|
||||||
[from-addr from-passphrase token to-addr amount]
|
|
||||||
(let [token-addr (get-token-address token)]
|
|
||||||
(eth/execute-using-addr from-addr
|
|
||||||
from-passphrase
|
|
||||||
token-addr
|
|
||||||
(method-ids :transfer)
|
|
||||||
to-addr
|
|
||||||
amount)))
|
|
||||||
|
|
||||||
(defn get-owners
|
|
||||||
"Return vector of multisig owner addresses."
|
|
||||||
[bounty-addr]
|
|
||||||
(let [bounty-contract (load-bounty-contract bounty-addr)
|
|
||||||
owner-addresses (-> bounty-contract
|
|
||||||
(.getOwners)
|
|
||||||
.get)]
|
|
||||||
(if owner-addresses
|
|
||||||
(mapv #(.toString %) (.getValue owner-addresses))
|
|
||||||
[])))
|
|
||||||
|
|
||||||
(defn uint256 [x]
|
(defn uint256 [x]
|
||||||
(org.web3j.abi.datatypes.generated.Uint256. x))
|
(org.web3j.abi.datatypes.generated.Uint256. x))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue