--- a/BitmapFont.st	Tue Apr 14 13:44:25 2020 +0200
+++ b/BitmapFont.st	Tue Apr 28 15:22:21 2020 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1994 by Claus Gittinger
 	      All Rights Reserved
@@ -204,17 +206,20 @@
     |newFont|
 
     newFont := super new 
-		  family:'private' 
-		  face:nil
-		  style:nil
-		  size:nil
-		  encoding:nil. 
+                  family:'private' 
+                  face:nil
+                  style:nil
+                  size:nil
+                  sizeUnit:#pt
+                  encoding:nil. 
 
     ^ newFont
 
     "
      BitmapFont new glyphs:(self sampleGlyhps).
     "
+
+    "Modified: / 28-04-2020 / 15:09:48 / stefan"
 ! !
 
 !BitmapFont class methodsFor:'private'!