                 [:p "Yes 2"]]]
               [:tr
                [:td
-                [:p "Yes 3"]]]]]]])))
+                [:p "Yes 3"]]]]]]])
+         (list [:p "Yes 1"]
+               [:p "Yes 2"]
+               [:p "Yes 3"])))
 
-  (is (= (list [:p "Yes 1"]
-               [:p "Yes 2"]
-               [:p "Yes 3"])
-         (hf/hiccup-find
+  (is (= (hf/hiccup-find
           [:div :p]
           [:html
            [:body

            [:p.image "Yes 1"]
            [:p.images "No"]
            [:div.image
             [:p.image "Yes 2"]]]])))

  (is (= (list [:p {:class "image"} "Yes 1"]
               [:p {:class "image"} "Yes 2"])
         (hf/hiccup-find
          [:p.image]
          [:html
           [:body

                [:p "Yes 2"]]]
              [:tr
               [:td
                [:p "Yes 3"]]]]]]])
         (list [:p "Yes 1"]
               [:p "Yes 2"]
               [:p "Yes 3"]))))

(deftest test-hiccup-text
  (is (= (hf/hiccup-text [:p "Text here"])
         "Text here"))

  (is (= (hf/hiccup-text [:p [:span "Text here"]])
         "Text here"))

  (is (= (hf/hiccup-text [:p {:class "something"} "Text here"])
         "Text here"))

  (is (= (hf/hiccup-text [:p {:class "something"} "Text " [:strong "here"]])
         "Text here"))

  (is (= (hf/hiccup-text
          [:html
           [:body
            [:h1 "Welcome, earthling"]
            [:p "Hope you " [:strong "enjoy"] " your stay"]]])
         (str "Welcome, earthling\n"
              "Hope you enjoy your stay")))

  (is (= (hf/hiccup-text
          [:html
           [:body
            [:p "Number " [:strong 42]]]])
         "Number 42")))

(deftest test-hiccup-string
  (is (= (hf/hiccup-string
          [:html
           [:body
            [:h1 "Welcome, earthling"]
            [:p "Hope you " [:strong "enjoy"] " your stay"]]])
         "Welcome, earthling Hope you enjoy your stay"))

  (is (= (hf/hiccup-string
          [:html
           [:body
            [:h1 "Welcome!"]
            [:p "Hope you   " [:strong "enjoy"] " your stay"]]])
         "Welcome! Hope you enjoy your stay")))
