From d169f9fb2df789c7dc4941ecb3b4f6de6b49f8fb Mon Sep 17 00:00:00 2001 From: Zarak <7254237+zarak@users.noreply.github.com> Date: Sat, 2 Jan 2021 21:32:31 +0500 Subject: [PATCH] Make tailwindcss styled flash messages consistent --- IHP/View/CSSFramework.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/IHP/View/CSSFramework.hs b/IHP/View/CSSFramework.hs index b4f78545a..d3600e9cb 100644 --- a/IHP/View/CSSFramework.hs +++ b/IHP/View/CSSFramework.hs @@ -166,7 +166,7 @@ bootstrap = def { styledFlashMessage, styledSubmitButtonClass, styledFormGroupCl tailwind :: CSSFramework tailwind = def { styledFlashMessage, styledSubmitButtonClass, styledFormGroupClass, styledFormFieldHelp, styledInputClass, styledInputInvalidClass, styledValidationResultClass } where - styledFlashMessage _ (SuccessFlashMessage message) = [hsx|
{message}
|] + styledFlashMessage _ (SuccessFlashMessage message) = [hsx|
{message}
|] styledFlashMessage _ (ErrorFlashMessage message) = [hsx|
{message}
|] styledInputClass FormField {} = "form-control" @@ -179,4 +179,4 @@ tailwind = def { styledFlashMessage, styledSubmitButtonClass, styledFormGroupCla styledFormGroupClass = "flex flex-wrap -mx-3 mb-6" - styledValidationResultClass = "text-red-500 text-xs italic" \ No newline at end of file + styledValidationResultClass = "text-red-500 text-xs italic"