We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 372eeab commit 4004862Copy full SHA for 4004862
cider-connection.el
@@ -819,13 +819,14 @@ PARAMS is a plist as received by `cider-repl-create'."
819
(let* ((proj-dir (plist-get params :project-dir))
820
(host (plist-get params :host))
821
(port (plist-get params :port))
822
- (cljsp (member (plist-get params :repl-type) '(cljs)))
+ (cljsp (eq (plist-get params :repl-type) 'cljs))
823
(scored-repls
824
(delq nil
825
(mapcar (lambda (b)
826
(let ((bparams (cider--gather-connect-params nil b)))
827
- (when (eq cljsp (member (plist-get bparams :repl-type)
828
- '(cljs)))
+ (when (and cljsp
+ (eq (plist-get bparams :repl-type)
829
+ 'cljs))
830
(cons (buffer-name b)
831
(+
832
(if (equal proj-dir (plist-get bparams :project-dir)) 8 0)
0 commit comments