--- a/ListView.st	Tue Nov 28 19:26:25 2017 +0100
+++ b/ListView.st	Tue Nov 28 19:26:40 2017 +0100
@@ -5328,14 +5328,6 @@
 
 !ListView::HighlightArea methodsFor:'accessing'!
 
-bgColor
-    ^ bgColor
-!
-
-bgColor:something
-    bgColor := something.
-!
-
 endCol
     ^ endCol
 !
@@ -5352,14 +5344,6 @@
     endLine := something.
 !
 
-fgColor
-    ^ fgColor
-!
-
-fgColor:something
-    fgColor := something.
-!
-
 startCol
     ^ startCol
 !
@@ -5376,6 +5360,24 @@
     startLine := something.
 ! !
 
+!ListView::HighlightArea methodsFor:'accessing-color & font'!
+
+bgColor
+    ^ bgColor
+!
+
+bgColor:something
+    bgColor := something.
+!
+
+fgColor
+    ^ fgColor
+!
+
+fgColor:something
+    fgColor := something.
+! !
+
 !ListView::SearchSpec methodsFor:'accessing'!
 
 atBeginOfLineOnly