From 6064ecd2c0567b69b2f6a0a2c5a15a0dfa63dd4b Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Fri, 10 Sep 2010 15:21:55 -0600 Subject: [PATCH] Fixing formatting re Robby --- collects/xml/private/xexpr.rkt | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/collects/xml/private/xexpr.rkt b/collects/xml/private/xexpr.rkt index fb84d8108b..d8688f8afb 100644 --- a/collects/xml/private/xexpr.rkt +++ b/collects/xml/private/xexpr.rkt @@ -121,7 +121,7 @@ (true)) (false (make-exn:invalid-xexpr - (format "Expected a pair, given ~a" attr) + (format "Expected a pair, given ~s" attr) (current-continuation-marks) attr)))))) @@ -134,15 +134,15 @@ (permissive-xexprs)) (true) (false (make-exn:invalid-xexpr - (format "Expected a string, given ~a" (cadr attr)) + (format "Expected a string, given ~s" (cadr attr)) (current-continuation-marks) (cadr attr)))) (false (make-exn:invalid-xexpr - (format "Expected an attribute value string for attribute ~a" attr) + (format "Expected an attribute value string for attribute ~s" attr) (current-continuation-marks) attr))) (false (make-exn:invalid-xexpr - (format "Expected a symbol, given ~a" (car attr)) + (format "Expected a symbol, given ~s" (car attr)) (current-continuation-marks) (cadr attr)))))