Function: cider--running-lein-nrepl-paths

cider--running-lein-nrepl-paths is a byte-compiled function defined in cider.el.

Signature

(cider--running-lein-nrepl-paths)

Documentation

Retrieve project paths of running lein nREPL servers.

Use cider-ps-running-lein-nrepls-command and cider-ps-running-lein-nrepl-path-regexp-list.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/cider.el
(defun cider--running-lein-nrepl-paths ()
  "Retrieve project paths of running lein nREPL servers.
Use `cider-ps-running-lein-nrepls-command' and
`cider-ps-running-lein-nrepl-path-regexp-list'."
  (unless (eq system-type 'windows-nt)
    (let (paths)
      (with-temp-buffer
        (insert (shell-command-to-string cider-ps-running-lein-nrepls-command))
        (dolist (regexp cider-ps-running-lein-nrepl-path-regexp-list)
          (goto-char 1)
          (while (re-search-forward regexp nil t)
            (setq paths (cons (match-string 1) paths)))))
      (seq-mapcat (lambda (path)
                    (cider--path->path-port-pairs path))
                  paths))))