From b70a13e1c3498cc74baea7c5e1a6d7dbdb510dc9 Mon Sep 17 00:00:00 2001
From: Stephan Barth <stephan.barth@uniworx.de>
Date: Sun, 18 Feb 2024 19:25:22 +0100
Subject: [PATCH] Versionbump: Removed redundant constraints.

---
 src/Yesod/Servant.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Yesod/Servant.hs b/src/Yesod/Servant.hs
index 1c08c46fc..c87f6e3e4 100644
--- a/src/Yesod/Servant.hs
+++ b/src/Yesod/Servant.hs
@@ -188,7 +188,7 @@ instance (HasRoute sub, Typeable mods) => HasRoute (CaptureBearerToken' mods :>
     ServantApiRoute (_ :: Proxy endpoint) f ps qs -> ServantApiRoute (Proxy @(CaptureBearerToken' mods :> endpoint)) f ps qs
     ServantApiBaseRoute -> ServantApiBaseRoute
 
-instance (KnownSymbol sym, HasRoute sub, HasLink sub) => HasRoute (sym :> sub) where
+instance (KnownSymbol sym, HasRoute sub) => HasRoute (sym :> sub) where
   parseServantRoute (p : ps, qs)
     | p == escapedSymbol (Proxy @sym)
     = parseServantRoute @sub @(ServantApiDirect sub) (ps, qs) <&> \case