summaryrefslogtreecommitdiff
path: root/src/Hakyll/Core/Runtime.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2012-12-31 15:16:14 +0100
committerJasper Van der Jeugt <m@jaspervdj.be>2012-12-31 15:16:14 +0100
commit24273d034850b1312c551f6ace7f0b549728cbc9 (patch)
treec17c96c372a9605fb5081311d7a6d93de4135649 /src/Hakyll/Core/Runtime.hs
parented03544e1b58710448fa67764f10554b8eeab8dc (diff)
downloadhakyll-24273d034850b1312c551f6ace7f0b549728cbc9.tar.gz
Remove verbosity from configuration
Diffstat (limited to 'src/Hakyll/Core/Runtime.hs')
-rw-r--r--src/Hakyll/Core/Runtime.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Hakyll/Core/Runtime.hs b/src/Hakyll/Core/Runtime.hs
index 7e4a835..e052f37 100644
--- a/src/Hakyll/Core/Runtime.hs
+++ b/src/Hakyll/Core/Runtime.hs
@@ -28,7 +28,7 @@ import Hakyll.Core.Configuration
import Hakyll.Core.Dependencies
import Hakyll.Core.Identifier
import Hakyll.Core.Item.SomeItem
-import Hakyll.Core.Logger (Logger)
+import Hakyll.Core.Logger (Logger, Verbosity)
import qualified Hakyll.Core.Logger as Logger
import Hakyll.Core.Provider
import Hakyll.Core.Routes
@@ -41,10 +41,10 @@ import Hakyll.Core.Writable
--------------------------------------------------------------------------------
-- | TODO Make this return exit code?
-run :: Configuration -> Rules a -> IO RuleSet
-run config rules = do
+run :: Configuration -> Verbosity -> Rules a -> IO RuleSet
+run config verbosity rules = do
-- Initialization
- logger <- Logger.new (verbosity config)
+ logger <- Logger.new verbosity
Logger.header logger "Initialising..."
Logger.message logger "Creating store..."
store <- Store.new (inMemoryCache config) $ storeDirectory config