From 3240b30b6fe5ba8b4b9c2cdc47fa3169e1db8393 Mon Sep 17 00:00:00 2001 From: w6vvn Date: Mon, 8 Sep 2025 13:39:10 -0700 Subject: [PATCH] change default line length to 40 columns --- gmi.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gmi.rkt b/gmi.rkt index 1148530..f9870b2 100644 --- a/gmi.rkt +++ b/gmi.rkt @@ -110,7 +110,7 @@ (define (inner-iter acc rst) (let ([line (string-join acc)]) (if (or (empty? rst) - (> (string-length line) 80)) + (> (string-length line) 40)) (values acc rst) (inner-iter (append acc (list (car rst))) (cdr rst)))))