     (android-project? path)
     (some-> (read-android-project project)
             (leiningen.droid/doall []))
-    (:clr project)
+    (ios-project? path)
+    nil
+    (clr-project? path)
     (leiningen.clr/clr project "run")
-    (ring-project-map? project)
+    (ring-project? path)
     (leiningen.ring/ring project "server")
     :else
     (leiningen.run/run project)))


; utilities

(defn read-file
  [path]
  (let [length (.length (io/file path))]

  (or (.exists (io/file path "AndroidManifest.xml"))
      (.exists (io/file path "AndroidManifest.template.xml"))))

(defn ios-project?
  [path]
  (.exists (io/file path "Info.plist.xml")))

(defn java-project?
  [path]
  (some-> path read-project-clj java-project-map?))

(defn clojurescript-project?
  [path]
