From 0bd935cc55f72baa3fe0a668db599b3e1e760322 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?KARASZI=20Istv=C3=A1n?= Date: Mon, 22 Feb 2016 11:18:26 +0100 Subject: [PATCH] Move sequence realization to with-open --- src/hu/ssh/github_changelog/dependencies/bundler.clj | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/hu/ssh/github_changelog/dependencies/bundler.clj b/src/hu/ssh/github_changelog/dependencies/bundler.clj index 4658145..83a8026 100644 --- a/src/hu/ssh/github_changelog/dependencies/bundler.clj +++ b/src/hu/ssh/github_changelog/dependencies/bundler.clj @@ -7,8 +7,7 @@ (->> (line-seq reader) (drop-while #(not= % " specs:")) (drop 1) - (take-while seq) - doall)) + (take-while seq))) (defn- parse-spec [spec] {:name (second spec) :version (nth spec 2)}) @@ -20,4 +19,4 @@ (defn parse [file] (with-open [reader (io/reader file)] - (parse-specs (get-specs reader)))) + (doall (parse-specs (get-specs reader)))))