From c093761e8941c1605b6131c411ca995588c10c2e Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Thu, 3 Feb 2011 16:07:49 +0100 Subject: Route → Routes MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/Hakyll/Core/Compiler/Internal.hs | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'src/Hakyll/Core/Compiler/Internal.hs') diff --git a/src/Hakyll/Core/Compiler/Internal.hs b/src/Hakyll/Core/Compiler/Internal.hs index f1d591d..ccdd557 100644 --- a/src/Hakyll/Core/Compiler/Internal.hs +++ b/src/Hakyll/Core/Compiler/Internal.hs @@ -25,6 +25,7 @@ import Control.Arrow (Arrow, arr, first) import Hakyll.Core.Identifier import Hakyll.Core.ResourceProvider import Hakyll.Core.Store +import Hakyll.Core.Routes -- | A set of dependencies -- @@ -37,8 +38,8 @@ data CompilerEnvironment = CompilerEnvironment compilerIdentifier :: Identifier , -- | Resource provider compilerResourceProvider :: ResourceProvider - , -- | Site route - compilerRoute :: Maybe FilePath + , -- | Site routes + compilerRoutes :: Routes , -- | Compiler store compilerStore :: Store , -- | Flag indicating if the underlying resource was modified @@ -82,7 +83,7 @@ instance Arrow Compiler where runCompilerJob :: Compiler () a -- ^ Compiler to run -> Identifier -- ^ Target identifier -> ResourceProvider -- ^ Resource provider - -> Maybe FilePath -- ^ Route + -> Routes -- ^ Route -> Store -- ^ Store -> Bool -- ^ Was the resource modified? -> IO a @@ -92,7 +93,7 @@ runCompilerJob compiler identifier provider route store modified = env = CompilerEnvironment { compilerIdentifier = identifier , compilerResourceProvider = provider - , compilerRoute = route + , compilerRoutes = route , compilerStore = store , compilerResourceModified = modified } -- cgit v1.2.3