    project
    `(do (println "Running destroy-cluster.")
         (forma.hadoop.cluster/destroy-cluster ~node-type)
-        (println "Cluster destroyed! Hit Control-C to exit."))))
+        (println "Cluster destroyed!")
+        (println "Hit Control-C to exit."))))
 
 (defn show-jobtracker-ip
   [project node-type]

   `(do (println (str (format "Create cluster of %s instances and %d nodes."
                              ~node-type ~node-count)))
        (forma.hadoop.cluster/create-cluster ~node-type ~node-count)
        (println "Cluster created! Hit Control-C to exit."))))

(defn destroy-cluster
  [project node-type]

     project
     `(do (let [jobtracker-ip# (forma.hadoop.cluster/jobtracker-ip ~node-type)]
            (println "Pretending to run some shit.")
            (comment "scp uberjar up to jobtracker ip.")
            (println "Hit Control-C to exit."))))))

(defn cluster
  "Start or destroy a pallet-hadoop cluster.
