From e44a5bb9f19528bcebb432abf699833d1d50a6c7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jens=20Axel=20S=C3=B8gaard?= Date: Mon, 14 Oct 2019 16:10:44 +0200 Subject: [PATCH] Fix transposition in error message (#215) --- scribble-html-lib/scribble/html/xml.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scribble-html-lib/scribble/html/xml.rkt b/scribble-html-lib/scribble/html/xml.rkt index b41d93c5..6e4f416f 100644 --- a/scribble-html-lib/scribble/html/xml.rkt +++ b/scribble-html-lib/scribble/html/xml.rkt @@ -33,7 +33,7 @@ (let loop ([xs xs] [as '()]) (define a (and (pair? xs) (attribute->symbol (car xs)))) (cond [(not a) (values (reverse as) xs)] - [(null? (cdr xs)) (error 'attriubtes+body + [(null? (cdr xs)) (error 'attributes+body "missing attribute value for `~s:'" a)] [else (loop (cddr xs) (cons (cons a (cadr xs)) as))])))