--- a/CharacterSetView.st	Sat Nov 10 00:20:36 2018 +0100
+++ b/CharacterSetView.st	Sat Nov 10 00:20:51 2018 +0100
@@ -646,20 +646,12 @@
 
 !CharacterSetView methodsFor:'queries'!
 
-preferredExtent
-    "/ If I have an explicit preferredExtent..
-    explicitExtent notNil ifTrue:[
-        ^ explicitExtent
-    ].
-
-    "/ If I have a cached preferredExtent value..
-    preferredExtent notNil ifTrue:[
-        ^ preferredExtent
-    ].
-
+computePreferredExtent
     ^ ((4 + (gc font widthOf:'W') + 4) * 16)
        @
       ((4 + (gc font heightOf:'W') + 4) * 16)
+
+    "Created: / 09-11-2018 / 19:47:35 / Claus Gittinger"
 ! !
 
 !CharacterSetView class methodsFor:'documentation'!