Wallet: select-send-address event (#18501)

* Wallet: select-send-address event
This commit is contained in:
Omar Basem 2024-01-15 20:21:38 +04:00 committed by GitHub
parent 3e787ff112
commit fa9b6edd30
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 27 additions and 4 deletions

View File

@ -0,0 +1,5 @@
{:lint-as
{rewrite-clj.zip/subedit-> clojure.core/->
rewrite-clj.zip/subedit->> clojure.core/->>
rewrite-clj.zip/edit-> clojure.core/->
rewrite-clj.zip/edit->> clojure.core/->>}}

View File

@ -0,0 +1 @@
{:hooks {:analyze-call {taoensso.encore/defalias taoensso.encore/defalias}}}

View File

@ -0,0 +1,16 @@
(ns taoensso.encore
(:require
[clj-kondo.hooks-api :as hooks]))
(defn defalias [{:keys [node]}]
(let [[sym-raw src-raw] (rest (:children node))
src (if src-raw src-raw sym-raw)
sym (if src-raw
sym-raw
(symbol (name (hooks/sexpr src))))]
{:node (with-meta
(hooks/list-node
[(hooks/token-node 'def)
(hooks/token-node (hooks/sexpr sym))
(hooks/token-node (hooks/sexpr src))])
(meta src))}))

View File

@ -47,10 +47,11 @@
(update-in [:wallet :ui :send] dissoc :to-address)) (update-in [:wallet :ui :send] dissoc :to-address))
:fx [[:navigate-to-within-stack [:wallet-select-asset stack-id]]]})) :fx [[:navigate-to-within-stack [:wallet-select-asset stack-id]]]}))
(fn [{:keys [db]} [{:keys [address token stack-id]}]] (rf/reg-event-fx :wallet/select-send-address
{:db (assoc-in db [:wallet :ui :send :to-address] address) (fn [{:keys [db]} [{:keys [address token stack-id]}]]
:fx [[:navigate-to-within-stack {:db (assoc-in db [:wallet :ui :send :to-address] address)
(if token [:wallet-send-input-amount stack-id] [:wallet-select-asset stack-id])]]}) :fx [[:navigate-to-within-stack
(if token [:wallet-send-input-amount stack-id] [:wallet-select-asset stack-id])]]}))
(rf/reg-event-fx :wallet/send-select-token (rf/reg-event-fx :wallet/send-select-token
(fn [{:keys [db]} [{:keys [token stack-id]}]] (fn [{:keys [db]} [{:keys [token stack-id]}]]