From c038edeadaef31c8da312cc41e99369436241c58 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Thu, 9 Jul 2009 20:57:00 +0000 Subject: [PATCH] svn: r15422 --- collects/scribble/text/output.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/scribble/text/output.ss b/collects/scribble/text/output.ss index e1464737e0..6a8dc14dd0 100644 --- a/collects/scribble/text/output.ss +++ b/collects/scribble/text/output.ss @@ -64,7 +64,7 @@ [else (let ([col (- col len1)] [len2 (if (number? pfx2) pfx2 (string-length pfx2))]) - (when (< col len2) (write-string (->str pfx2) p col )))]))))) + (when (< col len2) (write-string (->str pfx2) p col)))]))))) ;; the basic printing unit: strings (define (output-string x) (define pfx (mcar pfxs))