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

Use require-resolve in update-in for function.

Browse source 
Fixes #1728.
This commit is contained in:
Phil Hagelberg 2014-10-14 13:43:45 -07:00
parent 96f24b3058
commit d7c069f6c0
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/leiningen/update_in.clj
View file

@ -3,12 +3,13 @@
(:refer-clojure :exclude [update-in]) (:refer-clojure :exclude [update-in])
(:require [leiningen.core.main :as main] (:require [leiningen.core.main :as main]
[leiningen.core.project :as project] [leiningen.core.project :as project]
[leiningen.core.utils :as utils]
[clojure.core :as clj])) [clojure.core :as clj]))
(defn ^:internal parse-args [key-path f args] (defn ^:internal parse-args [key-path f args]
(let [[f-args [_ & task+args]] (split-with #(not= "--" %) args)] (let [[f-args [_ & task+args]] (split-with #(not= "--" %) args)]
[(mapv keyword (rest (.split key-path ":"))) [(mapv keyword (rest (.split key-path ":")))
(resolve (read-string f)) (utils/require-resolve (read-string f))
(mapv read-string f-args) (mapv read-string f-args)
task+args])) task+args]))