commit e44a5bb9f19528bcebb432abf699833d1d50a6c7
parent 97078b60edd67e075def900508540130f1c21f0f
Author: Jens Axel Søgaard <jensaxel@soegaard.net>
Date: Mon, 14 Oct 2019 16:10:44 +0200
Fix transposition in error message (#215)
Diffstat:
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
@@ -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))])))