diff options
| author | Félix Sipma <felix.sipma@no-log.org> | 2018-12-15 23:04:29 +0100 |
|---|---|---|
| committer | Félix Sipma <felix.sipma@no-log.org> | 2018-12-15 23:04:29 +0100 |
| commit | 62214a7b5fc8b09b20e01dbb8e6bf7d89577fc3b (patch) | |
| tree | d119a0d599776adef7f1e376d58dcff21718776f | |
| parent | 4c4102f9bacbf7c3def71cfb56a5ba79eb851697 (diff) | |
API: return UUID instead of "Success"
| -rw-r--r-- | src/Shop/Handler.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Shop/Handler.hs b/src/Shop/Handler.hs index 5298897..66b8b6e 100644 --- a/src/Shop/Handler.hs +++ b/src/Shop/Handler.hs @@ -67,7 +67,7 @@ charge chargeform = do sendCustomMail' cfg (comail cfg) $(logInfo) $ toS "Client email sent: <" <> email chargeform <> "> (" <> a <> ")" - return "Success" + return $ toS (UUID.toString uuid) -- ^ TODO: add real client message where emailempty = errorempty "email is empty" "Vous devez renseigner une adresse email." |