lib: journal: fix wrong txn rendering in balance assertion errors
This commit is contained in:
		
							parent
							
								
									3dbf97babd
								
							
						
					
					
						commit
						2ba135e402
					
				| @ -552,7 +552,7 @@ checkBalanceAssertion p@Posting{ pbalanceassertion = Just (ass,_)} amt | ||||
|             (case ptransaction p of | ||||
|                Nothing -> ":" -- shouldn't happen | ||||
|                Just t ->  printf " in %s:\nin transaction:\n%s" | ||||
|                           (showGenericSourcePos pos) (chomp $ show t) :: String | ||||
|                           (showGenericSourcePos pos) (chomp $ showTransaction t) :: String | ||||
|                             where pos = snd $ fromJust $ pbalanceassertion p) | ||||
|             (showPostingLine p) | ||||
|             (showDate $ postingDate p) | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user