Don't try to get the script path in cider--enriched-cmd-p

We don't need it (yet) and Emacs 26 does not support
`split-string-shell-command`.
Don't want to fiddle with shell-quoting unless really necessary.

Author: vroide

cider.el

@@ -416,19 +416,13 @@ without interfering with classloaders."
     (clojure-cli . "clojure.sh")))
 
 (defun cider--enriched-cmd-p (cmd)
-  "Test if the shell-quoted CMD contains the name of an enrich-classpath script.
-Returns the local path to the script or nil."
+  "Test if the shell-quoted CMD contains the name of an enrich-classpath script."
   (let* ((script-names (map-values cider--enrich-classpath-script-names))
          (temp-prefix cider--temp-name-prefix)
          (any-name  (rx-to-string
                      `(or (: (or bos "/") (or ,@script-names) (or eos space))
-                          (: ,temp-prefix (or ,@script-names)))))
-         (script (thread-last
-                   (split-string-shell-command cmd)
-                   (seq-filter (lambda (part) (string-match any-name part)))
-                   (seq-first))))
-    (when script
-      (shell-quote-argument script))))
+                          (: ,temp-prefix (or ,@script-names))))))
+    (string-match any-name cmd)))
 
 (defun cider--get-enrich-classpath-script (project-type)
   "Get or create an executable enrich-classpath script for PROJECT-TYPE.

test/cider-tests.el

@@ -126,16 +126,16 @@
       for name in all-names do
       (describe (format "cider--enriched-cmd-p with script: %s" (concat path name))
         :var ((script (concat path name)))
-        (it "returns the script path in basic cases "
+        (it "is true in basic cases "
           (expect (cider--enriched-cmd-p (concat "bash " script " /usr/bin/lein"))
-                  :to-equal script)
+                  :to-be-truthy)
           (expect (cider--enriched-cmd-p (concat "TEST=1 bash " script " /usr/bin/env lein"))
-                  :to-equal script))
+                  :to-be-truthy))
         (it "handles a fully constructed jack-in-cmd."
           ;; TODO is it worth generating this?
           (let ((cmd (concat "bash " script  " /usr/local/bin/lein update-in :dependencies conj \[nrepl/nrepl\ \"1.0.0\"\] -- update-in :plugins conj \[cider/cider-nrepl\ \"0.43.0\"\] -- update-in :plugins conj \[mx.cider/lein-enrich-classpath\ \"1.18.2\"\] -- update-in :middleware conj cider.enrich-classpath.plugin-v2/middleware -- repl :headless :host localhost")))
             (expect (cider--enriched-cmd-p cmd)
-                    :to-equal script))))))))
+                    :to-be-truthy))))))))
 
 ;;; cider-jack-in tests
 (describe "cider--gradle-dependency-notation"