imp: errors: balancednoautoconversion: now different from balanced
This commit is contained in:
		
							parent
							
								
									c885746aa8
								
							
						
					
					
						commit
						77f29aeee9
					
				| @ -157,7 +157,14 @@ balanceTransactionHelper bopts t = do | |||||||
|     if infer_transaction_prices_ bopts then inferBalancingPrices t else t |     if infer_transaction_prices_ bopts then inferBalancingPrices t else t | ||||||
|   case transactionCheckBalanced bopts t' of |   case transactionCheckBalanced bopts t' of | ||||||
|     []   -> Right (txnTieKnot t', inferredamtsandaccts) |     []   -> Right (txnTieKnot t', inferredamtsandaccts) | ||||||
|     errs -> Left $ transactionBalanceError t' errs |     errs -> Left $ transactionBalanceError t' errs' | ||||||
|  |       where | ||||||
|  |         errs' = errs ++ | ||||||
|  |           [ "inference of conversion costs has been disallowed" | ||||||
|  |           | ismulticommodity && not (infer_transaction_prices_ bopts) | ||||||
|  |           ] | ||||||
|  |           where | ||||||
|  |             ismulticommodity = (length $ mconcat $ map (maCommodities . pamount) $ tpostings t') > 1 | ||||||
| 
 | 
 | ||||||
| -- | Generate a transaction balancing error message, given the transaction | -- | Generate a transaction balancing error message, given the transaction | ||||||
| -- and one or more suberror messages. | -- and one or more suberror messages. | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user