|
15 | 15 | [io.aviso.ansi :as ansi]
|
16 | 16 | [lread.status-line :as status]))
|
17 | 17 |
|
| 18 | +(def default-jdk "21") |
| 19 | + |
18 | 20 | (defn shcmd [cmd & args]
|
19 | 21 | (let [[opts cmd args] (if (map? cmd)
|
20 | 22 | [cmd (first args) (rest args)]
|
|
327 | 329 | "bin/test unit"]}
|
328 | 330 | {:name "clojure-lsp"
|
329 | 331 | :platforms [:clj]
|
330 |
| - :version "2025.05.27-13.56.57" |
| 332 | + :version "2025.06.06-19.04.49" |
331 | 333 | :github-release {:repo "clojure-lsp/clojure-lsp"}
|
332 | 334 | :patch-fn clojure-lsp-patch
|
333 | 335 | :show-deps-fn clojure-lsp-deps
|
334 | 336 | :test-cmds ["bb test"]}
|
| 337 | + {:name "clojure-mcp" |
| 338 | + :platforms [:clj] |
| 339 | + :version "0.1.1-alpha" |
| 340 | + :github-release {:repo "bhauman/clojure-mcp" |
| 341 | + :via :tag |
| 342 | + :version-prefix "v"} |
| 343 | + :patch-fn deps-edn-v1-patch |
| 344 | + :show-deps-fn cli-deps-tree |
| 345 | + :test-cmds ["clojure -M:test"]} |
335 | 346 | {:name "depot"
|
336 | 347 | :platforms [:clj]
|
337 | 348 | :note "1 patch required due to using, but not requiring, rewrite-clj.node"
|
|
369 | 380 | :test-cmds ["lein test"]}
|
370 | 381 | {:name "mranderson"
|
371 | 382 | :version "0.5.3"
|
| 383 | + :jdk 11 ;; Downgrade jdk from default, MrAnderson tests currently require the older jdk11 |
372 | 384 | :platforms [:clj]
|
373 | 385 | :github-release {:repo "benedekfazekas/mranderson"
|
374 | 386 | :via :tag
|
@@ -580,13 +592,18 @@ Specifying no lib-names selects all libraries.")
|
580 | 592 | (when-let [opts (main/doc-arg-opt args-usage args)]
|
581 | 593 | (cond
|
582 | 594 | (get opts "list")
|
583 |
| - (if (= "json" (get opts "--format")) |
584 |
| - (status/line :detail (->> libs |
585 |
| - (map (fn [{:keys [name requires]}] |
586 |
| - {:lib-name name |
587 |
| - :requires (or requires [])})) |
588 |
| - json/generate-string)) |
589 |
| - (status/line :detail (str "available libs: " (string/join " " (map :name libs))))) |
| 595 | + (let [format (get opts "--format") |
| 596 | + libs-for-ci (->> libs |
| 597 | + (map (fn [{:keys [name jdk requires]}] |
| 598 | + {:lib-name name |
| 599 | + :requires (or requires []) |
| 600 | + :jdk (or jdk default-jdk)})))] |
| 601 | + (case format |
| 602 | + "json" |
| 603 | + (status/line :detail (json/generate-string libs-for-ci)) |
| 604 | + "table" |
| 605 | + (status/line :detail (doric/table [:lib-name :jdk :requires] libs-for-ci)) |
| 606 | + (status/line :detail (str "available libs: " (string/join " " (map :name libs)))))) |
590 | 607 |
|
591 | 608 | :else
|
592 | 609 | (let [lib-names (get opts "<lib-name>")
|
|
0 commit comments