realpath the bastard

This commit is contained in:
Michiel Borkent 2024-01-29 17:38:10 +01:00
parent a5e18d6bb7
commit 6d205f00ea

View file

@ -409,7 +409,7 @@ even more stuff here\"
entries (cp/split-classpath out)
entry (first entries)]
(is (= 1 (count entries)))
(is (= (fs/parent config) (fs/parent entry)))
(is (= (fs/real-path (fs/parent config)) (fs/real-path (fs/parent entry))))
(is (str/ends-with? entry "src"))))))
(deftest without-deps-test
@ -513,7 +513,7 @@ even more stuff here\"
(testing "default deps-root path is same as bb.edn"
(let [out (bb "--config" config "cp")
entries (cp/split-classpath out)]
(is (= (fs/parent f) (fs/parent (first entries))))))
(is (= (fs/real-path(fs/parent f)) (fs/real-path (fs/parent (first entries)))))))
(spit config
'{:paths ["src"]
:deps {local/dep {:local/root "local-dep"}}
@ -523,7 +523,7 @@ even more stuff here\"
_ (spit (str (fs/file root "deps.edn")) {})
out (bb "--config" config "cp")
entries (cp/split-classpath out)]
(is (= (fs/parent f) (fs/parent (first entries)))))))))
(is (= (fs/real-path (fs/parent f)) (fs/real-path (fs/parent (first entries))))))))))
(deftest adjacent-bb-edn-test
(is (= {1 {:id 1}} (bb "test-resources/adjacent_bb/medley.bb")))