   (let [control-file (file "." "control.clj")]
     (if-not (.exists control-file)
       (spit control-file 
-        (str 
-          "(defcluster :default-cluster\n"
-          "  :clients [\n"
-          "    {:host \"localhost\" :user \"root\"}\n"
-          "  ])\n"
-          "\n"
-          "(deftask :date \"echo date on cluster\""
-          "  []\n"
-          "  (ssh \"date\"))\n")))))
+            (str 
+             "(defcluster :default-cluster\n"
+             "  :clients [\n"
+             "    {:host \"localhost\" :user \"root\"}\n"
+             "  ])\n"
+             "\n"
+             "(deftask :date \"echo date on cluster\""
+             "  []\n"
+             "  (ssh \"date\"))\n")))))
 
 (defn run
   "Run user-defined clojure-control tasks against certain cluster"

      (refer-clojure)
      (use '[control core commands])
      (load-file
        (or 
          (get-config project :control-file)
          "./control.clj")))
  (catch java.io.FileNotFoundException e (println "control file not found."))))

(defn- run-control [project args]
  (do

(ns leiningen.control
  (:use [control.core :only [do-begin clusters]]
        [leiningen.help :only [help-for]]
        [clojure.java.io :only [file]]))

(defn- get-config [project key]
  (get-in project [:control key]))
