From 69dc565351858275e299c44c6bc5ad7c44023b32 Mon Sep 17 00:00:00 2001
From: ludat-coding-agent <ludat-coding-agent@users.noreply.github.com>
Date: Mon, 20 Jul 2026 02:48:07 +0000
Subject: [PATCH] Remove noncanonical definitions.

This appeases the `-Wnoncanonical-monad-instances` warning. A future GHC
release will treat noncanonical definitions as errors. See
https://github.com/haskell/core-libraries-committee/issues/328.
---
 Web/Routes/RouteT.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/Web/Routes/RouteT.hs b/Web/Routes/RouteT.hs
index 189970e..d31650f 100644
--- a/Web/Routes/RouteT.hs
+++ b/Web/Routes/RouteT.hs
@@ -90,7 +90,6 @@ instance (Alternative m) => Alternative (RouteT url m) where
     m <|> n = RouteT $ \ url -> unRouteT m url <|> unRouteT n url
 
 instance (Monad m) => Monad (RouteT url m) where
-    return   = liftRouteT . return
     m >>= k  = RouteT $ \ url -> do
         a <- unRouteT m url
         unRouteT (k a) url