revert an unnecessary "fix" in efe7c7a that broke tests
This commit is contained in:
parent
a65116ae5e
commit
22279978af
@ -493,7 +493,7 @@ secondarydatep primarydate = do
|
|||||||
return edate
|
return edate
|
||||||
|
|
||||||
status :: GenParser Char JournalContext Bool
|
status :: GenParser Char JournalContext Bool
|
||||||
status = try (do { many1 spacenonewline; (char '*' <|> char '!') <?> "status"; return True } ) <|> return False
|
status = try (do { many spacenonewline; (char '*' <|> char '!') <?> "status"; return True } ) <|> return False
|
||||||
|
|
||||||
codep :: GenParser Char JournalContext String
|
codep :: GenParser Char JournalContext String
|
||||||
codep = try (do { many1 spacenonewline; char '(' <?> "codep"; code <- anyChar `manyTill` char ')'; return code } ) <|> return ""
|
codep = try (do { many1 spacenonewline; char '(' <?> "codep"; code <- anyChar `manyTill` char ')'; return code } ) <|> return ""
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user