--- a/Block.st	Fri Jun 23 10:57:19 2017 +0200
+++ b/Block.st	Fri Jun 23 10:58:11 2017 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -738,9 +740,11 @@
 
     <resource: #obsolete>
 
+    self obsoleteMethodWarning:'use #homeMethod'.
     ^ self homeMethod
 
-    "Modified: 19.6.1997 / 16:15:24 / cg"
+    "Modified: / 19-06-1997 / 16:15:24 / cg"
+    "Modified: / 23-06-2017 / 10:47:00 / stefan"
 !
 
 methodHome
@@ -903,7 +907,7 @@
     micros < 1000 ifTrue:[
         "/ too stupid: many fonts do not have a mu,
         "/ so I output it as us here.
-        Transcript show:micros; show:' µs'.
+        Transcript show:micros; show:' µs'.
     ] ifFalse:[
         micros < 100000 ifTrue:[
             millis := (micros / 1000.0) asFixedPointRoundedToScale:2.