--- a/XBMReader.st	Thu Dec 07 11:34:06 1995 +0100
+++ b/XBMReader.st	Thu Dec 07 12:39:00 1995 +0100
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:2.10.4 on 18-feb-1995 at 2:23:58 am'!
-
 ImageReader subclass:#XBMReader
 	 instanceVariableNames:''
 	 classVariableNames:''
@@ -35,10 +33,6 @@
 "
 !
 
-version
-    ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.17 1995-11-11 16:05:42 cg Exp $'
-!
-
 documentation
 "
     this class provides methods for loading and saving x-bitmap-file images.
@@ -57,6 +51,16 @@
 
 !XBMReader class methodsFor:'testing'!
 
+canRepresent:anImage
+    "return true, if anImage can be represented in my file format"
+
+    |photometric|
+
+    (anImage depth ~~ 1) ifTrue:[^ false.].
+    (((photometric := anImage photometric) ~~ #blackIs0) and:[photometric ~~ #whiteIs0]) ifTrue:[^ false.].
+    ^ true
+!
+
 isValidImageFile:aFileName
     "return true, if aFileName contains an x-bitmap-file image"
 
@@ -90,16 +94,6 @@
     ].
     inStream close.
     ^ true
-!
-
-canRepresent:anImage
-    "return true, if anImage can be represented in my file format"
-
-    |photometric|
-
-    (anImage depth ~~ 1) ifTrue:[^ false.].
-    (((photometric := anImage photometric) ~~ #blackIs0) and:[photometric ~~ #whiteIs0]) ifTrue:[^ false.].
-    ^ true
 ! !
 
 !XBMReader methodsFor:'reading from file'!
@@ -275,4 +269,9 @@
     "
 ! !
 
+!XBMReader class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.18 1995-12-07 11:39:00 cg Exp $'
+! !
 XBMReader initialize!