--- a/ActiveHelpView.st	Thu Jun 07 11:12:15 2018 +0200
+++ b/ActiveHelpView.st	Thu Jun 07 19:20:47 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
               All Rights Reserved
@@ -154,6 +156,15 @@
     "Modified: 27.4.1996 / 15:14:18 / cg"
 ! !
 
+!ActiveHelpView class methodsFor:'updateStyleCache'!
+
+updateStyleCache
+    super updateStyleCache.
+    DefaultFont := StyleSheet fontAt:#'activeHelp.font' default:nil.
+
+    "Created: / 07-06-2018 / 18:25:51 / Claus Gittinger"
+! !
+
 !ActiveHelpView methodsFor:'accessing'!
 
 contents:someText
@@ -211,9 +222,10 @@
     ].
     self addSubView:aView.
     myView := aView.
-    myView borderWidth:0
+    myView borderWidth:0.
 
-    "Modified: 27.4.1996 / 15:16:46 / cg"
+    "Modified: / 27-04-1996 / 15:16:46 / cg"
+    "Modified: / 07-06-2018 / 18:37:35 / Claus Gittinger"
 ! !
 
 !ActiveHelpView methodsFor:'event handling'!