无法使用 ClojureScript 检测到 Metamask 登录

问题描述

我是 ClojureScript 初学者，我正在尝试将我的应用连接到 Metamask 钱包。

过去我在一个纯 JS 项目上成功做到了，代码如下：

import Web3 from "web3";
import detectEthereumProvider from "@Metamask/detect-provider";

window.addEventListener("load",async function () {
    const provider = await detectEthereumProvider();
    if (provider !== window.ethereum) {
        reject("Failed to connect");
    }
    await provider.request({ method: "eth_requestAccounts" });

    if (provider) {
        const web3 = new Web3(provider);
    }
})

所以我正在尝试将其翻译成 ClojureScript。这是我开始做的：

(ns token-stream.views
 (:require
  [re-frame.core :as re-frame]
  [web3 :as web3]
  ["@Metamask/detect-provider" :as detectEthereumProvider]))

(detectEthereumProvider/detectEthereumProvider)

知道如何翻译 JS 代码吗？

请注意，我想互操作 web3.js 库（不使用 cljs-web3）。

谢谢

解决方法

我使用了 cljs-web3：

部门：

[cljs-web3 "0.19.0-0-11"]

代码：

(require '[cljs-web3.core :as web3])
(require '[cljs-web3.eth :as web3.eth])

;; Create web3 instance from injected web3 (Mist / Metamask)
(web3/web3)

;; And then 

(def provides-web3?
  (boolean (aget js/window "web3")))

(def web3-instance js/web3
  #_(web3/create-web3 "http://localhost:8545/"))

(def network-type
  (case (web3/version-network web3-instance)
    "1" :local-development ; FIXME: same as main-net
    "2" :morden-network ; deprecated
    "3" :ropsten-network
    "4" :rinkeby-network
    "42" :kovan-network
    :unknown-network))

(println "account:" (first (web3.eth/accounts web3-instance)))