--- a/CodeCompletionHelpView.st	Fri Nov 08 12:48:51 2013 +0100
+++ b/CodeCompletionHelpView.st	Fri Nov 08 12:49:41 2013 +0100
@@ -89,19 +89,20 @@
 initStyle
     "setup viewStyle specifics"
 
-    <resource: #style (#'activeHelp.backgroundColor'
+    <resource: #style (
+                       "/ #'activeHelp.backgroundColor'
                        #'activeHelp.borderWidth'
-                       #'activeHelp.font'
-                       #'activeHelp.style')>
+                       "/ #'activeHelp.font'
+                       )>
 
     |defaultFont|
 
     super initStyle.
 
-    defaultFont := styleSheet fontAt:#'activeHelp.font' default:nil.
-    defaultFont notNil ifTrue:[
-        self font:defaultFont
-    ].
+"/    defaultFont := styleSheet fontAt:#'activeHelp.font' default:nil.
+"/    defaultFont notNil ifTrue:[
+"/        self font:defaultFont
+"/    ].
 
     self borderWidth:(styleSheet at:#'activeHelp.borderWidth' default:1).
 
@@ -124,6 +125,7 @@
     |pref bw|
 
     pref := myView preferredExtent.
+    myView extent:pref.
     bw := self borderWidth.
     self extent:(pref + (bw * 2)).
     myView origin:(bw asPoint).
@@ -161,10 +163,10 @@
 !CodeCompletionHelpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.4 2013-09-03 12:19:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.5 2013-11-08 11:49:41 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.4 2013-09-03 12:19:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.5 2013-11-08 11:49:41 cg Exp $'
 ! !