From e031e04f6253f5b74454e4751463e573b0dd6f9a Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 23 Mar 2018 08:45:34 -0500 Subject: [PATCH] improve error message for xml contract violation --- racket/collects/xml/private/structures.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/collects/xml/private/structures.rkt b/racket/collects/xml/private/structures.rkt index 9fc8985447..c84c50a131 100644 --- a/racket/collects/xml/private/structures.rkt +++ b/racket/collects/xml/private/structures.rkt @@ -50,7 +50,7 @@ v (raise-blame-error blame #:missing-party neg-party - v "not in permissive mode")))) + v '("not in permissive mode" given: "~e") v)))) #:first-order (lambda (v) #t)))