   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")))
+    (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")))
+    (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*

   "(apropos \"join\")"]
  (let [result (unwrap-result @_res_)
        expected "(cljs.core/-disjoin cljs.core/-disjoin! clojure.string/join)"]
    (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]))

;; note the lack of require
(h/read-eval-call-test e/*target-opts*
  ["(find-doc \"union\")"]
  (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 (= "nil" result) (str _msg_ " should return nil because clojure.set has not been required.")))
  (_reset!_))

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

(h/read-eval-call-test e/*target-opts*
  ["(require 'foo.bar.baz)"]
  (let [out (unwrap-result @_res_)]
    (is (success? @_res_) (str _msg_ "should succeed"))
    (is (valid-eval-result? out) (str _msg_ "should be a valid result"))
    (is (= 'cljs.user (repl/current-ns)) (str _msg_ "should not change namespace"))
    (is (= "nil" out) (str _msg_ "should return \"nil\"")))
  (_reset!_ '[foo.bar.baz]))

(h/read-eval-call-test e/*target-opts*
  ["(require 'foo.bar.baz)"
   "foo.bar.baz/a"]
  (let [out (unwrap-result @_res_)]
    (is (success? @_res_) (str _msg_ "should succeed"))
    (is (valid-eval-result? out) (str _msg_ "should be a valid result"))
    (is (= 'cljs.user (repl/current-ns)) (str _msg_ "should not change namespace"))
    (is (= "\"whatever\"" out) (str _msg_ "should return \"nil\"")))
  (_reset!_ '[foo.bar.baz]))

;; https://github.com/ScalaConsultants/replumb/issues/39
