From e4eeaa79cb76013a9aa8accbd769c5b4343d1cc0 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Mon, 29 Jun 2015 17:17:19 -0600 Subject: [PATCH] fix error-message formatting Avoid an extra newline. --- racket/collects/pkg/private/clone-path.rkt | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/racket/collects/pkg/private/clone-path.rkt b/racket/collects/pkg/private/clone-path.rkt index 14fce98f84..f7d79f7ee1 100644 --- a/racket/collects/pkg/private/clone-path.rkt +++ b/racket/collects/pkg/private/clone-path.rkt @@ -130,17 +130,18 @@ string-append "packages from a Git repository " would " not share a local clone" convert "\n" - (~a " repository: " repo "\n") + (~a " repository: " repo) (append (for/list ([(clone names) (in-hash clones)]) - (~a " local clone: " clone "\n" + (~a "\n" + " local clone: " clone "\n" " packages for local clone:" - (format-list names) - "\n")) + (format-list names))) (list (if (null? non-clones) "" - (~a " non-clone packages:" + (~a "\n" + " non-clone packages:" (format-list non-clones))))))) ;; Determine a direction of conversion; we consider converting from