--- a/ImageReader.st	Fri Feb 17 11:23:19 2017 +0100
+++ b/ImageReader.st	Fri Feb 17 11:58:23 2017 +0100
@@ -1836,14 +1836,14 @@
     "return the image as represented by myself;
      If my file contained multiple images, return the first one."
 
-    imageSequence size > 0 ifTrue:[
-	^ self images first.
+    imageSequence notEmptyOrNil ifTrue:[
+        ^ self images first.
     ].
 
     ^ self makeImage.
 
-    "Modified: / 15.1.1998 / 15:46:24 / stefan"
-    "Modified: / 1.4.1998 / 14:31:35 / cg"
+    "Modified: / 15-01-1998 / 15:46:24 / stefan"
+    "Modified: / 17-02-2017 / 11:58:16 / cg"
 !
 
 imageFrames