--- a/Character.st	Thu Jul 07 17:20:11 2016 +0200
+++ b/Character.st	Thu Jul 07 17:20:35 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -311,7 +313,6 @@
     ^ self codePoint:anInteger
 ! !
 
-
 !Character class methodsFor:'accessing untypeable characters'!
 
 controlCharacter:char
@@ -358,7 +359,6 @@
     ^ self codePoint:41
 ! !
 
-
 !Character class methodsFor:'constants'!
 
 backspace
@@ -602,8 +602,6 @@
 ! !
 
 
-
-
 !Character methodsFor:'Compatibility-Dolphin'!
 
 isAlphaNumeric
@@ -999,9 +997,7 @@
     // comon ascii stuff first
     if (__codePoint < 0x80) {
         if ((__codePoint >= 'A') && (__codePoint <= 'Z')) {
-            unsigned newCodePoint;
-
-            newCodePoint = __codePoint - 'A' + 'a';
+            unsigned int newCodePoint = __codePoint - 'A' + 'a';
             RETURN (__MKCHARACTER(newCodePoint)) ;
         }
         RETURN (self);
@@ -1503,7 +1499,7 @@
     ^ s contents
 
     "
-     'ä' utf8Encoded 
+     'ä' utf8Encoded 
      'a' utf8Encoded 
     "
 ! !
@@ -2642,9 +2638,9 @@
 
     "
      $e asNonDiacritical
-     $é asNonDiacritical
-     $ä asNonDiacritical
-     $å asNonDiacritical
+     $é asNonDiacritical
+     $ä asNonDiacritical
+     $Ã¥ asNonDiacritical
     "
 !