--- a/FontPanel.st	Sun Sep 15 10:19:07 2019 +0200
+++ b/FontPanel.st	Sun Sep 15 12:50:53 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
@@ -164,7 +162,7 @@
 defaultLatin1SampleString
     "return the sample latin1 preview text"
 
-    ^ (self defaultAsciiSampleString) , 'äöüÄÖÜßéèêå©'
+    ^ (self defaultAsciiSampleString) , 'äöüÄÖÜßéèêå©'
 !
 
 defaultSampleStringForEncoding:enc
@@ -208,7 +206,7 @@
     |t|
 
     t := (self defaultAsciiSampleString) , '
-diaresis: äöüÄÖÜß  accents: éèêåÅ
+diaresis: äöüÄÖÜß  accents: éèêåÅ
 special: ' ,  #(16r20AC) asUnicodeString , ' ',
 'math: ' ,  #(16r2200 16r2203 16r221E 16r2208 16r2209) asUnicodeString , '
 cyrillic: ' ,  #(16r440 16r443 16r441 16r441 16r43A 16r438 16r439 16r20 16r44F 16r437 16r44B 16r43A) asUnicodeString , '
@@ -889,8 +887,7 @@
     updateHeight :=
         [
             self sensor 
-                pushUserEvent:#value 
-                for:[
+                pushAction:[
                     |filterBoxHeight|
 
                     filterBoxHeight := filterBox preferredHeight.