                                    "stringify-keys"
                                    "walk"])]
     (is (success? @_res_) (str _msg_ " should succeed"))
-    (is (valid-eval-result? dirstring) (str _msg_ " should be a valid result"))
-    (is (= expected dirstring) (str _msg_ " should return valid docstring")))
+    (is (valid-eval-result? dirstring) (str _msg_ "should be a valid result"))
+    (is (= expected dirstring) (str _msg_ "should return valid docstring")))
   (_reset!_ '[clojure.walk]))
 
 (h/read-eval-call-test e/*target-opts*
   ["(apropos \"join\")"]
   (let [result (unwrap-result @_res_)
         expected "(cljs.core/-disjoin cljs.core/-disjoin!)"]
-    (is (success? @_res_) (str _msg_ " should succeed"))
-    (is (valid-eval-result? result) (str _msg_ " should be a valid result"))
-    (is (= expected result) (str _msg_ " should return valid docstring")))
+    (is (success? @_res_) (str _msg_ "should succeed"))
+    (is (valid-eval-result? result) (str _msg_ "should be a valid result"))
+    (is (= expected result) (str _msg_ "should return valid docstring")))
   (_reset!_))
 
 (h/read-eval-call-test e/*target-opts*

clojure.set
  Set operations such as union/intersection.
"]
    (is (success? @_res_) (str _msg_ " should succeed"))
    (is (valid-eval-result? result) (str _msg_ " should be a valid result"))
    (is (= expected result) (str _msg_ " should return a valid docstring.")))
  (_reset!_ '[clojure.set]))

;; without requiring clojure.string

  Removes all trailing newline \\n or return \\r characters from
  string.  Similar to Perl's chomp.
"]
    (is (success? @_res_) (str _msg_ "should succeed"))
    (is (valid-eval-result? result) (str _msg_ "should be a valid result"))
    (is (= expected result) (str _msg_ "should return valid docstring")))
  (_reset!_ '[clojure.string goog.string goog.string.StringBuffer]))

(h/read-eval-call-test e/*target-opts*
  ["(load-file \"foo/load.clj\")"]
  (let [result (unwrap-result @_res_)]
    (is (success? @_res_) (str _msg_ "should succeed"))
    (is (valid-eval-result? result) (str _msg_ "should be a valid result"))
    (is (= "#'foo.load/c" result) (str _msg_ "should return #'foo.load/c (last evaluated expression)"))
    (is (= (repl/current-ns) 'cljs.user) (str _msg_ "should not change namespace")))
  (_reset!_ '[foo.load foo.bar.baz clojure.string goog.string goog.string.StringBuffer]))

(h/read-eval-call-test e/*target-opts*
