Permalink
Browse files

Fix group/list issue

  • Loading branch information...
jaspervdj committed Nov 29, 2012
1 parent c12ef90 commit 414edaa20c05b30c8a0e7c0f43c8f7b257f4e3ed
Showing with 3 additions and 3 deletions.
  1. +3 −3 src/Hakyll/Core/Rules.hs
View
@@ -172,9 +172,9 @@ resources = RulesM $ do
pattern <- rulesPattern <$> ask
provider <- rulesResourceProvider <$> ask
group' <- rulesGroup <$> ask
- return $ filterMatches pattern $ map (toId group') $ resourceList provider
- where
- toId g = setGroup g . toIdentifier
+ -- Important: filter with pattern *before* setting the group
+ return $ map (setGroup group') $ filterMatches pattern $
+ map toIdentifier $ resourceList provider
-- | Apart from regular compilers, one is also able to specify metacompilers.
-- Metacompilers are a special class of compilers: they are compilers which

0 comments on commit 414edaa

Please sign in to comment.