;check, payees, journal: payee directive no longer consumes trailing whitespace (#1580)
This commit is contained in:
		
							parent
							
								
									46d3eaf920
								
							
						
					
					
						commit
						59b1e46b88
					
				| @ -529,7 +529,7 @@ payeedirectivep :: JournalParser m () | |||||||
| payeedirectivep = do | payeedirectivep = do | ||||||
|   string "payee" <?> "payee directive" |   string "payee" <?> "payee directive" | ||||||
|   lift skipNonNewlineSpaces1 |   lift skipNonNewlineSpaces1 | ||||||
|   payee <- lift descriptionp  -- all text until ; or \n |   payee <- lift $ T.strip <$> noncommenttext1p | ||||||
|   (comment, tags) <- lift transactioncommentp |   (comment, tags) <- lift transactioncommentp | ||||||
|   addPayeeDeclaration (payee, comment, tags) |   addPayeeDeclaration (payee, comment, tags) | ||||||
|   return () |   return () | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user