From a5e4dfe6634637a422eeb2fbb2316f83f03a0cd3 Mon Sep 17 00:00:00 2001 From: Michiel Borkent Date: Sat, 14 Oct 2023 21:11:49 +0200 Subject: [PATCH] Fix https://github.com/babashka/babashka.nrepl/issues/68 --- babashka.nrepl | 2 +- test/babashka/impl/nrepl_server_test.clj | 6 ++++-- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/babashka.nrepl b/babashka.nrepl index ce540ad2..37128afb 160000 --- a/babashka.nrepl +++ b/babashka.nrepl @@ -1 +1 @@ -Subproject commit ce540ad2c50f3cc3e6ed1131132074ccca41655a +Subproject commit 37128afb5a91fff673349c11a9c195c80d2d1725 diff --git a/test/babashka/impl/nrepl_server_test.clj b/test/babashka/impl/nrepl_server_test.clj index 05aa557a..108cc123 100644 --- a/test/babashka/impl/nrepl_server_test.clj +++ b/test/babashka/impl/nrepl_server_test.clj @@ -67,9 +67,11 @@ (let [msg (read-reply in session @id) id (:id msg) versions (:versions msg) - babashka-version (bytes->str (get versions "babashka"))] + babashka-version (bytes->str (get versions "babashka")) + ops (:ops msg)] (is (= 1 id)) - (is (= main/version babashka-version)))) + (is (= main/version babashka-version)) + (is (contains? ops "classpath")))) (testing "eval" (bencode/write-bencode os {"op" "eval" "code" "(+ 1 2 3)" "session" session "id" (new-id!)}) (let [msg (read-reply in session @id)