fixes

Author: borkdude

src/sci/impl/resolve.cljc

@@ -71,7 +71,7 @@
             [sym (if (and call? #?(:clj (not (str/starts-with? sym-name-str "."))))
                    (with-meta
                      [clazz #?(:clj sym-name
-                               :cljs (.split (str sym-name) "."))
+                               :cljs (.split (utils/munge-str (str sym-name)) "."))
                       sym-ns]
                      #?(:clj
                         (if (= "new" sym-name-str)

test/sci/interop_test.cljc

@@ -399,7 +399,7 @@
      (is (= 1 (sci/eval-string "(def x #js {:foo_bar (fn [] 1)}) (.foo-bar x)" {:classes {:allow :all}})))
      (testing "reserved keyword munging is bypassed"
        (is (= 1 (sci/eval-string "(def x #js {:catch (fn [] 1)}) (.catch x)" {:classes {:allow :all}})))
-       #_(is (= 1 (sci/eval-string "(d/foo-bar)" {:imports {'d 'dude}
+       (is (= 1 (sci/eval-string "(d/foo-bar)" {:imports {'d 'dude}
                                                 :classes {:allow :all 'dude #js {:foo_bar (fn [] 1)}}}))))
      (is (= {:foo_bar 1} (sci/eval-string "(js->clj (doto #js {} (set! -foo-bar 1)) :keywordize-keys true)" {:classes {:allow :all}})))
      (testing "dotted access"