--- a/VisualComponent.st	Fri Nov 10 00:18:45 2017 +0100
+++ b/VisualComponent.st	Tue Nov 28 19:16:36 2017 +0100
@@ -93,48 +93,12 @@
 
 !VisualComponent methodsFor:'accessing'!
 
-backgroundColor
-    ^ Color white
-
-    "Created: / 18.6.1998 / 16:01:00 / cg"
-!
-
-backgroundColor:aColor
-    "ignored here"
-
-    "Created: / 18.6.1998 / 16:15:28 / cg"
-!
-
 container:someContainer
     "ignored here"
 
     "Created: 9.5.1996 / 00:48:54 / cg"
 !
 
-defaultFont
-    ^ SimpleView defaultFont
-
-    "Created: / 18.6.1998 / 16:13:56 / cg"
-!
-
-font:aFont
-    "ignored here"
-
-    "Created: / 18.6.1998 / 16:14:39 / cg"
-!
-
-foregroundColor
-    ^ Color black
-
-    "Created: / 18.6.1998 / 16:01:07 / cg"
-!
-
-foregroundColor:aColor
-    "ignored here"
-
-    "Created: / 18.6.1998 / 16:14:53 / cg"
-!
-
 geometryLayout
     "ignored here"
 
@@ -236,6 +200,44 @@
     ^ self backgroundColor
 ! !
 
+!VisualComponent methodsFor:'accessing-color & font'!
+
+backgroundColor
+    ^ Color white
+
+    "Created: / 18.6.1998 / 16:01:00 / cg"
+!
+
+backgroundColor:aColor
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:15:28 / cg"
+!
+
+defaultFont
+    ^ SimpleView defaultFont
+
+    "Created: / 18.6.1998 / 16:13:56 / cg"
+!
+
+font:aFont
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:14:39 / cg"
+!
+
+foregroundColor
+    ^ Color black
+
+    "Created: / 18.6.1998 / 16:01:07 / cg"
+!
+
+foregroundColor:aColor
+    "ignored here"
+
+    "Created: / 18.6.1998 / 16:14:53 / cg"
+! !
+
 !VisualComponent methodsFor:'accessing-dimensions'!
 
 bottom