   (update-files!
    (if (= 1 (count source-paths))
      (first source-paths)
-     (ask-for-localtion namespace project source-paths))
+     (ask-for-localtion namespace "This Project" source-paths))
    (if (= 1 (count target-paths))
      (first target-paths)
      (ask-for-localtion namespace project target-paths))))

  (try
    (io/make-parents (io/file to-file))
    (spit (io/file to-file) (slurp (io/file from-file)))
    (m/info "* " to-file)
    (catch FileNotFoundException e
      (m/info "* Could not synchronize" to-file "because: " (.getMessage e)))))

(defn should-update? [entry-definition entry target-project]
  (-> target-project

(defn update-file-if-exists! [name target-project source-paths target-paths]
  (let [existing-source-paths (filter ns-exists? source-paths)
        existing-target-paths (filter ns-exists? target-paths)]
    (m/info "* Update" name "to the project" (str/upper-case target-project))
    (cond
      ;source and target exist and unique
      (and (= 1 (count existing-source-paths))
