From 9206d60481e9703e165786b2ed64ac955181e037 Mon Sep 17 00:00:00 2001 From: Greg Weber Date: Sun, 25 Dec 2011 14:11:55 -0300 Subject: [PATCH] fix scaffold: writeLogMsg -> logMsg --- yesod/scaffold/Foundation.hs.cg | 4 ++-- yesod/scaffold/tiny/Foundation.hs.cg | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/yesod/scaffold/Foundation.hs.cg b/yesod/scaffold/Foundation.hs.cg index 153b96ec..68699e1a 100644 --- a/yesod/scaffold/Foundation.hs.cg +++ b/yesod/scaffold/Foundation.hs.cg @@ -23,7 +23,7 @@ import Yesod.Auth import Yesod.Auth.OpenId import Yesod.Default.Config import Yesod.Default.Util (addStaticContentExternal) -import Yesod.Logger (Logger, writeLogMsg, formatLogText, logLazyText) +import Yesod.Logger (Logger, logMsg, formatLogText, logLazyText) import qualified Settings import qualified Data.ByteString.Lazy as L import qualified Database.Persist.Base @@ -108,7 +108,7 @@ instance Yesod ~sitearg~ where authRoute _ = Just $ AuthR LoginR messageLogger y loc level msg = - formatLogText (getLogger y) loc level msg >>= writeLogMsg (getLogger y) + formatLogText (getLogger y) loc level msg >>= logMsg (getLogger y) -- This function creates static content files in the static folder -- and names them based on a hash of their content. This allows diff --git a/yesod/scaffold/tiny/Foundation.hs.cg b/yesod/scaffold/tiny/Foundation.hs.cg index 37c14cd0..76bc887d 100644 --- a/yesod/scaffold/tiny/Foundation.hs.cg +++ b/yesod/scaffold/tiny/Foundation.hs.cg @@ -18,7 +18,7 @@ import Yesod.Default.Config import Yesod.Default.Util (addStaticContentExternal) import Yesod.Static (Static, base64md5, StaticRoute(..)) import Settings.StaticFiles -import Yesod.Logger (Logger, writeLogMsg, formatLogText, logLazyText) +import Yesod.Logger (Logger, logMsg, formatLogText, logLazyText) import qualified Settings import Settings (widgetFile) import Control.Monad.Trans.Class (lift) @@ -89,7 +89,7 @@ instance Yesod ~sitearg~ where urlRenderOverride _ _ = Nothing messageLogger y loc level msg = - formatLogText (getLogger y) loc level msg >>= writeLogMsg (getLogger y) + formatLogText (getLogger y) loc level msg >>= logMsg (getLogger y) -- This function creates static content files in the static folder -- and names them based on a hash of their content. This allows