From d4862233bd18954b70323f990285d091421ec1e7 Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Tue, 19 Feb 2013 08:07:09 +0200 Subject: [PATCH] Scaffolding includes getLogger --- yesod/hsfiles/mongo.hsfiles | 2 ++ yesod/hsfiles/mysql.hsfiles | 2 ++ yesod/hsfiles/postgres-fay.hsfiles | 2 ++ yesod/hsfiles/postgres.hsfiles | 2 ++ yesod/hsfiles/simple.hsfiles | 2 ++ yesod/hsfiles/sqlite.hsfiles | 2 ++ 6 files changed, 12 insertions(+) diff --git a/yesod/hsfiles/mongo.hsfiles b/yesod/hsfiles/mongo.hsfiles index d05cc4de..81e757f9 100644 --- a/yesod/hsfiles/mongo.hsfiles +++ b/yesod/hsfiles/mongo.hsfiles @@ -207,6 +207,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + -- How to run database actions. instance YesodPersist App where type YesodPersistBackend App = Action diff --git a/yesod/hsfiles/mysql.hsfiles b/yesod/hsfiles/mysql.hsfiles index f7a26087..bd3c840a 100644 --- a/yesod/hsfiles/mysql.hsfiles +++ b/yesod/hsfiles/mysql.hsfiles @@ -214,6 +214,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + -- How to run database actions. instance YesodPersist App where type YesodPersistBackend App = SqlPersist diff --git a/yesod/hsfiles/postgres-fay.hsfiles b/yesod/hsfiles/postgres-fay.hsfiles index b45dec34..22e182c1 100644 --- a/yesod/hsfiles/postgres-fay.hsfiles +++ b/yesod/hsfiles/postgres-fay.hsfiles @@ -218,6 +218,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + instance YesodJquery App instance YesodFay App where diff --git a/yesod/hsfiles/postgres.hsfiles b/yesod/hsfiles/postgres.hsfiles index 44712246..dcb4ec28 100644 --- a/yesod/hsfiles/postgres.hsfiles +++ b/yesod/hsfiles/postgres.hsfiles @@ -214,6 +214,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + -- How to run database actions. instance YesodPersist App where type YesodPersistBackend App = SqlPersist diff --git a/yesod/hsfiles/simple.hsfiles b/yesod/hsfiles/simple.hsfiles index 40a85d8c..f2813f6f 100644 --- a/yesod/hsfiles/simple.hsfiles +++ b/yesod/hsfiles/simple.hsfiles @@ -190,6 +190,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + -- This instance is required to use forms. You can modify renderMessage to -- achieve customized and internationalized form validation messages. instance RenderMessage App FormMessage where diff --git a/yesod/hsfiles/sqlite.hsfiles b/yesod/hsfiles/sqlite.hsfiles index 78ba42d4..d91019e3 100644 --- a/yesod/hsfiles/sqlite.hsfiles +++ b/yesod/hsfiles/sqlite.hsfiles @@ -214,6 +214,8 @@ instance Yesod App where shouldLog _ _source level = development || level == LevelWarn || level == LevelError + getLogger = return . appLogger + -- How to run database actions. instance YesodPersist App where type YesodPersistBackend App = SqlPersist