          ((scraper/get-sites) site-name)
 
          #(and
-           (test-regexes)
-           (test-enlive-selectors)
-           (test-normalize-functions)
-           (test-format-strings)
-
            (if (has-test-folder?)
              (and
               (test-image-page-extraction)

                             file#)))))

(defn success-message [message]
  (println (style (str "\u2713 " message)
                  :green))
  true)



(defn testdef-form [site-name]
  `(deftest ~(symbol (str site-name "-test"))
     (println (style ~(str "\n" site-name ":") :yellow))
     (binding [~'site-name ~site-name]
       (and
        (expect-opts-are-map site-name)
