 ;== Util ==
 (def-rpc createmultisig nrequired the-keys)
 (def-rpc estimatefee nblocks)
-(def-rpc estimatepriority nblocks)
-(def-rpc estimatesmartfee nblocks)
-(def-rpc estimatesmartpriority nblocks)
+;(def-rpc estimatepriority nblocks)
+;(def-rpc estimatesmartfee nblocks)
+;(def-rpc estimatesmartpriority nblocks)
 
 (s/fdef signmessagewithprivkey :args (s/cat :privkey string?, :message string?) :ret ::signature)
 (def-rpc signmessagewithprivkey privkey message)

  ]
  ))

(defn java-signature-of [m]
  (format "buildSignatureFromThreadSafeMethod(\"%s\")" (java-fn-name-of m))
  )

(defn java-plugin-source-of [package classname]
  (reduce (fn [acc v] (format "%s\n%s" acc v)) [

  "@Override"
  "public DRAPLFunctionSignature[] getFunctions() {"
  "return new DRAPLFunctionSignature[] {"
  (reduce (fn [acc v] (format "%s,\n%s" acc v)) (map (fn [[i x]] (java-signature-of i x)) (meta-with-index)))
  
  "};"
  "}"
