update docs
This commit is contained in:
parent
9fecfeee46
commit
02922ccc55
15
commitly
15
commitly
@ -18,11 +18,16 @@
|
||||
(not (str/blank? (:out result)))))
|
||||
|
||||
(defn find-subrepos [parent-dir]
|
||||
"Find all git repositories in parent directory"
|
||||
(->> (fs/list-dir parent-dir)
|
||||
(filter fs/directory?)
|
||||
(filter git-repo?)
|
||||
(map str)))
|
||||
"Find all git repositories in parent directory, including parent itself"
|
||||
(let [child-repos (->> (fs/list-dir parent-dir)
|
||||
(filter fs/directory?)
|
||||
(filter git-repo?)
|
||||
(map str))
|
||||
parent-is-repo? (git-repo? parent-dir)
|
||||
repos (if parent-is-repo?
|
||||
(cons (str parent-dir) child-repos)
|
||||
child-repos)]
|
||||
repos))
|
||||
|
||||
(defn commit-changes [repo-path message]
|
||||
"Commit all changes in repository with given message"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user