 
 (defmacro are-html-expanded [& body]
   `(are [form# expected#]
-     (is (= (replace-js-literals expected#)
-            (replace-gensyms (replace-js-literals (html-expand form#)))))
+     (is (= (wrap-js-value expected#)
+            (wrap-js-value (replace-gensyms (html-expand form#)))))
      ~@body))
 
 (deftest test-to-js

      #js {:href (str "#show/" (:key datum))})
     (js/React.DOM.div
      #js {:id (str "item" (:key datum)), :className "class1 class2"}
      (js/React.DOM.span {:className "anchor"} (sablono.interpreter/interpret (:name datum)))))))

(deftest test-issue-2-merge-classname
  (are-html-expanded

     '(let* [attrs (str "bar" "baz")]
            (if (clojure.core/map? attrs)
              (js/React.DOM.div (sablono.interpreter/attributes (sablono.util/merge-with-class {:className ["foo"]} attrs)) nil)
              (js/React.DOM.div #js {:className "foo"} (sablono.interpreter/interpret attrs))))
     '[:div.a.b] '(js/React.DOM.div #js {:className "a b"})
     '[:div.a.b.c] '(js/React.DOM.div #js {:className "a b c"})
     '[:div#foo.bar.baz] '(js/React.DOM.div #js {:id "foo", :className "bar baz"}))))
