Removed messageLogger
This commit is contained in:
parent
0c4643422c
commit
0e2fee8da3
@ -223,18 +223,6 @@ $doctype 5
|
|||||||
getLogger :: a -> IO Logger
|
getLogger :: a -> IO Logger
|
||||||
getLogger _ = mkLogger True stdout
|
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@.
|
-- | Send a message to the @Logger@ provided by @getLogger@.
|
||||||
messageLoggerSource :: a
|
messageLoggerSource :: a
|
||||||
-> Logger
|
-> Logger
|
||||||
@ -582,5 +570,3 @@ fileLocationToString loc = (loc_package loc) ++ ':' : (loc_module loc) ++
|
|||||||
where
|
where
|
||||||
line = show . fst . loc_start
|
line = show . fst . loc_start
|
||||||
char = show . snd . loc_start
|
char = show . snd . loc_start
|
||||||
|
|
||||||
{-# DEPRECATED messageLogger "Please use messageLoggerSource (since yesod-core 1.1.2)" #-}
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user