Fix GH comment ETH balance formatting

Fixes: #150
This commit is contained in:
Teemu Patja 2017-11-07 18:27:06 +02:00
parent 39d661feff
commit a29a366c47
No known key found for this signature in database
GPG Key ID: F5B7035E6580FD4C
1 changed files with 2 additions and 2 deletions

View File

@ -226,7 +226,7 @@
(str "Contract address: [" addr "](" url-base "/address/" addr ")\n"))) (str "Contract address: [" addr "](" url-base "/address/" addr ")\n")))
(defn generate-open-comment (defn generate-open-comment
[owner repo issue-number contract-address eth-balance balance-str tokens] [owner repo issue-number contract-address eth-balance eth-balance-str tokens]
(let [image-url (md-image "QR Code" (get-qr-url owner repo issue-number eth-balance)) (let [image-url (md-image "QR Code" (get-qr-url owner repo issue-number eth-balance))
site-url (md-url (server-address) (server-address))] site-url (md-url (server-address) (server-address))]
(format (str "Current balance: %s ETH\n" (format (str "Current balance: %s ETH\n"
@ -239,7 +239,7 @@
(if (on-testnet?) (if (on-testnet?)
"To fund it, send test ETH or test ERC20/ERC223 tokens to the contract address." "To fund it, send test ETH or test ERC20/ERC223 tokens to the contract address."
"To fund it, send ETH or ERC20/ERC223 tokens to the contract address.")) "To fund it, send ETH or ERC20/ERC223 tokens to the contract address."))
eth-balance image-url site-url))) eth-balance-str image-url site-url)))
(defn generate-merged-comment (defn generate-merged-comment