diff options
| author | LLLL Colonq <llll@colonq> | 2025-10-05 20:08:41 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-10-05 20:08:41 -0400 |
| commit | d2843a83668ad965cd75f4539407f805fc5c4f57 (patch) | |
| tree | e3b2cffb9f28915f6b568b61b0c2bc082e2a00d5 /fig-web/src/Fig/Web | |
| parent | 8f67f0c55b845c80973fcec0fbaef9879f677b91 (diff) | |
Rename event names
Diffstat (limited to 'fig-web/src/Fig/Web')
| -rw-r--r-- | fig-web/src/Fig/Web/Module/Redeem.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fig-web/src/Fig/Web/Module/Redeem.hs b/fig-web/src/Fig/Web/Module/Redeem.hs index 1b5fbaa..6f3d88b 100644 --- a/fig-web/src/Fig/Web/Module/Redeem.hs +++ b/fig-web/src/Fig/Web/Module/Redeem.hs @@ -19,7 +19,7 @@ secure a = do name <- formParam "name" input <- formParamMaybe "input" log $ creds.user <> " redeemed: " <> name - liftIO . a.cmds.publish "frontend redeem incoming" + liftIO . a.cmds.publish "fig web redeem incoming" . encodeUtf8 . Text.intercalate "\t" $ [ creds.user , name |