From 951a6f051b62c896e08a3c7f0de1357c1f00f4f2 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Tue, 13 May 2014 15:22:11 -0500 Subject: [PATCH] Rackety (102 columns) --- pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt b/pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt index 76d94a4d9c..ca62354b75 100644 --- a/pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt +++ b/pkgs/htdp-pkgs/htdp-lib/2htdp/private/img-err.rkt @@ -229,7 +229,9 @@ (check-arg fn-name (or (not arg) (string? arg)) 'face i arg) arg] [(family) - (check-arg fn-name (memq arg '(default decorative roman script swiss modern symbol system)) 'family i arg) + (check-arg fn-name + (memq arg '(default decorative roman script swiss modern symbol system)) + 'family i arg) arg] [(style) (check-arg fn-name (memq arg '(normal italic slant)) 'style i arg)