ex-triage 在 :clojure.error/source 中提供了完整路径

Question

{{ex-triage}} 的 ClojureScript 实现在应该只提供文件名时，在 {{:clojure.error/source}} 中提供了完整路径。

要重现，请向 {{cljs.repl-test}} 添加单元测试。


(deftest test-cljs-xxxx)
  (let [m {:phase :compilation
           :via [{:data {:clojure.error/source "/home/me/project/src/foo/baz.cljs"}}]}]
    (is (= "baz.cljs" (:clojure.error/source (cljs.repl/ex-triage m))))))


这失败了


FAIL in (test-cljs-xxxx) (core-advanced-test.js:1370:83)
期望: (= "baz.cljs" (:clojure.error/source (cljs.repl/ex-triage m)))
  实际: (not (= "baz.cljs" "/home/me/project/src/foo/baz.cljs"))

Answer 1

参考： https://clojure.atlassian.net/browse/CLJS-3110（由 mfikes 报告）