                                                               ::s/invalid))
                                               keyword?))
     (testing "coercion"
-      (is (= "-- Spec failed --------------------
+      (is (= (pf "-- Spec failed --------------------
 
   nil
 
 should satisfy
 
-  (clojure.spec.alpha/conformer
+  (pf.spec.alpha/conformer
    (fn
-    [%]
+    [%%]
     (if
-     (string? %)
-     (keyword %)
-     :clojure.spec.alpha/invalid)))
+     (string? %%)
+     (keyword %%)
+     :pf.spec.alpha/invalid)))
 
 -------------------------
 Detected 1 error
-"
+")
              (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
                (s/explain-str :conformers-test/coerced-kw nil))))
 
-      (is (= "-- Spec failed --------------------
+      (is (= (pf "-- Spec failed --------------------
 
   [... ... ... 0]
                ^
 
 should satisfy
 
-  (clojure.spec.alpha/conformer
+  (pf.spec.alpha/conformer
    (fn
-    [%]
+    [%%]
     (if
-     (string? %)
-     (keyword %)
-     :clojure.spec.alpha/invalid)))
+     (string? %%)
+     (keyword %%)
+     :pf.spec.alpha/invalid)))
 
 -------------------------
 Detected 1 error
-"
+")
              (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
                (s/explain-str (s/coll-of :conformers-test/coerced-kw) ["a" "b" "c" 0])))))
     ;; Also not recommended


should satisfy

  (fn
   [%]
   (< (-> % :x) (-> % :y)))

-------------------------
Detected 1 error
"
             (binding [s/*explain-out* (expound/custom-printer {:print-specs? false})]
               (s/explain-str (s/map-of :conformers-test/sorted-pair any?) {[0 1] [1 0]
                                                                            [1 0] [1 0]})))))))

               (s/explain-str :conformers-test/person [:age 30 :name :Stan])))))

    (testing "ambiguous value"
      (is (= (pf "-- Spec failed --------------------

  {[0 1] ..., [1 0] ...}
              ^^^^^
