diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-05-24 14:39:21 +0200 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-05-24 14:39:21 +0200 |
| commit | f6f7cde03c4f28657c720cc3f7ae02a52aa3ceb4 (patch) | |
| tree | fdf4b68dbe057b7845e0c286e98bcc1d7c8ae6c8 /src/Hakyll/Core/Identifier | |
| parent | 758e0beaaa2f9f97bb22fa4067d75efda4dbd31b (diff) | |
| download | hakyll-f6f7cde03c4f28657c720cc3f7ae02a52aa3ceb4.tar.gz | |
Return information in rules
Diffstat (limited to 'src/Hakyll/Core/Identifier')
| -rw-r--r-- | src/Hakyll/Core/Identifier/Pattern.hs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/Hakyll/Core/Identifier/Pattern.hs b/src/Hakyll/Core/Identifier/Pattern.hs index e1025ed..6bbfad8 100644 --- a/src/Hakyll/Core/Identifier/Pattern.hs +++ b/src/Hakyll/Core/Identifier/Pattern.hs @@ -36,6 +36,7 @@ module Hakyll.Core.Identifier.Pattern , castPattern , parseGlob , predicate + , list , regex , inGroup , matches @@ -106,6 +107,11 @@ parseGlob = Glob . parse' predicate :: (Identifier a -> Bool) -> Pattern a predicate = Predicate +-- | Create a 'Pattern' from a list of 'Identifier's it should match +-- +list :: [Identifier a] -> Pattern a +list = List + -- | Create a 'Pattern' from a regex -- -- Example: |