XPMReader.st
changeset 1650 916067641a59
parent 1529 0c9e38ea3261
child 1710 ad35e6a18e98
--- a/XPMReader.st	Fri Oct 25 13:14:44 2002 +0200
+++ b/XPMReader.st	Fri Oct 25 20:27:20 2002 +0200
@@ -171,7 +171,7 @@
     ].
 
     line := aStream nextLine.
-    [line notNil and:[(line startsWith:'/*') or:[line isBlank]]] whileTrue:[
+    [line notNil and:[(line startsWith:'/*') or:[line isBlank or:[(line startsWith:' *')]]]] whileTrue:[
         line := aStream nextLine.
     ].
     (line notNil and:[line startsWith:'static char']) ifFalse:[
@@ -572,6 +572,7 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.47 2001-11-15 11:09:54 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.48 2002-10-25 18:27:20 cg Exp $'
 ! !
+
 XPMReader initialize!