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

     (resource->target-path resource target-project read-target-project-clj))))

(defn update-namespaces! [namspaces source-project-desc]
  (m/info "\n****************** UPDATE NAMESPACE ******************\n*")
  (doseq [[namespace project] namspaces]
    (update-name-space! namespace project source-project-desc))
  (m/info "*\n******************************************************\n"))

(defn update-resouces! [resources source-project-desc]
  (m/info "\n****************** UPDATE RESOURCES ******************\n*")
  (doseq [[resource project] resources]
    (update-resource! resource project source-project-desc))
  (m/info "*\n******************************************************\n"))

(defn run-cmd [cmd]
  (m/info "... Executing " (str/join " " cmd))

      (contains? entry)))

(defn initial-question [namespace project]
  (str "* ==> The location of " namespace " on " (str/upper-case project)
       " could not be determined.\n"
       "      Please choose one of options (a number):"))

(defn localtion-question-with
  ([ns project [first & rest]]
