diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-01-07 19:17:14 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-01-07 19:17:14 +0100 |
| commit | d0939102bf26ed81b4e57dc96f44e5330913ab6f (patch) | |
| tree | b16923fe3bdd7cb22e8dc4a78ef28f1d4b32cb52 /src/Hakyll/Core/Compiler | |
| parent | ddb8ea219319f024df02bafe9ce2ed7d3a7ee41d (diff) | |
| download | hakyll-d0939102bf26ed81b4e57dc96f44e5330913ab6f.tar.gz | |
Metacompilers now work, todo: cleanup
Diffstat (limited to 'src/Hakyll/Core/Compiler')
| -rw-r--r-- | src/Hakyll/Core/Compiler/Internal.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/Hakyll/Core/Compiler/Internal.hs b/src/Hakyll/Core/Compiler/Internal.hs index 0642b85..938d81a 100644 --- a/src/Hakyll/Core/Compiler/Internal.hs +++ b/src/Hakyll/Core/Compiler/Internal.hs @@ -10,6 +10,7 @@ module Hakyll.Core.Compiler.Internal , runCompilerDependencies , fromJob , fromDependencies + , fromDependency ) where import Prelude hiding ((.), id) @@ -101,3 +102,8 @@ fromJob = Compiler (return S.empty) fromDependencies :: (ResourceProvider -> [Identifier]) -> Compiler b b fromDependencies deps = Compiler (S.fromList . deps <$> ask) return + +-- | Wait until another compiler has finished before running this compiler +-- +fromDependency :: Identifier -> Compiler a a +fromDependency = fromDependencies . const . return |