diff --git a/Build/EvilSplicer.hs b/Build/EvilSplicer.hs
index 442ac59522..f40d100331 100644
--- a/Build/EvilSplicer.hs
+++ b/Build/EvilSplicer.hs
@@ -385,10 +385,10 @@ mangleCode = flip_colon
 		lambdaarrow <- string "   ->"
 		l2 <- restofline
 		return $ unlines
-			[ indent, staticr
-			, indent, yesod_dispatch_env
-			, indent, "(", lambdaprefix, l1
-			, indent, lambdaarrow, l2, ")"
+			[ indent ++ staticr
+			, indent ++ yesod_dispatch_env
+			, indent ++ "(" ++ lambdaprefix ++ l1
+			, indent ++ lambdaarrow ++ l2 ++ ")"
 			]
 
 	restofline = manyTill (noneOf "\n") newline