From 240b5e81fdafc5275c0aaf24906cd443312d0047 Mon Sep 17 00:00:00 2001 From: Dima Kurilo Date: Mon, 17 Oct 2022 20:45:12 -0400 Subject: [PATCH] make Welcome page page more responsible --- IHP/IDE/CodeGen/ApplicationGenerator.hs | 4 ++-- IHP/Welcome/Controller.hs | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/IHP/IDE/CodeGen/ApplicationGenerator.hs b/IHP/IDE/CodeGen/ApplicationGenerator.hs index ca97c2236..2317ab37a 100644 --- a/IHP/IDE/CodeGen/ApplicationGenerator.hs +++ b/IHP/IDE/CodeGen/ApplicationGenerator.hs @@ -169,7 +169,7 @@ generateGenericApplication applicationName = <>"\n" <>"instance View WelcomeView where\n" <>" html WelcomeView = [hsx|\n" - <>"
\n" + <>"
\n" <>"
\n" <>"

\n" <>" IHP\n" @@ -198,7 +198,7 @@ generateGenericApplication applicationName = <>"

\n" <>"\n" <>"
\n" - <>" \"/ihp-welcome-icon\"\n" + <>" \"/ihp-welcome-icon\"\n" <>"

\n" <>" You can modify this start page by making changes to \"./Web/View/Static/Welcome.hs\".\n" <>"

\n" diff --git a/IHP/Welcome/Controller.hs b/IHP/Welcome/Controller.hs index fced499e0..b998ebeb7 100644 --- a/IHP/Welcome/Controller.hs +++ b/IHP/Welcome/Controller.hs @@ -20,7 +20,7 @@ instance Controller WelcomeController where view :: H.Html view = [hsx| -
+

λ IHP