Add type column to NeoCSVData>>#gtViewHeaderFor:

svenvc · Dec 4, 2023 · b0047d4 · b0047d4
1 parent b2f0f65
commit b0047d4
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/repository/Neo-CSV-GT/NeoCSVData.extension.st b/repository/Neo-CSV-GT/NeoCSVData.extension.st
@@ -31,5 +31,6 @@ NeoCSVData >> gtViewHeaderFor: composite [
 		priority: 30;
 		items: [ self header ];
 		column: 'Position' text: [ :_ :position | position ];
-		column: 'Field' text: #yourself weight: 5
+		column: 'Field' text: #yourself weight: 2;
+		column: 'Type' text: [ :_ :position | self typeForColumnAt: position ]
 ]