--- a/Smalltalk.st	Tue Apr 24 22:49:23 2018 +0200
+++ b/Smalltalk.st	Tue Apr 24 22:51:00 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -7055,7 +7057,7 @@
         (Class updateChangeFileQuerySignal , Class updateChangeListQuerySignal) answer:logged do:[
             "JV: Changed to give ProgrammingLanguage to choose
              proper reader"
-            (ProgrammingLanguage forStream: inStream) fileInStream: inStream
+            ((ProgrammingLanguage forStream: inStream) fileInStream: inStream) notNil
         ]
     ] ensure:[
         morePath notNil ifTrue:[
@@ -7081,7 +7083,7 @@
 
     "Modified: / 05-11-1996 / 20:03:35 / cg"
     "Modified: / 16-08-2009 / 11:06:05 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 24-04-2018 / 11:34:40 / stefan"
+    "Modified: / 24-04-2018 / 22:36:08 / stefan"
 !
 
 isClassLibraryLoaded:name
@@ -8799,13 +8801,13 @@
     (lang == #de) ifTrue:[
         proto := 'Willkommen bei %1 (%4Version %2 von %3)'. bit := 'Bit'.
     ] ifFalse:[ (lang == #fr) ifTrue:[
-        proto := 'Salut, Bienvenue à %1 (%4version %2 de %3)'
+        proto := 'Salut, Bienvenue à %1 (%4version %2 de %3)'
     ] ifFalse:[ (lang == #it) ifTrue:[
         proto := 'Ciao, benvenuto al %1 (%4versione %2 di %3)'
     ] ifFalse:[ (lang == #es) ifTrue:[
         proto := 'Hola, bienvenida a %1 (%4version %2 de %3)'
     ] ifFalse:[ (lang == #pt) ifTrue:[
-        proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
+        proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
     ] ifFalse:[ (lang == #no) ifTrue:[
         proto := 'Hei, verdenmottakelse til %1 (%4versjon %2 av %3)'
     ]]]]]].