           _ (spit rmq-tpn-json json-str)
           tpn (pschema/tpn-plan {:input [rmq-tpn-json]})
           error (:error tpn)]
+      (log/info "tmpdir:" tmpdir)
       (if error
         (do
           (log/error "Received invalid TPN over RMQ" rmq-tpn-json)

      (log/warn "PLANVIZ server stopped"))
    (log/warn "PLANVIZ server already stopped")))


;; plan input is in normalized (validated) format
;; convert to a flat map and then chunk it

            n-parts (inc (quot n-keys keys-per-msg))
            return :deferring-request-plan-part
            parts (create-plan-parts plan-id merged-plan return)]
        (log/info "LOAD-PLAN" plan-id type)
        (if (= :tpn-network type)
          (update-rmq-plan-id plan-id))
        (swap! state assoc-in [:plans plan-id]
               {:plan          merged-plan
                :begin         begin
