 
 (defn load-pom [pom-location] (parse (java.io.File. pom-location)))
 
-;(def pom (load-pom "resources/pom.xml"))
+(def pom (load-pom "resources/pom.xml"))
 
 ;(:tag pom)
 ;(:attrs pom)

  [pom]
  (-> pom :content (nth 5) :content first))

(defn- get-properties-from-pom
  "Given a pom, extract the properties and see if they contain dependency version data."
  [pom]
  (-> pom :content (nth 7) :content))

;(get-properties-from-pom pom)

;(def properties (get-properties-from-pom pom))
;(first properties)

(defn- contains-version?
  "Checks a given member of the pom properties to see if it contains version number."

                         (= "version"))]
    has-version?))


(defn- parse-name
  [name]
  (-> (clojure.string/split (str name) #"\.")
      first
      (subs 1)))


(defn- get-dep-version-map
  "Given the properties portion of a pom, return a seq of "
  [properties]
  (let [properties-map (transient {})]
    (doseq [p properties]
      (assoc! properties-map (keyword (parse-name (:tag p))) (first (:content p))))
    (persistent! properties-map)))

(get-dep-version-map (get-properties-from-pom pom))


;;; Functions to process dependencyManagement

;;; Functions to process dependencies
