From b5003a97d3f02b7c8cb5e63468b781d8d849264d Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Fri, 23 May 2025 17:50:43 -0400 Subject: Use tabs --- fig-web/src/Fig/Web/Secure.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'fig-web') 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 -- cgit v1.2.3