Versionbump: Removed redundant MonadLogger

This commit is contained in:
Stephan Barth 2024-02-26 17:59:07 +01:00
parent 16e2237f5b
commit 36d5ebfa4a

View File

@ -16,7 +16,7 @@ import qualified Data.Yaml as Yaml
import qualified Data.Map as Map
import Yesod.Core (Route, MonadLogger, MonadWidget, HandlerSite, logDebugS, logErrorS)
import Yesod.Core (Route, MonadWidget, HandlerSite, logDebugS, logErrorS)
import Yesod.EmbeddedStatic (EmbeddedStatic)
import Yesod.EmbeddedStatic.Types
import Network.Mime (MimeType)
@ -69,7 +69,7 @@ mkWebpackEntrypoints manifest mkGen stDir = do
, funD entryName
[ clause [] (normalB . listE . map (\(n, mime) -> tupE [varE n, TH.lift mime]) $ nubOrdOn fst entries) []
]
, sigD widgetName [t|forall m. (MonadLogger m, MonadWidget m) => (Route EmbeddedStatic -> Route (HandlerSite m)) -> m ()|]
, sigD widgetName [t|forall m. MonadWidget m => (Route EmbeddedStatic -> Route (HandlerSite m)) -> m ()|]
, funD widgetName
[ clause [varP staticR] (normalB [e|
do