--- a/SimpleView.st	Thu Apr 14 18:19:47 2016 +0200
+++ b/SimpleView.st	Fri Apr 15 15:06:20 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -1177,20 +1179,21 @@
     |iconLibraryClass |
 
     DefaultStyle isNil ifTrue:[
-	self setDefaultStyle
+        self setDefaultStyle
     ].
 
     StyleSheet := ViewStyle fromFile:(DefaultStyle , '.style').
     StyleSheet fileReadFailed ifTrue:[
-	('SimpleView [warning]: ***** no styleSheet for ' , DefaultStyle , '-style.') errorPrintCR.
-	DefaultStyle ~~ #normal ifTrue:[
-	    DefaultStyle := #normal.
-	    StyleSheet := ViewStyle fromFile:(DefaultStyle , '.style').
-
-	    StyleSheet fileReadFailed ifTrue:[
-		'SimpleView [warning]: not even a styleSheet for normal-style (using ugly defaults).' errorPrintCR.
-	    ]
-	]
+thisContext fullPrintAllOn:Stderr.
+        ('SimpleView [warning]: ***** no styleSheet for ' , DefaultStyle , '-style.') errorPrintCR.
+        DefaultStyle ~~ #normal ifTrue:[
+            DefaultStyle := #normal.
+            StyleSheet := ViewStyle fromFile:(DefaultStyle , '.style').
+
+            StyleSheet fileReadFailed ifTrue:[
+                'SimpleView [warning]: not even a styleSheet for normal-style (using ugly defaults).' errorPrintCR.
+            ]
+        ]
     ].
 
     iconLibraryClass := StyleSheet at:#ToolbarIconLibrary.