      (apply compile project (proto-files (io/file (or (:proto-path project) "proto")))))
   ([project & files]
      (install project)
-     (when (= "protobuf" (:name project))
-       (fetch project)
+     (when (and (= "protobuf" (:name project)))
        (compile-google-protobuf project))
      (protoc project files)))
 

(defn compile-google-protobuf
  "Compile com.google.protobuf.*"
  [project]
  (let [proto-files (io/file "proto/google/protobuf")
        target (target project)]
    (.mkdirs proto-files)
    (io/copy (io/file target srcdir "src/google/protobuf/descriptor.proto")
             (io/file proto-files "descriptor.proto"))
    (protoc project
            ["google/protobuf/descriptor.proto"]
            (io/file target srcdir "java/src/main/java"))))

(defn compile
  "Compile protocol buffer files located in proto dir."

              (recur (into files (proto-dependencies proto-file))))))))))

(defn modtime [dir]
  (let [files (->> dir io/file file-seq rest)]
    (if (empty? files)
      0
      (apply max (map fs/mod-time files)))))
