From 57b3dd66445180621543eafc24c9cf1f39b08540 Mon Sep 17 00:00:00 2001 From: Philippe PITTOLI Date: Thu, 11 Apr 2024 09:53:49 +0200 Subject: [PATCH] (minor) add a space. --- src/App/Container.purs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/App/Container.purs b/src/App/Container.purs index 8b02550..fe44f0d 100644 --- a/src/App/Container.purs +++ b/src/App/Container.purs @@ -567,7 +567,7 @@ handleAction = case _ of (AuthD.GotError errmsg) -> do handleAction $ Log $ ErrorLog $ " generic error message: " <> maybe "server didn't tell why" (\v -> v) errmsg.reason - handleAction $ AddNotif $ BadNotification $ "Sorry, authd sent an error message." + handleAction $ AddNotif $ BadNotification $ "Sorry, authd sent an error message. " <> maybe "The server didn't tell why." (\v -> "Message was: " <> v) errmsg.reason m@(AuthD.GotPasswordRecoverySent _) -> do handleAction $ Log $ SuccessLog $ "Password recovery: email sent!"