leiningen

Namespaces

lancet
leiningen
- checkout-deps
- classpath
- clean
- compile
- core
- deps
- help
- install
- jar
- new
- pom
- repl
- test
- uberjar
- version

doc source examples comments

1.2.0

1.2.0 permalink

read-git-origin

leiningen.pom

(read-git-origin git-dir)

Reads the URL for the remote origin repository.

0 Examples top

Source leiningen/pom.clj:29 top

(defn read-git-origin
  "Reads the URL for the remote origin repository."
  [git-dir]
  (with-open [rdr (reader (file git-dir "config"))]
    (->> (map #(.trim %) (line-seq rdr))
         (drop-while #(not= "[remote \"origin\"]" %))
         (next)
         (take-while #(not (.startsWith % "[")))
         (map #(re-matches #"url\s*=\s*(\S*)\s*" %))
         (filter identity)
         (first)
         (second))))

Vars in leiningen.pom/read-git-origin: ->> defn drop-while filter first identity line-seq map next not not= re-matches second take-while with-open

Used in 0 other vars

ClojureDocs(beta)

leiningen

Namespaces

read-git-origin

leiningen.pom

0 Examples top

See Also top

Source leiningen/pom.clj:29 top

Comments top

No comments for read-git-origin. Log in to add a comment.