;csv: tweak CsvRules Show for consistency with others
This commit is contained in:
		
							parent
							
								
									0346b4cdd9
								
							
						
					
					
						commit
						5d4a6cd47e
					
				| @ -263,7 +263,7 @@ instance Eq CsvRules where | ||||
|   r1 == r2 = (rdirectives r1, rcsvfieldindexes r1, rassignments r1) == | ||||
|              (rdirectives r2, rcsvfieldindexes r2, rassignments r2)  | ||||
| 
 | ||||
| -- It is used for debug output only | ||||
| -- Custom Show instance used for debug output: omit the rblocksassigning field, which isn't showable. | ||||
| instance Show CsvRules where | ||||
|   show r = "CsvRules { rdirectives = " ++ show (rdirectives r) ++ | ||||
|            ", rcsvfieldindexes = "     ++ show (rcsvfieldindexes r) ++ | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user