                                  msg))
                        (format "Done, node %s" (-> node first :id)))]
              (infof "%s" msg)
-             {:request {:name (-> node first :name)
+             {:request {:name (-> node first :id)
                         :args (-> node first :args)
                         :msg msg}
               :result jnres})))
         dfg))
+
+
 
 
 (comment




(defmacro future+ [& body]
  `(future
     (try
       ~@body

                    (str/split #"\n") first (str/split #": ") rest
                    (->> (str/join ": ")))})
       (catch clojure.lang.ExceptionInfo e#
         {:error (type e#)
          :msg (str (.getMessage e#) ": " (.getData e#))})
       (catch Exception e#
         {:error (type e#), :cause ((Throwable->map e#) :cause)
          :msg (-> e# Throwable->map :via first :message)}))))


(defn init-pgms
