Skip to content
This repository was archived by the owner on Oct 21, 2022. It is now read-only.

Commit 589a74d

Browse files
committed
Merge pull request #18 from charles-dyfis-net/cljs-2202-compat
Clojurescript 0.0-2202 compat
2 parents 7cdae68 + d30bd8f commit 589a74d

3 files changed

Lines changed: 16 additions & 4 deletions

File tree

CHANGELOG.md

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,9 @@
11
#Changes
22

3+
##unreleased
4+
5+
* UPDATE: ClojureScript 2202
6+
37
##0.0.10
48

59
* FIX: disconnecting from a remote nrepl caused issues

lein-light-nrepl/project.clj

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@
1111
[ibdknox/analyzer "0.0.2"]
1212
[clj-stacktrace "0.2.7"]
1313
[fs "1.3.3"]
14-
[org.clojure/clojurescript "0.0-2173"
14+
[org.clojure/clojurescript "0.0-2202"
1515
:exclusions [org.apache.ant/ant]]
1616
[com.cemerick/pomegranate "0.2.0"]
1717
[clojure-complete "0.2.3"]

lein-light-nrepl/src/lighttable/nrepl/cljs.clj

Lines changed: 11 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -12,7 +12,6 @@
1212
[cljs.source-map :as sm]
1313
[cljs.env :as cljs-env :refer [with-compiler-env]]
1414
[clojure.test :as test]
15-
[cljs.closure :as cljsc]
1615
[clojure.java.io :as io]
1716
[cljs.tagged-literals :as tags]
1817
[clojure.set :as set :refer [difference union intersection]]
@@ -24,7 +23,16 @@
2423
[ibdknox.tools.reader.reader-types :as rt])
2524
(:import java.io.Writer))
2625

27-
26+
(def js-dependency-index
27+
"Try to get the js-dependency-index function from two places for
28+
compatibility with older cljs. This should be removed after support for
29+
cljs prior to 0.0-2197 is no longer desired"
30+
(->>
31+
(for [x ['cljs.closure/js-dependency-index
32+
'cljs.js-deps/js-dependency-index]]
33+
(some->> x resolve deref))
34+
(filter identity)
35+
(first)))
2836

2937
(defn without
3038
"Returns set s with x removed."
@@ -185,7 +193,7 @@
185193
{(-> dep :name) dep}))
186194

187195
(defn js-dep [{:keys [ns]}]
188-
(when-let [dep (get (cljsc/js-dependency-index {}) (str ns))]
196+
(when-let [dep (get (js-dependency-index {}) (str ns))]
189197
(let [deps (:requires dep)
190198
deps (if (not= ns 'goog)
191199
(conj deps 'goog)

0 commit comments

Comments
 (0)