Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Use a less silly way to read form from a string.

  • Loading branch information...
commit 4949dfb3792cc612070f2113e8c98c5667b1f086 1 parent e76dc2e
@mtyaka authored
Showing with 1 addition and 3 deletions.
  1. +1 −3 src/leiningen/oneoff.clj
View
4 src/leiningen/oneoff.clj
@@ -77,9 +77,7 @@ for a one-off project."
(add-hook swank-form-var oneoff-swank-form-hook))
(defn parse-defdeps [script]
- (let [contents (slurp script)
- forms (load-string (str "(quote [" contents "])"))
- form (first forms)]
+ (let [form (read-string (slurp script))]
(if (= (first form) 'defdeps)
[(nth form 1) (nth form 2 {})]
[default-deps {}])))
Please sign in to comment.
Something went wrong with that request. Please try again.