eat space between code and description
This commit is contained in:
		
							parent
							
								
									9e043db386
								
							
						
					
					
						commit
						eddcb6b92a
					
				| @ -322,7 +322,7 @@ ledgerdate = do date <- many1 (digit <|> char '/'); many1 spacenonewline; return | |||||||
| 
 | 
 | ||||||
| ledgerstatus = try (do { char '*'; many1 spacenonewline; return True } ) <|> return False | ledgerstatus = try (do { char '*'; many1 spacenonewline; return True } ) <|> return False | ||||||
| 
 | 
 | ||||||
| ledgercode = try (do { char '('; code <- anyChar `manyTill` char ')'; return code } ) <|> return "" | ledgercode = try (do { char '('; code <- anyChar `manyTill` char ')'; many1 spacenonewline; return code } ) <|> return "" | ||||||
| 
 | 
 | ||||||
| ledgertransaction = do | ledgertransaction = do | ||||||
|   many1 spacenonewline |   many1 spacenonewline | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user