Improve sub to check primary keypair

status-im · May 22, 2024 · 5818b9f · 5818b9f
1 parent ce104a1
commit 5818b9f
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/status_im/subs/wallet/wallet.cljs b/src/status_im/subs/wallet/wallet.cljs
@@ -184,7 +184,10 @@
  :<- [:wallet/keypairs]
  :<- [:wallet/selected-keypair-uid]
  (fn [[keypairs selected-keypair-uid]]
-   (= selected-keypair-uid (:key-uid (first keypairs)))))
+   (let [primary-keypair-uid (->> keypairs
+                                  (some #(when (= (:type %) "profile") %))
+                                  (:key-uid))]
+     (= selected-keypair-uid primary-keypair-uid))))
 
 (rf/reg-sub
  :wallet/selected-networks->chain-ids