      ~@body))
 
 (defonce system-channel-name "")
-
-;;; query_chain-info
-(defn query-channels
-    "This is a network call to the designated Peer(s) to discover the chain information.
-  The target Peer(s) must be part of the chain in question to be able to return the requested
-  information.
-  Params:
-        name (str): The name of the chain
-        peers (array of Peer instances): target Peers to query
-  Returns: 
-        (Chain instance or None): the chain instance for the name.
-  Error: 
-        The target Peer(s) does not know anything about the chain"
-  ([channel-name peers]
-   (query-channels core/*user* channel-name peers))
-  ([user channel-name target-peers]
-   (let [{:keys [crypto-suite user-context] :as channel} (get-channel user channel-name)]
-     (with-validating-peers [channel target-peers]
-                             (chaincode/send-chaincode-request :query-channels
-                                                               system-channel-name
-                                                               target-peers
-                                                               user
-                                                               {})))))
 
 ;; (defonce ^:private client-state-store (atom {}))
 ;; ;;; set_state_store

;; (make-tgz-package :golang "github.com/example_cc" "/home/jc/Work/clojure-fabric/resources/gocc")


(defn install-chaincode
  ([name path version package-filename type target-peers]
   (install-chaincode core/*user* name path version package-filename target-peers))

         (proto/make-config-signature :signature-header signature-header
                                      :signature))))

;;;
;;; Utility functions
;;;
(defonce default-tgz-size 500000)       ;500kb, from Java SDK

(defonce type->file-extensions {:golang #{"go"} :java #{"java"} :node #{"js"}})
