yogsototh/hakyll
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Rank N compilers (compiler in compilers in...)

Browse source
This commit is contained in:
Jasper Van der Jeugt 2011-01-07 14:40:33 +01:00
parent f1e726be69
commit 1bf95c0028
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Hakyll/Core/Rules.hs
View file

@ -38,7 +38,7 @@ import Hakyll.Core.Writable
-- added to the runtime if possible, since other items might depend upon them.
--
data CompileRule = CompileRule CompiledItem
| MetaCompileRule [(Identifier, Compiler () CompiledItem)]
| MetaCompileRule [(Identifier, Compiler () CompileRule)]
-- | A collection of rules for the compilation process
--
@ -119,4 +119,4 @@ addCompilers :: (Binary a, Typeable a, Writable a)
addCompilers identifier compiler = RulesM $ tell $ RuleSet mempty $
[(identifier, compiler >>^ makeRule)]
where
makeRule = MetaCompileRule . map (second (>>^ compiledItem))
makeRule = MetaCompileRule . map (second (>>^ CompileRule . compiledItem))