From a395f47b86f40ea0da56099168a1f2e0d10cabdd Mon Sep 17 00:00:00 2001 From: Alex Robbins Date: Sun, 13 Feb 2011 19:21:15 -0600 Subject: [PATCH] Use interpose instead of interleave to add spaces between words. --- src/path_to_answer_sheet.clj | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/src/path_to_answer_sheet.clj b/src/path_to_answer_sheet.clj index 6487c43..f3bc5e3 100644 --- a/src/path_to_answer_sheet.clj +++ b/src/path_to_answer_sheet.clj @@ -107,14 +107,12 @@ "then comes %s, " "then comes %s with the baby carriage") a b c) - '(trim - (apply str - (interleave + '(apply str + (interpose " " (apply list first-name last-name - (interleave (repeat "aka") aliases)) - (repeat " ")))) + (interleave (repeat "aka") aliases)))) '{:original-parts full-name :named-parts {:first first-name :last last-name}} '(str street-address ", " city ", " state)