            (< (string/index-of body "PROV2")
               (string/index-of body "PROV3")))))
     (testing "eosdis-level directory page should have header links"
-      (is (expected-header-link? body)))))
+      (is (expected-header-link? body)))
+    (testing "provider page should have header links"
+      (is (expected-header-link? body)))
+    ;; XXX Can't get a consistent count on the page ...
+    ; (testing "collection count is greater than the default 10-limit"
+    ;   (is (string/includes? body expected-over-ten-count)))
+    ))
 
 (deftest provider1-level-links
   (let [provider "PROV1"

      (string/includes? body (format "%s/%s" url "C1200000014-PROV1.html"))
      (string/includes? body "Collection Item 1"))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Functions for creating testing data
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

          notag-colls [c1-p1 c1-p2 c1-p3]
          nodoi-colls [c1-p1 c2-p1 c3-p1 c1-p2 c2-p2 c3-p2]
          doi-colls [c1-p3 c2-p3 c3-p3]
          all-colls (flatten [over-ten-colls nodoi-colls doi-colls])
          tag-colls (into over-ten-colls [c2-p1 c2-p2 c2-p3 c3-p1 c3-p2 c3-p3])
          tag (tags/save-tag
                user-token
                (tags/make-tag {:tag-key "gov.nasa.eosdis"})
                tag-colls)]
    (index/wait-until-indexed)
    ;; Sanity checks
    (is (= (count notag-colls) 3))
    (is (= (count nodoi-colls) 6))
    (is (= (count doi-colls) 3))
    (is (= (count tag-colls) 27))
    (is (= (count all-colls) 30)))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Fixtures
