--- a/ImageView.st	Wed Mar 06 11:42:00 2019 +0100
+++ b/ImageView.st	Wed Mar 06 14:14:14 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -282,12 +284,12 @@
     |lbl|
 
     anImage isImage ifTrue:[
-        lbl := anImage fileName ? 'an Image'
+        lbl := anImage fileName ? 'An Image'
     ] ifFalse:[
         anImage isNil ifTrue:[
-            lbl := 'an Image'
+            lbl := 'No Image'
         ] ifFalse:[
-            lbl := 'a Form'
+            lbl := 'A Form (Device Bitmap)'
         ]
     ].
     ^ self openOnImage:anImage title:lbl
@@ -298,6 +300,7 @@
     "
 
     "Modified (comment): / 13-02-2017 / 10:12:43 / cg"
+    "Modified: / 06-03-2019 / 14:13:49 / Claus Gittinger"
 !
 
 openOnImage:anImage title:aString