@@ -225,6 +225,19 @@ often connecting to a remote REPL process."
225
225
:safe #'inf-clojure--endpoint-p
226
226
:package-version '(inf-clojure . " 2.0.0" ))
227
227
228
+ (defcustom inf-clojure-tools-deps-cmd " clj"
229
+ " The command used to start a Clojure REPL for tools.deps projects.
230
+
231
+ Alternatively you can specify a TCP connection cons pair, instead
232
+ of command, consisting of a host and port
233
+ number (e.g. (\" localhost\" . 5555)). That's useful if you're
234
+ often connecting to a remote REPL process."
235
+ :type '(choice (string )
236
+ (cons string integer))
237
+ :risky #'stringp
238
+ :safe #'inf-clojure--endpoint-p
239
+ :package-version '(inf-clojure . " 2.1.0" ))
240
+
228
241
(defcustom inf-clojure-generic-cmd " lein repl"
229
242
" The command used to start a Clojure REPL outside Lein/Boot projects.
230
243
@@ -503,7 +516,7 @@ to continue it."
503
516
(t str)))
504
517
505
518
(defvar inf-clojure-project-root-files
506
- '(" project.clj" " build.boot" )
519
+ '(" project.clj" " build.boot" " deps.edn " )
507
520
" A list of files that can be considered project markers." )
508
521
509
522
(defun inf-clojure-project-root ()
@@ -523,13 +536,15 @@ Fallback to `default-directory.' if not within a project."
523
536
(let ((default-directory (inf-clojure-project-root)))
524
537
(cond ((file-exists-p " project.clj" ) " lein" )
525
538
((file-exists-p " build.boot" ) " boot" )
539
+ ((file-exists-p " deps.edn" ) " tools.deps" )
526
540
(t " generic" )))))
527
541
528
542
(defun inf-clojure-cmd (project-type )
529
543
" Determine the command `inf-clojure' needs to invoke for the PROJECT-TYPE."
530
544
(pcase project-type
531
545
(" lein" inf-clojure-lein-cmd)
532
546
(" boot" inf-clojure-boot-cmd)
547
+ (" tools.deps" inf-clojure-tools-deps-cmd)
533
548
(_ inf-clojure-generic-cmd)))
534
549
535
550
(defun inf-clojure-clear-repl-buffer ()
0 commit comments