XPMReader.st
changeset 562 921472d151d9
parent 560 4cce4f58bbbf
child 564 8a31b6fbe9a6
--- a/XPMReader.st	Thu Apr 24 19:47:57 1997 +0200
+++ b/XPMReader.st	Thu Apr 24 20:33:40 1997 +0200
@@ -113,12 +113,12 @@
     ^ true
 
     "
-     XPMReader isValidImageFile:'bitmaps/magtape.xpm'    
-     XPMReader isValidImageFile:'bitmaps/ljet.xpm'      
-     XPMReader isValidImageFile:'bitmaps/garfield.gif' 
+     XPMReader isValidImageFile:'fooBar'    
+     XPMReader isValidImageFile:'bitmaps/xpmBitmaps/device_images/ljet.xpm'      
+     XPMReader isValidImageFile:'bitmaps/gifImages/garfield.gif' 
     "
 
-    "Modified: 21.4.1997 / 17:10:35 / cg"
+    "Modified: 24.4.1997 / 20:29:40 / cg"
 ! !
 
 !XPMReader methodsFor:'reading from file'!
@@ -204,6 +204,9 @@
 
         line := aStream nextLine.
         [line notNil and:[line startsWith:'/*']] whileTrue:[
+            [line notNil and:[(line endsWith:'*/') not]] whileTrue:[
+                line := aStream nextLine.
+            ].
             line := aStream nextLine.
         ].
         line notNil ifTrue:[
@@ -396,7 +399,7 @@
     "Created: 24.9.1995 / 06:20:06 / claus"
     "Modified: 24.9.1995 / 07:07:33 / claus"
     "Modified: 5.7.1996 / 17:27:59 / stefan"
-    "Modified: 4.4.1997 / 15:01:28 / cg"
+    "Modified: 24.4.1997 / 20:33:04 / cg"
 ! !
 
 !XPMReader methodsFor:'writing to a file'!
@@ -513,6 +516,6 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.30 1997-04-24 16:08:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.31 1997-04-24 18:33:40 cg Exp $'
 ! !
 XPMReader initialize!