diff --git a/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/check.scrbl b/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/check.scrbl
index 7746776998..5d511a0c98 100644
--- a/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/check.scrbl
+++ b/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/check.scrbl
@@ -104,7 +104,7 @@ For example, the following checks all fail:
 ]
 }
 
-@defproc[(check-exn (exn-predicate (or/c (-> any boolean?) regexp?))
+@defproc[(check-exn (exn-predicate (or/c (-> any any/c) regexp?))
                     (thunk (-> any)) (message string? ""))
          void?]{
 
diff --git a/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/compound-testing.scrbl b/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/compound-testing.scrbl
index 6b9acc8fc6..5fd18e5ede 100644
--- a/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/compound-testing.scrbl
+++ b/pkgs/racket-pkgs/racket-doc/rackunit/scribblings/compound-testing.scrbl
@@ -69,7 +69,7 @@ so the test can be named.
            [(test-true [name string?] [v any/c]) void?]
            [(test-false [name string?] [v any/c]) void?]
            [(test-not-false [name string?] [v any/c]) void?]
-           [(test-exn [name string?] [pred (-> exn? any/c)] [thunk (-> any)]) void?]
+           [(test-exn [name string?] [pred (or/c (-> any any/c) regexp?)] [thunk (-> any)]) void?]
            [(test-not-exn [name string?] [thunk (-> any)]) void?])]{
 
 Creates a test case with the given @racket[name] that performs the