|
112 | 112 | (describe "when there is a single dependency" |
113 | 113 | (before-each |
114 | 114 | (setq-local cider-injected-nrepl-version "0.9.0") |
115 | | - (setq-local cider-injected-middleware-version "0.28.1") |
| 115 | + (setq-local cider-injected-middleware-version "0.28.3") |
116 | 116 | (setq-local cider-jack-in-nrepl-middlewares '("cider.nrepl/cider-middleware")) |
117 | 117 | (setq-local cider-jack-in-dependencies-exclusions '()) |
118 | 118 | (setq-local cider-enrich-classpath t)) |
|
122 | 122 | :to-equal (concat "update-in :dependencies conj " |
123 | 123 | (shell-quote-argument "[nrepl/nrepl \"0.9.0\"]") |
124 | 124 | " -- update-in :plugins conj " |
125 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 125 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
126 | 126 | " -- update-in :plugins conj " |
127 | 127 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
128 | 128 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
135 | 135 | "update-in :dependencies conj " |
136 | 136 | (shell-quote-argument "[nrepl/nrepl \"0.9.0\" :exclusions [org.clojure/clojure]]") |
137 | 137 | " -- update-in :plugins conj " |
138 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 138 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
139 | 139 | " -- update-in :plugins conj " |
140 | 140 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
141 | 141 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
147 | 147 | :to-equal (concat "update-in :dependencies conj " |
148 | 148 | (shell-quote-argument "[nrepl/nrepl \"0.9.0\" :exclusions [org.clojure/clojure foo.bar/baz]]") |
149 | 149 | " -- update-in :plugins conj " |
150 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 150 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
151 | 151 | " -- update-in :plugins conj " |
152 | 152 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
153 | 153 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
160 | 160 | " -d " |
161 | 161 | (shell-quote-argument "nrepl/nrepl:0.9.0") |
162 | 162 | " -d " |
163 | | - (shell-quote-argument "cider/cider-nrepl:0.28.1") |
| 163 | + (shell-quote-argument "cider/cider-nrepl:0.28.3") |
164 | 164 | " cider.tasks/add-middleware" |
165 | 165 | " -m " |
166 | 166 | (shell-quote-argument "cider.nrepl/cider-middleware") |
|
183 | 183 | " -- update-in :plugins conj " |
184 | 184 | (shell-quote-argument "[refactor-nrepl \"2.0.0\"]") |
185 | 185 | " -- update-in :plugins conj " |
186 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 186 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
187 | 187 | " -- update-in :plugins conj " |
188 | 188 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
189 | 189 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
196 | 196 | " -d " |
197 | 197 | (shell-quote-argument "nrepl/nrepl:0.9.0") |
198 | 198 | " -d " |
199 | | - (shell-quote-argument "cider/cider-nrepl:0.28.1") |
| 199 | + (shell-quote-argument "cider/cider-nrepl:0.28.3") |
200 | 200 | " -d " |
201 | 201 | (shell-quote-argument "refactor-nrepl:2.0.0") |
202 | 202 | " cider.tasks/add-middleware" |
|
217 | 217 | :to-equal (concat "-o -U update-in :dependencies conj " |
218 | 218 | (shell-quote-argument "[nrepl/nrepl \"0.9.0\"]") |
219 | 219 | " -- update-in :plugins conj " |
220 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 220 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
221 | 221 | " -- update-in :plugins conj " |
222 | 222 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
223 | 223 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
228 | 228 | " -d " |
229 | 229 | (shell-quote-argument "nrepl/nrepl:0.9.0") |
230 | 230 | " -d " |
231 | | - (shell-quote-argument "cider/cider-nrepl:0.28.1") |
| 231 | + (shell-quote-argument "cider/cider-nrepl:0.28.3") |
232 | 232 | " cider.tasks/add-middleware" |
233 | 233 | " -m " |
234 | 234 | (shell-quote-argument "cider.nrepl/cider-middleware") |
|
248 | 248 | (setq-local cider-jack-in-nrepl-middlewares '(("refactor-nrepl.middleware/wrap-refactor" :predicate middlewares-predicate) "cider.nrepl/cider-middleware" ("another/middleware")))) |
249 | 249 | (it "includes plugins whose predicates return true" |
250 | 250 | (expect (cider-jack-in-normalized-lein-plugins) |
251 | | - :to-equal '(("refactor-nrepl" "2.0.0") ("cider/cider-nrepl" "0.28.1")))) |
| 251 | + :to-equal '(("refactor-nrepl" "2.0.0") ("cider/cider-nrepl" "0.28.3")))) |
252 | 252 | (it "includes middlewares whose predicates return true" |
253 | 253 | (expect (cider-jack-in-normalized-nrepl-middlewares) |
254 | 254 | :to-equal '("refactor-nrepl.middleware/wrap-refactor" "cider.nrepl/cider-middleware" "another/middleware"))) |
255 | 255 | (it "ignores plugins whose predicates return false" |
256 | 256 | (spy-on 'plugins-predicate :and-return-value nil) |
257 | 257 | (expect (cider-jack-in-normalized-lein-plugins) |
258 | | - :to-equal '(("cider/cider-nrepl" "0.28.1"))) |
| 258 | + :to-equal '(("cider/cider-nrepl" "0.28.3"))) |
259 | 259 | (spy-on 'middlewares-predicate :and-return-value nil) |
260 | 260 | (expect (cider-jack-in-normalized-nrepl-middlewares) |
261 | 261 | :to-equal '("cider.nrepl/cider-middleware" "another/middleware"))) |
|
284 | 284 | :and-return-value '("refactor-nrepl.middleware/wrap-refactor" "cider.nrepl/cider-middleware")) |
285 | 285 | (spy-on 'cider-jack-in-normalized-lein-plugins |
286 | 286 | :and-return-value '(("refactor-nrepl" "2.0.0") |
287 | | - ("cider/cider-nrepl" "0.28.1") |
| 287 | + ("cider/cider-nrepl" "0.28.3") |
288 | 288 | ("mx.cider/enrich-classpath" "1.9.0"))) |
289 | 289 | (setq-local cider-jack-in-dependencies-exclusions '()) |
290 | 290 | (setq-local cider-enrich-classpath t)) |
|
295 | 295 | " -- update-in :plugins conj " |
296 | 296 | (shell-quote-argument "[refactor-nrepl \"2.0.0\"]") |
297 | 297 | " -- update-in :plugins conj " |
298 | | - (shell-quote-argument "[cider/cider-nrepl \"0.28.1\"]") |
| 298 | + (shell-quote-argument "[cider/cider-nrepl \"0.28.3\"]") |
299 | 299 | " -- update-in :plugins conj " |
300 | 300 | (shell-quote-argument "[mx.cider/enrich-classpath \"1.9.0\"]") |
301 | 301 | " -- update-in :middleware conj cider.enrich-classpath/middleware" |
|
313 | 313 | " -d " |
314 | 314 | (shell-quote-argument "nrepl/nrepl:0.9.0") |
315 | 315 | " -d " |
316 | | - (shell-quote-argument "cider/cider-nrepl:0.28.1") |
| 316 | + (shell-quote-argument "cider/cider-nrepl:0.28.3") |
317 | 317 | " -d " |
318 | 318 | (shell-quote-argument "refactor-nrepl:2.0.0") |
319 | 319 | " cider.tasks/add-middleware" |
|
399 | 399 | (it "uses main opts in an alias to prevent other mains from winning" |
400 | 400 | (setq-local cider-jack-in-nrepl-middlewares '("cider.nrepl/cider-middleware")) |
401 | 401 | (let ((expected (string-join '("clojure -Sdeps '{:deps {nrepl/nrepl {:mvn/version \"0.9.0\"} " |
402 | | - "cider/cider-nrepl {:mvn/version \"0.28.1\"}} " |
| 402 | + "cider/cider-nrepl {:mvn/version \"0.28.3\"}} " |
403 | 403 | ":aliases {:cider/nrepl {:main-opts [\"-m\" \"nrepl.cmdline\" \"--middleware\"" |
404 | 404 | " \"[cider.nrepl/cider-middleware]\"]}}}' -M:cider/nrepl") |
405 | 405 | ""))) |
|
413 | 413 | :to-equal expected))) |
414 | 414 | (it "allows specifying custom aliases with `cider-clojure-cli-aliases`" |
415 | 415 | (let ((expected (string-join '("clojure -Sdeps '{:deps {nrepl/nrepl {:mvn/version \"0.9.0\"} " |
416 | | - "cider/cider-nrepl {:mvn/version \"0.28.1\"}} " |
| 416 | + "cider/cider-nrepl {:mvn/version \"0.28.3\"}} " |
417 | 417 | ":aliases {:cider/nrepl {:main-opts [\"-m\" \"nrepl.cmdline\" \"--middleware\"" |
418 | 418 | " \"[cider.nrepl/cider-middleware]\"]}}}' -M:dev:test:cider/nrepl") |
419 | 419 | ""))) |
|
426 | 426 | (expect (plist-get (cider--update-jack-in-cmd nil) :jack-in-cmd) |
427 | 427 | :to-equal expected))) |
428 | 428 | (let ((expected (string-join '("-Sdeps '{:deps {nrepl/nrepl {:mvn/version \"0.9.0\"} " |
429 | | - "cider/cider-nrepl {:mvn/version \"0.28.1\"}} " |
| 429 | + "cider/cider-nrepl {:mvn/version \"0.28.3\"}} " |
430 | 430 | ":aliases {:cider/nrepl {:main-opts [\"-m\" \"nrepl.cmdline\" \"--middleware\"" |
431 | 431 | " \"[cider.nrepl/cider-middleware]\"]}}}' -M:cider/nrepl") |
432 | 432 | ""))) |
|
436 | 436 | :to-equal expected))) |
437 | 437 | (it "handles aliases correctly" |
438 | 438 | (let ((expected (string-join '("-Sdeps '{:deps {nrepl/nrepl {:mvn/version \"0.9.0\"} " |
439 | | - "cider/cider-nrepl {:mvn/version \"0.28.1\"}} " |
| 439 | + "cider/cider-nrepl {:mvn/version \"0.28.3\"}} " |
440 | 440 | ":aliases {:cider/nrepl {:main-opts [\"-m\" \"nrepl.cmdline\" \"--middleware\"" |
441 | 441 | " \"[cider.nrepl/cider-middleware]\"]}}}' -M:test:cider/nrepl") |
442 | 442 | "")) |
|
459 | 459 | :to-equal expected))))) |
460 | 460 | (it "allows for global options" |
461 | 461 | (let ((expected (string-join '("-J-Djdk.attach.allowAttachSelf -Sdeps '{:deps {nrepl/nrepl {:mvn/version \"0.9.0\"} " |
462 | | - "cider/cider-nrepl {:mvn/version \"0.28.1\"}} " |
| 462 | + "cider/cider-nrepl {:mvn/version \"0.28.3\"}} " |
463 | 463 | ":aliases {:cider/nrepl {:main-opts [\"-m\" \"nrepl.cmdline\" \"--middleware\"" |
464 | 464 | " \"[cider.nrepl/cider-middleware]\"]}}}' -M:test:cider/nrepl") |
465 | 465 | "")) |
|
0 commit comments