summaryrefslogtreecommitdiff
path: root/events/src/Events/Spec/Parse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'events/src/Events/Spec/Parse.hs')
-rw-r--r--events/src/Events/Spec/Parse.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/events/src/Events/Spec/Parse.hs b/events/src/Events/Spec/Parse.hs
index 912a308..f3114f1 100644
--- a/events/src/Events/Spec/Parse.hs
+++ b/events/src/Events/Spec/Parse.hs
@@ -18,7 +18,7 @@ import Events.Spec.Types
18import Control.Monad.Catch (MonadThrow) 18import Control.Monad.Catch (MonadThrow)
19 19
20parse :: MonadThrow m => Consumer Text m (Spec m) 20parse :: MonadThrow m => Consumer Text m (Spec m)
21parse = sinkParser $ (tokenize >>= pSpec) <* endOfInput 21parse = sinkParser $ pSpec <* endOfInput
22 22
23pSpec :: Monad m => Parser (Spec m) 23pSpec :: Monad m => Parser (Spec m)
24pSpec = mzero 24pSpec = mzero