summaryrefslogtreecommitdiff
path: root/fig-web/src/Fig
diff options
context:
space:
mode:
Diffstat (limited to 'fig-web/src/Fig')
-rw-r--r--fig-web/src/Fig/Web/Secure.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/fig-web/src/Fig/Web/Secure.hs b/fig-web/src/Fig/Web/Secure.hs
index d903a61..cf10bc1 100644
--- a/fig-web/src/Fig/Web/Secure.hs
+++ b/fig-web/src/Fig/Web/Secure.hs
@@ -75,7 +75,7 @@ app cfg cmds = do
name <- Sc.formParam "name"
input <- Sc.formParamMaybe "input"
liftIO . cmds.publish "frontend redeem incoming"
- . encodeUtf8 . Text.unwords $
+ . encodeUtf8 . Text.intercalate "\t" $
[ Text.Lazy.toStrict user
, name
] <> maybeToList input