yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Removed unused function

Browse source
This commit is contained in:
Max Barnash 2014-05-26 10:23:00 +04:00
parent 0f779b06a0
commit 965158c964
1 changed files with 0 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/leiningen/change.clj
View file

@ -66,10 +66,6 @@
(let [{:keys [tag]} (zip/node loc)]
(#{:comment :whitespace :newline} tag)))
(defn- newline? [loc]
(let [{:keys [tag]} (zip/node loc)]
(= :newline tag)))
(defn- find-defproject [loc]
(->> loc
(iterate zip/next)