Permalink
Browse files

Remove TODOs that have been fixed in lein2.

  • Loading branch information...
1 parent e83da99 commit 09a1439ee3689c42ef3a3efff29d0c41927a8add @technomancy committed Mar 27, 2012
View
2 src/leiningen/core.clj
@@ -97,7 +97,6 @@ Warning: alpha; subject to change."
(normalize-path# (or (:dev-resources-path m#)
(:test-resources-path m#)
"test-resources"))
- ;; TODO: remove in 2.0
:test-resources-path
(normalize-path# (or (:dev-resources-path m#)
(:test-resources-path m#)
@@ -107,7 +106,6 @@ Warning: alpha; subject to change."
:target-dir (normalize-path#
(or (:target-dir m#) (:jar-dir m#)
root#))
- ;; TODO: remove in 2.0
:jar-dir (normalize-path#
(or (:target-dir m#) (:jar-dir m#)
root#))
View
2 src/leiningen/deps.clj
@@ -31,7 +31,6 @@
(defn- make-policy [policy-settings enabled?]
(doto (RepositoryPolicy.)
(.setUpdatePolicy (update-policies (:update policy-settings :daily)))
- ;; TODO: change default to :fail in 2.0
(.setChecksumPolicy (checksum-policies (:checksum policy-settings :warn)))
(.setEnabled (boolean enabled?))))
@@ -76,7 +75,6 @@
:overwrite "on"} ; needed for plugins
fileset))
-;; TODO: remove in 2.0; with local-repo-classpath it's unnecessary
(defmethod copy-dependencies :symlink [k destination flatten? fileset]
(let [files (.getIncludedFiles
(.getDirectoryScanner fileset lancet/ant-project))
View
1 src/leiningen/plugin.clj
@@ -41,7 +41,6 @@ Syntax: lein plugin uninstall [GROUP/]ARTIFACT-ID VERSION"
:when (re-find pat plugin)]
(.delete (file plugins-path plugin))))
-;; TODO: extract shared behavior between this and the install task
(defn install
"Download, package, and install plugin jarfile into ~/.lein/plugins
Syntax: lein plugin install [GROUP/]ARTIFACT-ID VERSION
View
1 src/leiningen/repl.clj
@@ -143,7 +143,6 @@ directory will start a standalone repl session."
server-form (apply repl-server project host port
(concat (:repl-options project)
(:repl-options (user-settings))))
- ;; TODO: make this less awkward when we can break poll-repl-connection
retries (- retry-limit (or (:repl-retry-limit project)
((user-settings) :repl-retry-limit)
retry-limit))]
View
1 src/leiningen/test.clj
@@ -7,7 +7,6 @@
[leiningen.compile :only [eval-in-project]])
(:import (java.io File)))
-;; TODO: switch to using *interactive* flag in 2.0.
(def ^{:dynamic true} *exit-after-tests* true)
(defn- form-for-hook-selectors [selectors]
View
1 src/leiningen/uberjar.clj
@@ -86,7 +86,6 @@ as well as defining a -main function."
(with-open [out (-> standalone-filename
(FileOutputStream.)
(ZipOutputStream.))]
- ;; TODO: broken with :local-classpath-repo and :eval-in-leiningen:
(let [deps (->> (.listFiles (file (:library-path project)))
(filter #(.endsWith (.getName %) ".jar")))
jars (cons (file (get-jar-filename project)) deps)]
View
1 src/leiningen/util/maven.clj
@@ -165,7 +165,6 @@
(doto (Dependency.)
;; Allow org.clojure group to be omitted from clojure/contrib deps.
(.setGroupId (if (and (nil? (namespace dep))
- ;; TODO: drop contrib special-case in 2.0
(re-find #"^clojure(-contrib)?$" (name dep)))
"org.clojure"
(or (namespace dep) (name dep))))

0 comments on commit 09a1439

Please sign in to comment.