From aaa66de05a34fc637cafe819860639e7b401feee Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Thu, 24 Jun 2010 14:33:57 -0600 Subject: [PATCH] Cleaning up printer original commit: 80da9872e0b0aad0890988dcead6badeaa5f20dc --- collects/datalog/private/pprint.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/datalog/private/pprint.rkt b/collects/datalog/private/pprint.rkt index 92924ef..b26f7ee 100644 --- a/collects/datalog/private/pprint.rkt +++ b/collects/datalog/private/pprint.rkt @@ -7,9 +7,9 @@ (define (text s) s) (define (h-append . ss) (apply string-append ss)) (define (v-concat/s ss) - (apply string-append (add-between ss "\n"))) + (apply string-append ss)) (define (v-concat ss) - (v-concat/s ss)) + (apply string-append (add-between ss "\n"))) (define (apply-infix d ds) (add-between ds d)) (define line "\n")