summaryrefslogtreecommitdiff
path: root/src-3.0/GF/Command/Parse.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src-3.0/GF/Command/Parse.hs')
-rw-r--r--src-3.0/GF/Command/Parse.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src-3.0/GF/Command/Parse.hs b/src-3.0/GF/Command/Parse.hs
index dfab70128..0cf7adec5 100644
--- a/src-3.0/GF/Command/Parse.hs
+++ b/src-3.0/GF/Command/Parse.hs
@@ -20,7 +20,8 @@ pPipe = RP.sepBy (RP.skipSpaces >> pCommand) (RP.skipSpaces >> RP.char '|')
pCommand = do
cmd <- pIdent
RP.skipSpaces
- opts <- RP.many pOption
+ opts <- RP.sepBy pOption RP.skipSpaces
+-- opts <- RP.many pOption
arg <- RP.option ANoArg (fmap AExp (pExp False))
return (Command cmd opts arg)