diff --git a/repository/Parasol-Tests.package/BPMiscTestCase.class/instance/testFileUpload.st b/repository/Parasol-Tests.package/BPMiscTestCase.class/instance/testFileUpload.st index 3a7b3e1..93fb0e0 100644 --- a/repository/Parasol-Tests.package/BPMiscTestCase.class/instance/testFileUpload.st +++ b/repository/Parasol-Tests.package/BPMiscTestCase.class/instance/testFileUpload.st @@ -2,7 +2,7 @@ testing testFileUpload | fileupload filesubmit file receivedFile | - + file := BPSmalltalkPlatform current fileWrite: 'Test.data' contents: 'Hello World!'. [ @@ -10,9 +10,10 @@ testFileUpload filesubmit := driver findElementByID: 'sendFile'. fileupload sendKeys: file. filesubmit click. - + receivedFile := self waitUntil: [ self componentUnderTest receivedFile ] is: [ :value | value notNil ] checkEvery: (Duration milliseconds: 100) timeoutAfter: (Duration seconds: 5) with: [ nil ]. self assert: receivedFile notNil. - self assert: (receivedFile contentsDecodedUsing: 'UTF-8') = 'Hello World!'. - ] ensure: [ BPSmalltalkPlatform current fileDelete: file ]. \ No newline at end of file + self assert: (receivedFile isKindOf: WAFile). + self assert: (receivedFile contentsDecodedUsing: 'UTF-8') equals: 'Hello World!'. + ] ensure: [ BPSmalltalkPlatform current fileDelete: file ] \ No newline at end of file