      (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)))
 

           dest-path (.getPath dest)
           proto-path (.getAbsoluteFile (io/file (or (:proto-path project) "proto")))]
       (when (or (> (modtime proto-path) (modtime dest))
                 (> (modtime proto-path) (modtime "classes")))
         (.mkdirs dest)
         (.mkdirs proto-path)
         (doseq [proto protos]

              (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)))))
