Use interpose instead of interleave to add spaces between words.

2011-02-13 19:21:15 -06:00 · 2011-02-13 19:21:15 -06:00 · a395f47b86
commit a395f47b86
parent 8450a39d3d
1 changed files with 3 additions and 5 deletions
--- 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)