             {:print-specs? false})))
 
     ;; clean registry from this last spec, or we get failures on other tests
-    (is (= 1 2)
-        (expound/undefmsg 'clojure.core/string?))))
+    (expound/undefmsg :defmsg-test/identifier)
+    (expound/undefmsg :defmsg-test/name)
+    (expound/undefmsg 'clojure.core/string?)))
 
 (deftest printer
   (st/instrument ['expound/printer])

            {:print-specs? false}))))

  (testing "messages can be fetched from parent specs"
    (reset! @#'expound/registry-ref {})

    (s/def :defmsg-test/parent-string string?)
    (s/def :defmsg-test/parent-foo :defmsg-test/parent-string)
    (s/def :defmsg-test/parent-bar :defmsg-test/parent-foo)

    (expound/defmsg :defmsg-test/parent-string "should be a string")
    (is (= "-- Spec failed --------------------

  :oak

-------------------------
Detected 1 error\n"
           (expound/expound-str
            :defmsg-test/string
            :oak
            {:print-specs? false})

           (expound/expound-str
            :defmsg-test/identifier
            :oak
            {:print-specs? false})

           (expound/expound-str
            :defmsg-test/name
            :oak
            {:print-specs? false})))

    ;; until a msg is set more precisely
    (expound/defmsg :defmsg-test/identifier "should be a foo")
    (is (= "-- Spec failed --------------------

  :oak
