 
 (deftest test-static-markup
   (is (= "<div>foo</div>"
-         (server/render-to-static-markup
-          [:div "foo"])))
+         (rstr [:div "foo"])))
   (is (= "<div class=\"bar\"><p>foo</p></div>"
-         (server/render-to-static-markup
-          [:div.bar [:p "foo"]])))
+         (rstr [:div.bar [:p "foo"]])))
   (is (= "<div class=\"bar\"><p>foobar</p></div>"
-         (server/render-to-static-markup
-          [:div.bar {:dangerously-set-inner-HTML
-                     {:__html "<p>foobar</p>"}} ]))))
+         (rstr [:div.bar {:dangerously-set-inner-HTML
+                          {:__html "<p>foobar</p>"}} ]))))
 
 (deftest test-return-class
   (when isClient


(deftest style-property-names-are-camel-cased
  (is (re-find #"<div style=\"text-align:center(;?)\">foo</div>"
               (server/render-to-static-markup
                 [:div {:style {:text-align "center"}} "foo"]))))

(deftest custom-element-class-prop
  (is (re-find #"<custom-element class=\"foobar\">foo</custom-element>"
               (server/render-to-static-markup
                 [:custom-element {:class "foobar"} "foo"])))

  (is (re-find #"<custom-element class=\"foobar\">foo</custom-element>"
               (server/render-to-static-markup
                 [:custom-element.foobar "foo"]))))

(deftest html-entities
  (testing "entity numbers can be unescaped always"
    (is (= "<i> </i>"
           (server/render-to-static-markup
             [:i (gstr/unescapeEntities "&#160;")]))))

  (when r/is-client
    (testing "When DOM is available, all named entities can be unescaped"
      (is (= "<i> </i>"
             (server/render-to-static-markup
               [:i (gstr/unescapeEntities "&nbsp;")]))))))

(defn context-wrapper []
  (r/create-class

(def isClient r/is-client)

(def rflush r/flush)

(defn rstr [react-elem]
  (server/render-to-static-markup react-elem))

(deftest really-simple-test
  (when (and isClient
