#FEATURE
class: RegressionTests::ImageReaderTest
changed:
#test_bmp_01
#test_png_01
--- a/RegressionTests__ImageReaderTest.st Fri Mar 04 19:23:00 2016 +0100
+++ b/RegressionTests__ImageReaderTest.st Mon Mar 07 09:20:14 2016 +0100
@@ -260,13 +260,16 @@
allOK := true.
(self class packageDirectory construct:'testData/bmpImages') directoryContentsAsFilenamesDo:[:f |
- f isRegularFile ifTrue:[
+ (f isRegularFile and:[f hasSuffix:'bmp']) ifTrue:[
Error handle:[:ex |
img := nil.
] do:[
img := Image fromFile:f.
].
- img isNil ifTrue:[ allOK := false].
+ img isNil ifTrue:[
+ Transcript printf:'failed: %s\n' with:f baseName.
+ allOK := false
+ ].
].
].
self assert:allOK.
@@ -282,13 +285,16 @@
allOK := true.
(self class packageDirectory construct:'testData/pngImages') directoryContentsAsFilenamesDo:[:f |
- f isRegularFile ifTrue:[
+ (f isRegularFile and:[f hasSuffix:'png']) ifTrue:[
Error handle:[:ex |
img := nil.
] do:[
img := Image fromFile:f.
].
- img isNil ifTrue:[ allOK := false ].
+ img isNil ifTrue:[
+ Transcript printf:'failed: %s\n' with:f baseName.
+ allOK := false
+ ].
].
].
self assert:allOK.