a few more design modifcations for the modal

This commit is contained in:
Rob Culliton 2018-05-11 13:56:15 -04:00
parent 3fa60bc0e7
commit edc437132e
No known key found for this signature in database
GPG Key ID: 6FDEF60B3DC84D94
1 changed files with 19 additions and 19 deletions

View File

@ -269,26 +269,26 @@
(let [bounty @(rf/subscribe [:revoke-modal-bounty])] (let [bounty @(rf/subscribe [:revoke-modal-bounty])]
(fn [] (fn []
(when bounty (when bounty
[:div.ui.active.modal (let [owner-address (:owner_address bounty)]
[:div ;; width requires a deliberate override of semantic.min.css
[:h3 "Are you sure you want to request a refund?"] [:div.ui.active.modal {:style {:width 600}}
[:p "This will set your bounty value to $0. Don't worry, your issue will still be accessible to the community. Remember that the higher the funds, the higher the chance to get the issue solved."] [:div.ph4.pv3
[:p (:issue-title bounty)] [:h3 "Are you sure you want to request a refund?"]
;; tokens [:p "This will set your bounty"
;; eth [:span.pg-med " value to $0."]
;; usd " Don't worry, your issue will still be accessible to the community. Remember that the higher the funds, the higher the chance to get the issue solved."]
[ui-balances/token-balances (bnt/crypto-balances bounty) :badge] [:p (:issue-title bounty)]
[ui-balances/usd-value-label (:value-usd bounty)] [ui-balances/token-balances (bnt/crypto-balances bounty) :badge]
[:p "To be refunded to " [ui-balances/usd-value-label (:value-usd bounty)]
[:a.sob-blue.pg-med [:p "To be refunded to "
;; todo let binding [:a.sob-blue.pg-med
{:href (etherscan-address-url (:owner_address bounty)) :target "_blank"} {:href (etherscan-address-url owner-address) :target "_blank"}
(:owner_address bounty)]] owner-address]]
[:button {:on-click #(rf/dispatch [:clear-revoke-modal])} [:button {:on-click #(rf/dispatch [:clear-revoke-modal])}
"REQUEST REFUND"] "REQUEST REFUND"]
[:button {:on-click #(rf/dispatch [:clear-revoke-modal])} [:button {:on-click #(rf/dispatch [:clear-revoke-modal])}
"CANCEL"]]])))) "CANCEL"]]])))))
(defn revoke-dropdown [bounty] (defn revoke-dropdown [bounty]
(let [menu (if (contains? @(rf/subscribe [:three-dots-open?]) (:issue-id bounty)) (let [menu (if (contains? @(rf/subscribe [:three-dots-open?]) (:issue-id bounty))