diff --git a/IHP/RouterSupport.hs b/IHP/RouterSupport.hs
index 0a35bc64a..2e88ea0be 100644
--- a/IHP/RouterSupport.hs
+++ b/IHP/RouterSupport.hs
@@ -644,7 +644,7 @@ instance {-# OVERLAPPABLE #-} (Show controller, AutoRoute controller) => HasPath
-- | Parses the HTTP Method from the request and returns it.
getMethod :: (?context :: RequestContext) => Parser StdMethod
getMethod =
- case parseMethod ?context.request.requestMethod of
+ case parseMethod ?context.request.requestMethod of
Left error -> fail (ByteString.unpack error)
Right method -> pure method
{-# INLINABLE getMethod #-}
@@ -968,6 +968,5 @@ routeParam paramName =
--
-- >
Show project
--
--- See https://forum.ihpapp.com/ShowThread?threadId=ad73d6a5-2481-4e2f-af46-9bf8849f998b
-- See https://github.com/digitallyinduced/ihp/issues/840
instance ((T.TypeError (T.Text "Looks like you forgot to pass a " :<>: (T.ShowType argument) :<>: T.Text " to this " :<>: (T.ShowType controller))), Data argument, Data controller, Data (argument -> controller)) => AutoRoute (argument -> controller) where
diff --git a/README.md b/README.md
index d0d89308b..66a463077 100644
--- a/README.md
+++ b/README.md
@@ -10,12 +10,12 @@
-
-
+
+
-
+
@@ -157,7 +157,7 @@ There's more on the IHP website.
Questions, or need help with haskell type errors? [Join our Slack Community](https://ihp.digitallyinduced.com/Slack)
-[Also check out the IHP Forum!](https://forum.ihpapp.com/)
+[Also check out the IHP Forum!](https://discuss.ihp.digitallyinduced.com/)
## Contributing