Permalink
Browse files

fixed IP address output to properly list ALL ips for given node types.

  • Loading branch information...
1 parent dc4cba4 commit 40bc91ce7367ff66bf2df147f328cae7fc7a22de @petermelias petermelias committed Feb 1, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/clj/backtype/storm/provision.clj
@@ -31,8 +31,8 @@
(defn- print-ips-for-tag! [aws tag-str]
(let [running-node (filter running? (map (partial pallet.compute.jclouds/jclouds-node->node aws) (nodes-in-group aws tag-str)))]
(info (str "TAG: " tag-str))
- (info (str "PUBLIC: " (map primary-ip running-node)))
- (info (str "PRIVATE: " (map private-ip running-node)))))
+ (info (str "PUBLIC: " (clojure.string/join ", " (map primary-ip running-node))))
+ (info (str "PRIVATE: " (clojure.string/join ", " (map private-ip running-node))))))
(defn print-all-ips! [aws name]
(let [all-tags [(str "zookeeper-" name) (str "nimbus-" name) (str "supervisor-" name)]]

0 comments on commit 40bc91c

Please sign in to comment.