diff --git a/yesod-core/Yesod/Core/Class.hs b/yesod-core/Yesod/Core/Class.hs index 67ea88be..d5d433c9 100644 --- a/yesod-core/Yesod/Core/Class.hs +++ b/yesod-core/Yesod/Core/Class.hs @@ -223,18 +223,6 @@ $doctype 5 getLogger :: a -> IO Logger getLogger _ = mkLogger True stdout - -- | Send a message to the @Logger@ provided by @getLogger@. - -- - -- Note: This method is no longer used. Instead, you should override - -- 'messageLoggerSource'. - messageLogger :: a - -> Logger - -> Loc -- ^ position in source code - -> LogLevel - -> LogStr -- ^ message - -> IO () - messageLogger a logger loc = messageLoggerSource a logger loc "" - -- | Send a message to the @Logger@ provided by @getLogger@. messageLoggerSource :: a -> Logger @@ -582,5 +570,3 @@ fileLocationToString loc = (loc_package loc) ++ ':' : (loc_module loc) ++ where line = show . fst . loc_start char = show . snd . loc_start - -{-# DEPRECATED messageLogger "Please use messageLoggerSource (since yesod-core 1.1.2)" #-}